no va ayuda y soporte tecnico

08/08/2004 - 15:15 por asun | Informe spam
hola
no me funciona desde que un amigo me ayudo a corregir
problemas de mi maquina la ayuda y soporte tecnico
se han arreglado muchas cosas pero parece que esto lo
estropeo

puedo arreglarlo yo?

Preguntas similare

Leer las respuestas

#1 Daniel Martín
08/08/2004 - 15:26 | Informe spam
Hola, esto suele ocurrir cuando se ejecuta un programa "limpiador" del Registro tipo RegCleaner o similar. Abre el Bloc de Notas y pega el código que te adjunto (cortesía de Doug Knox [MS MVP]). Guárdalo con la extensión .vbs y haz doble clic para ejecutarlo.

'fixwinxphelp.vbs - Repairs the damage done by Toni Arts EasyCleaner
'© Doug Knox - Modified 3/25/02 to account for XP over 2000 upgrades
'Based on information provided by Bill James (http://www.billsway.com)

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\"

Set fso = CreateObject("Scripting.FileSystemObject")
Set q = fso.GetSpecialFolder(0)

q1 = q & "\PCHealth\HelpCtr\Binaries\HelpCtr.exe\1"
q2 = q & "\PCHealth\HelpCtr\Binaries\HelpCtr.exe\"
q3 = q & "\PCHealth\HelpCtr\Binaries\HelpCtr.exe\2"
q4 = q & "\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

WshShell.Run("helpctr -regserver")

Set Wshshell = Nothing

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

Un saludo,
Daniel Martín
E-Mail:


"asun" wrote in message news:242401c47d49$d6553710$
hola
no me funciona desde que un amigo me ayudo a corregir
problemas de mi maquina la ayuda y soporte tecnico
se han arreglado muchas cosas pero parece que esto lo
estropeo

puedo arreglarlo yo?

Respuesta Responder a este mensaje
#2 Alezito [MS MVP]
08/08/2004 - 17:22 | Informe spam
Realiza el siguiente procedimiento y comentame si soluciona tu problema:

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

Si no lo hace, te dejo entonces este procedimiento manual aportado por Kelly
MS MVP, que te traduzco al castellano:

1. Inserta en su bandeja el CD de Windows XP.
2. Explora el CD y ve a la carpeta \I386
3. Copia los siguientes archivos a una carpeta que crees al efecto, por
ejemplo, "arturo":

Winhlp32.cn_
Winhlp32.ex_
Winhlp32.hl_

4. Inicio - Ejecutar - cmd
5. Ve a la carpeta "arturo" (te recuerdo "cd" para avanzar o "cd.." para
retroceder en los directorios)
6. Escribe los comandos siguientes:

EXPAND WINHLP32.CN_ WINHLP32.CNT
EXPAND WINHLP32.EX_ WINHLP32.EXE
EXPAND WINHLP32.HL_ WINHLP32.HLP

7. Copia "Winhlp32.exe" a "\%SYSTEMROOT%\"
8. Copia "Winhlp32.cnt" y "Winhlp32.hlp" a "\%SYSTEMROOT%\Help\"
9. Normalmente la ruta "\%SYSTEMROOT%\" es C:\Windows
10. Elimina el contenido de "arturo"

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


"asun" escribió en el mensaje
news:242401c47d49$d6553710$
hola
no me funciona desde que un amigo me ayudo a corregir
problemas de mi maquina la ayuda y soporte tecnico
se han arreglado muchas cosas pero parece que esto lo
estropeo

puedo arreglarlo yo?

email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida