Ayuda de Win Xp

No funciona "ayuda y soporte tecnico", asi como
tampoco 'F1'( Tecla que invoca la ayuda de win)
.

Abre el bloc de notas (notepad.exe) y copia el siguiente contenido, tal cual:

_____________esta línea no se copia_____________________________________

'fixwinxphelp.vbs - Repairs the damage done by Toni Arts EasyCleaner
'© Doug Knox - - 9/19/2001
'This code may be freely distributed/modified
'Based on information provided by Bill James (http://www.billsway.com)

Option Explicit
On Error Resume Next

'Declare variables
Dim WSHShell, MyBox, p, p1, p2, p3, p4, q1, q2, q3, q4, t
Dim jobfunc

'Set the Windows Script Host Shell and assign values to variables
Set WSHShell = WScript.CreateObject("WScript.Shell")

p1 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9E00-3F9E-11D3-93C0-00C04F72DAF7}\1.0\0\win32\"
p2 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9E00-3F9E-11D3-93C0-00C04F72DAF7}\1.0\HELPDIR\"
p3 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9000-3F9E-11D3-93C0-00C04F72DAF7}\1.0\0\win32\"
p4 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9000-3F9E-11D3-93C0-00C04F72DAF7}\1.0\HELPDIR\"

q1=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.exe\1"
q2=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.exe\"
q3=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.exe\2"
q4=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.exe\"

'Describe the funtion of the script for a dialog box

jobfunc = "This VB Script has repaired the damage done"
jobfunc = jobfunc & vbCR & "when you ran EasyCleaner on your Windows® XP"
jobfunc = jobfunc & vbCR & "installation, by restoring the correct Registry"
jobfunc = jobfunc & vbCR & "values for Help and Support."

'This section writes the correct values to the Registry

WSHShell.RegWrite p1, q1
WSHShell.RegWrite p2, q2
WSHShell.RegWrite p3, q3
WSHShell.RegWrite p4, q4

t = "Confirmation"
MyBox = MsgBox (jobfunc, 4096, t)

____________esta línea no se copia____________________________

Guarda el archivo en el escritorio con el nombre *fixwinxphelp_windirfix.vbs* (guárdalo con la
extensión .vbs, no vbs.txt) y lo ejecutas. Reinicia el sistema.

(Recuerda que las líneas del registro que van entre comillas ("...") deben ir en una sola línea del
bloc de notas).


Saludos,
Enrique Cortés
Microsoft MVP - Windows - IE/OE


Normas de conducta de los grupos de noticias:
http://support.microsoft.com/defaul...newsreglas
http://www.microsoft.com/communitie...fault.mspx

Este mensaje se proporciona "como está" sin garantías de ninguna clase, y no otorga ningún derecho.
This posting is provided "AS IS" with no warranties, and confers no rights.

"Rodrigo C.L." escribió en el mensaje
news:8d8c01c4857c$2baf1570$
No funciona "ayuda y soporte tecnico", asi como
tampoco 'F1'( Tecla que invoca la ayuda de win)

Hola, ¿tu instalacion es limpia o se trata de una actualizacion ?

Sugerencias (ve probando cada una, y si no resulta pasa a la siguiente):

1.- Verifica que el servicio WMI (Instrumental de Administracion de Windows)
NO este en inicio Manual o deshabilitado. Es necesario que arranque en
Inicio Automatico para que funcione el Centro de Ayuda y Soporte.

2.- Busca el archivo "HelpCtr.exe" ha de aparecer en tres rutas, de no estar
debes restaurarlo arrancando en modo seguro con la utilidad de msconfig -
inicio- Expandir archivo - desde el CD de XP.

3.- Realiza el siguiente procedimiento:

Inicio - Ejecutar - cmd: regsvr32 /u hhctrl.ocx.

Si no fuera efectivo el anterior, prueba lo siguiente:

y 4.- Copia el siguiente texto en el Bloc de Notas y guardalo en el
escritorio como
"fixwinxphelp.vbs" y ejecutalo:


'fixwinxphelp.vbs - Repairs the damage done by Toni Arts EasyCleaner
'© Doug Knox - - 9/19/2001
'This code may be freely distributed/modified
'Based on information provided by Bill James (http://www.billsway.com)

Option Explicit
On Error Resume Next

'Declare variables
Dim WSHShell, MyBox, p, p1, p2, p3, p4, q1, q2, q3, q4, t
Dim jobfunc

'Set the Windows Script Host Shell and assign values to variables
Set WSHShell = WScript.CreateObject("WScript.Shell")

p1 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9E00-3F9E-11D3-93C0-00C04F72DAF7}\1
.0\0\win32\"
p2 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9E00-3F9E-11D3-93C0-00C04F72DAF7}\1
.0\HELPDIR\"
p3 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9000-3F9E-11D3-93C0-00C04F72DAF7}\1
.0\0\win32\"
p4 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9000-3F9E-11D3-93C0-00C04F72DAF7}\1
.0\HELPDIR\"

q1=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.
exe\1"
q2=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.
exe\"
q3=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.
exe\2"
q4=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.
exe\"

'Describe the funtion of the script for a dialog box

jobfunc = "This VB Script has repaired the damage done"
jobfunc = jobfunc & vbCR & "when you ran EasyCleaner on your Windows® XP"
jobfunc = jobfunc & vbCR & "installation, by restoring the correct Registry"
jobfunc = jobfunc & vbCR & "values for Help and Support."

'This section writes the correct values to the Registry

WSHShell.RegWrite p1, q1
WSHShell.RegWrite p2, q2
WSHShell.RegWrite p3, q3
WSHShell.RegWrite p4, q4

