WMI no conecta con ordenador remoto
Publicado por david (1 intervención) el 19/04/2007 14:41:54
Saludos a todos! Tengo un problema al usar WMI con VBScript. Intento ejecutar un script desde un ordenador en otro, para ello tengo que conectar con el otro equipo. Ambos ordenador están en un subdominio, que a su vez está en otro (del estilo pc01.dominio1.dominio2). Mi cuenta tiene privilegios de administrador e hice de todo pero no funciona. El error que da es 'No se encuentra disponible el servidor RPC'.
En el firewall de Windows tengo todo tal y como se especifica en varias páginas (incluido microsoft.com) e incluso he activado para la subred la directiva de grupo 'Permitir excepción de administración remota', pero nada. Si desactivo el firewall de Windows (en el ordenador remoto) funciona sin ningún problema.
strComputer = "pc01"
Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = objSWbemLocator.ConnectServer _
(strComputer, "root\cimv2", "dominio1\usuario", "password")
objWMIServices.Security_.ImpersonationLevel = 3
En el código creo que no hay nada mal, pero nunca se sabe. Espero me ayudéis. Gracias.
En el firewall de Windows tengo todo tal y como se especifica en varias páginas (incluido microsoft.com) e incluso he activado para la subred la directiva de grupo 'Permitir excepción de administración remota', pero nada. Si desactivo el firewall de Windows (en el ordenador remoto) funciona sin ningún problema.
strComputer = "pc01"
Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = objSWbemLocator.ConnectServer _
(strComputer, "root\cimv2", "dominio1\usuario", "password")
objWMIServices.Security_.ImpersonationLevel = 3
En el código creo que no hay nada mal, pero nunca se sabe. Espero me ayudéis. Gracias.
Valora esta pregunta
0