How many time my application is run in memory (SOLVED)

[MarcoBoschi]

Jimmy,
It's Fantastic!

In this way I can verify from client if there is a running application in my server

oWMI := oLocator:ConnectServer( "srvmng" , , user , password )
Many thanks

[MarcoBoschi]

In this url
https://stackoverflow.com/questions/677867/run-application-or-process-on-a-remote-computer

it seems that I can execute in a remote server a program

[MarcoBoschi]

Hi,
maybe someone have already translate this function from delhpi to fivewin?

https://stackoverflow.com/questions/677867/run-application-or-process-on-a-remote-computer

I'd like to test just one thing

many thanks
marco

[Jimmy]

hi,

WMI can access "REMOTE" ... but you need "Rights"

this is Xbase++ Code

Code: Select all | Expand

   IF VAL( OS(OS_VERSION) ) > 6
      IF strComputer == "Localhost"
         objWMIServices  := CreateObject( "WbemScripting.SWbemLocator" ):ConnectServer(strComputer, "Root\CIMv2")
      ELSE
         IF EMPTY(cPassword)
            MSGBOX("Need Password")
            QUIT
         ELSE
            objWMIServices  := CreateObject( "WbemScripting.SWbemLocator" ):ConnectServer(strComputer, "Root\CIMv2",strComputer+"\"+cUser,cPassword)
         ENDIF
      ENDIF
   ELSE
      objWMIServices  := GetObject("WinMgmts:{impersonationLevel=impersonate}\\"+strComputer+"\Root\CIMv2") 
   ENDIF

Is it possible to read Open Files in Shared folders via WMI?. (My Computer, Manage, System Tools, Shared folder, Open Files)

as i know you "can" find out "share" Files ... but only "on Server"

[MarcoBoschi]

Hi Jimmy i've tried but I'm not capable
I'd Like to test a function to launch some applications server side
many thanks
marco

[Jimmy]

hi,

you need to enable "winrm" Service on Remote PC

try Powershell on Remote PC and check with

Code: Select all | Expand

get-service winrm

If it is stopped, type:

Code: Select all | Expand

enable-PSRemoting -force

Add access permission to the remote host.

Code: Select all | Expand

winrm s winrm/config/client '@{TrustedHosts="REMOTECOMPUTERNAME/IP"}'

REMOTECOMPUTERNAME = Name "see" under Network
IP = 192.xxx.xxx.xxx

---

also Windows Firewall is blocking the Remote Access.
goto Firewall and select WMI

when all is enable try

Code: Select all | Expand

get-wmiobject CIM_Memory -computername "192.xxx.xxx.xxx" -credential "username"

you will ask for Password ... and hope now you got access of Memory Information

---

when all work in Powershell you can run you harbour App

[MarcoBoschi]

[Otto]

Hello Jimmy,
maybe you can just explain what the difference is between RDP and run remote as described here?

Where is the screen displayed when "Run remotely".

Kind regards
Otto

PS: What about a Tirol holiday?

[Jimmy]

hi Otto,

using WMI "just" get Hard-/Software Information of PC, no Screen or "Input"

[Jimmy]

hi,

Is it possible to read Open Files in Shared folders via WMI?. (My Computer, Manage, System Tools, Shared folder, Open Files)

i need to know "Win32_xxx" to "generate WMI Code using "WMI Code Creator"
https://www.microsoft.com/en-us/download/details.aspx?id=8572
it will not "generate" xBase OOP Code but it it easy to "translate"

if you tell me which "Win32_xxx" you are looking for i can "generate" xBase OOP Code

---

"on Server" you can run

Code: Select all | Expand

compmgmt.msc

look at "Share Folder" -> "Session" and/or ""Open Files"

[Antonio Linares]

Dear Marco,

Using Harbour hbnetio you can execute remote Harbour code on the server.

Ritzan explained that to us recently