Edición rápida del registro

Wed, 04/29/2009 - 09:38 by itscripting Tags:

registro vbscript

Cuantas veces hemos necesitado editar el registro... yo cada vez que tenia que hacer algún cambio lo hacía de formas distintas, usando WMI, ficheros .REG, etc....

Os dejo una forma simple, con cuatro líneas de código está terminado.

Espero que os sea útil.

Option Explicit
On Error Resume Next
 
Dim oShell, sRutaRegistro
 
sRutaRegistro = "HKLM\SOFTWARE\Microsoft\Windows NT\currentVersion\Winlogon\"
 
Set oShell = CreateObject("WScript.Shell")
 
oShell.RegWrite sRutaRegistro & "Shell", "explorer.exe", "REG_SZ"
 
Set oShell = Nothing
 
If Err.Number <> 0 Then
	WScript.Echo "Error al editar el registro"
End If