Instalar fondo de escritorio html

[DanielRey]

<BLOCKQUOTE><font size=1 face=arial>Citando:<hr height=1 noshade>WSHShell.Popup &quot;Establecer el valor HKCU\MyRegKey\Entry a REG_DWORD 2&quot;
WSHShell.RegWrite &quot;HKCU\MyRegKey\Entry&quot;, 2, &quot;REG_DWORD&quot;

WSHShell.Popup &quot;Establecer el valor HKCU\MyRegKey\Entry\Value1 a REG_BINARY 3&quot;
WSHShell.RegWrite &quot;HKCU\MyRegKey\Entry\Value1&quot;, 3, &quot;REG_BINARY&quot;

WSHShell.Popup &quot;Eliminar el valor HKCU\MyRegKey\Entry\Value1&quot;
WSHShell.RegDelete &quot;HKCU\MyRegKey\Entry\Value1&quot;

WSHShell.Popup &quot;Eliminar la clave HKCU\MyRegKey\Entry&quot;
WSHShell.RegDelete &quot;HKCU\MyRegKey\Entry\&quot;

WSHShell.Popup &quot;Eliminar la clave HKCU\MyRegKey&quot;
WSHShell.RegDelete &quot;HKCU\MyRegKey\&quot;

' ************************************************** ******************************
' *
' * Bienvenido
' *
Sub Welcome()
Dim intDoIt

intDoIt = MsgBox(L_Welcome_MsgBox_Message_Text, _
vbOKCancel + vbInformation, _
L_Welcome_MsgBox_Title_Text )
If intDoIt = vbCancel Then
WScript.Quit
End If
End Sub [/QUOTE]

Bueno, si conoces un pelín de VisualBasicScript, verás que es muy sencillo manipular las claves del registro con un archivo .vbs, al cual llamas tal como lo harías con un .bat

Suerte ;)