Visual Basic - task remoto URGENTE

Life is soft - evento anual de software empresarial
   
Vista:

task remoto URGENTE

Publicado por Claudio Espina (2 intervenciones) el 24/12/2009 14:49:12
Estimados
necesito urgente verificar las aplicaciones o ejecutables que estan en momoria de otro equipo, hice un programa en vb que revisa el equipo local, donde está instalado pero al intentar revisar otro equipo me sale un error "permiso denegado" pero creo tener todos los permisos, esiste alguna otra forma??? por favor ayuda
este es el codigo necesario para hacerlo local, creen un aplicacion con un List y un boton y peguen este codigo y listo...

Option Explicit
Dim ow As Object
Dim pro As Object
Dim pid As Object
Dim pi As Object

Private Sub Command1_Click()
List1.Clear
Set ow = GetObject("winmgmts:").instancesof("win32_process")
For Each pro In ow
List1.AddItem pro.Name & " - " & pro.Handle
Next
End Sub

para hacerlo remoto cambio la linea del "SER" por esta:
Set ow = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\xxx.xxx.xxx.xxx\").instancesof("win32_process")

pero me sale el error de permiso, e provado otras maneraas pero no me muestran nada, ni siquiera un error!!!!.

gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder