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.
y si pruebas con un txt, es el formato de texto plano, no el d word.
salu2
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