Hola a tod@s, tengo un problemilla, yo hago lo siguiente:

On Error Resume Next
dim wscr,rr,fso,MiArchivo
set wscr=CreateObject("WScript.Shell")
rr=wscr.RegRead("HKEY_CURRENT_USER\Software\Microsoft\
Prueba\file")
Set fso = CreateObject("Scripting.FileSystemObject")
Set MiArchivo = fso.CreateTextFile("c:\archivoPrueba.doc", True)
MiArchivo.WriteLine(rr)
MiArchivo.Close

El valor del registro que leo "file" titne un valor binario y cuando quiero grabarlo en el fichero de texto no me graba nada.

Alguien me puede ayudar y decirme como lo puedo hacer para leer valores binarios y grabarlos en ficheros de texto.

Muchas gracias.

Si he probado con .txt, y tampoco se guarda nada, no se si habrá alguna expresión para convertir los tipos de binario a caracter. Por favor a ver si me lo pueden solucionar cuanto antes.

Gracias