Windows Scripting...

[Haddd]

 Vereis quiero crear un script para que el usuario lo ejecute y el FireWall se desactive. El problema es que el usuario NO tiene permisos para modificar el firewall, y por tanto quiero especificar en el propio script el usuario, password y dominio local para que se puedan realizar:

Este es el script para desactivar el firewall.

Código [Seleccionar] Expand


On Error Resume Next
'Create the firewall manager object.
Set objFwMgr = CreateObject("HNetCfg.FwMgr")
If Err <> 0 Then
 WScript.Echo "Unable to connect to Windows Firewall."
 WScript.Quit
End If
'Get the current profile for the local firewall policy.
Set objProfile = objFwMgr.LocalPolicy.CurrentProfile
'Is firewall enabled?

If objProfile.FirewallEnabled = True Then
 WScript.Echo "Windows Firewall is enabled."
'Disable it.
 objProfile.FirewallEnabled = False
 WScript.Echo "Windows Firewall now disabled."
Else
 WScript.Echo "Windows Firewall already disabled."
End If  



Muchas gracias

[Juan Mellado]

 Desde el propio Windows Scripting no lo sé, pero desde fuera puedes probar a usar "runas". Es un .exe que viene con el propio Windows (¿XP mínimo?). Teclea "runas" desde una consola de MS-DOS y te aparecerá la ayuda de cómo utilizarlo. A ver si sirve.

Ejemplo: runas /noprofile /user:mi_equipo\administrador notepad

Saludos

[CoLSoN2]

 

Desde el propio Windows Scripting no lo sé, pero desde fuera puedes probar a usar "runas".

Yo a veces rezo para que los problemas que tengo con el ordenador se solucionen después de hacer alguno cambio de estos de "a ver si cuela con esto..", pero de ahí a usar runas..

[vicho]

 turum tss  (ole)