No se puede encontrar el archivo "helpctr.exe"

Ah... y no uses esos programillas para "limpiar" el registro, suelen
provocar estas cosas.


Saludos.
Jorge Zeledon :.


"Jorge Zeledon" escribió en el
mensaje news:%23$
Hola Stucliff: Copia este texto en un documento del block de notas
(Notepad), lo salvas como *fixwinxphelp.vbs*, lo corres a doble clic,
pruebas y nos cuentas. Algunos antiviruss protestan pero está totalmente
limpio, es un scrip de © Doug Knox.


'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)
'Ampliacion a reconocimiento del resto de unidades raiz Guillermo Rey

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-00C04F
72DAF7}\1.0\0\win32\"
p2 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9E00-3F9E-11D3-93C0-00C04F
72DAF7}\1.0\HELPDIR\"
p3 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9000-3F9E-11D3-93C0-00C04F
72DAF7}\1.0\0\win32\"
p4 "HKEY_LOCAL_MACHINE\Software\CLASSES\TypeLib\{FC7D9000-3F9E-11D3-93C0-00C04F
72DAF7}\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)




Saludos.
Jorge Zeledon :.


"Stucliff" escribió en el mensaje
news:2bf9b01c468e9$17b89d20$
Al intentar abrir la auyuda y soporte técnico de windows
Xp (En el menú inicio) me aparece el mensaje de
error "Windows no puede encontrar el archivo helpctr.exe,
compruebe la ruta de acceso..."
He intentado buscarlo manualmente, pero los archivos que
encuentro no funcionan.

No sé que puede ser

Gracias por adelantado