t = "Confirmation"
MyBox = MsgBox (jobfunc, 4096, t)



Cordialmente,

Alejandro Curquejo
Microsoft MVP
Windows XP - Shell/User
Que es el Programa MVP (Most Valuable Professional)
http://mvp.support.microsoft.com/de...pr=mvpfaqs


"Rodrigo C.L." wrote in message
news:8d8c01c4857c$2baf1570$

No funciona "ayuda y soporte tecnico", asi como
tampoco 'F1'( Tecla que invoca la ayuda de win)

Has "limpiado" el registro con algún programa?


Saludos
Regards
Alex

Hola,
Tengo exactamente el mismo problema.
Probe todo lo escrito y sigue sin funcionar.
Te detallo:
Tengo Windows XP Home original, con todas las actualizaciones al día.
En en algún momento ejecute el Esay Cleaner, pero no puedo asegurar que a
partir de ahi haya sugido el problema.

Esto es lo que hice hasta ahora:


1) Servicios, y haz doble clic en WMI y establece el tipo de inicio en
*automático* >> OK

2) Haz exactamente lo mismo con el servicio "Ayuda y soporte técnico* >> OK
Inicio > Ejecutar > sfc /scannow.

Aqui pasa algo anormal: pongo el disco y en un momento me pide que ponga el
disco de XP Profesional, el cual obviamente no tengo. Le digo que siga
adelante sin tener en cuenta ese archivo y termina sin problemas.

3) No puedo reinstalar el Windows original (sin desinstalarlo previamente)
porque me dice que hay una version más nueva instalada.

No me animo a desinstalar el actual antes de resinstalarlo desde cero por
miedo a perder todas las configuraciones.

4) El archivo HelpCtr.exe está en los siguientes directorios:

c:\Windows\Servicepackfiles\i386 (751K)
c:\pchealth\Helpctr\Binaries (751K)

Además, en
c:\windows\prefetch

Estan estos:
helpctr.exe-20483DC8.pf (16K)
helpctr.exe-3862B6F5.pf (17K)

Tiene que estar en alguno más?

5) Ejecute el comando: regsvr32 /u hhctrl.ocx

6) Ejecute el progrma : fixwinxphelp.vbs

A pesar de todo esto, al pulsar F1 o Ayuda y soporte técnico nada ocurre (ni
siquiera un mensaje de error).

Por favor, tienes tu, o algún otro amable colaborador, alguna comprobación
más que pueda hacer?

Repito, lo unico anormal se produjo en el punto 2 antes descripto.

Muchas gracias !!!

Sergio



"Enrique [MVP Windows]" escribió:

Abre el bloc de notas (notepad.exe) y copia el siguiente contenido, tal cual:

_____________esta línea no se copia_____________________________________

'fixwinxphelp.vbs - Repairs the damage done by Toni Arts EasyCleaner
'© Doug Knox - - 9/19/2001
'This code may be freely distributed/modified
'Based on information provided by Bill James (http://www.billsway.com)

Option Explicit
On Error Resume Next

'Declare variables
Dim WSHShell, MyBox, p, p1, p2, p3, p4, q1, q2, q3, q4, t
Dim jobfunc

'Set the Windows Script Host Shell and assign values to variables
Set WSHShell = WScript.CreateObject("WScript.Shell")

p1 > "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9E00-3F9E-11D3-93C0-00C04F72DAF7}\1.0\0\win32\"
p2 > "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9E00-3F9E-11D3-93C0-00C04F72DAF7}\1.0\HELPDIR\"
p3 > "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9000-3F9E-11D3-93C0-00C04F72DAF7}\1.0\0\win32\"
p4 > "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9000-3F9E-11D3-93C0-00C04F72DAF7}\1.0\HELPDIR\"

q1=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.exe\1"
q2=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.exe\"
q3=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.exe\2"
q4=WSHShell.ExpandEnvironmentStrings("%WINDIR%")+"\PCHealth\HelpCtr\Binaries\HelpCtr.exe\"

'Describe the funtion of the script for a dialog box

jobfunc = "This VB Script has repaired the damage done"
jobfunc = jobfunc & vbCR & "when you ran EasyCleaner on your Windows® XP"
jobfunc = jobfunc & vbCR & "installation, by restoring the correct Registry"
jobfunc = jobfunc & vbCR & "values for Help and Support."

'This section writes the correct values to the Registry

WSHShell.RegWrite p1, q1
WSHShell.RegWrite p2, q2
WSHShell.RegWrite p3, q3
WSHShell.RegWrite p4, q4

t = "Confirmation"
MyBox = MsgBox (jobfunc, 4096, t)

____________esta línea no se copia____________________________

Guarda el archivo en el escritorio con el nombre *fixwinxphelp_windirfix.vbs* (guárdalo con la
extensión .vbs, no vbs.txt) y lo ejecutas. Reinicia el sistema.

(Recuerda que las líneas del registro que van entre comillas ("...") deben ir en una sola línea del
bloc de notas).


Saludos,
Enrique Cortés
Microsoft MVP - Windows - IE/OE


Normas de conducta de los grupos de noticias:
http://support.microsoft.com/defaul...newsreglas
http://www.microsoft.com/communitie...fault.mspx

Este mensaje se proporciona "como está" sin garantías de ninguna clase, y no otorga ningún derecho.
This posting is provided "AS IS" with no warranties, and confers no rights.

"Rodrigo C.L." escribió en el mensaje
news:8d8c01c4857c$2baf1570$
No funciona "ayuda y soporte tecnico", asi como
tampoco 'F1'( Tecla que invoca la ayuda de win)