Hola gente de nuevo yo!! como estan? espero que mejor que yo ( estoy insolada
) pero bueno....
Estoy guardando una palabra encriptada en un archivo que creo desde mi programa :
path = DirList.path + "\" + "prueba"
Open path + ".txt" For Binary As 1 'crea el archivo .txt
For z = 1 To Len(txtSave)
caracter = Mid(txtSave.Text, z, 1) 'lo saco
Put #1, , EnDeCryptSingle(Asc(caracter)) 'lo pongo
Next z
lo que quiero hacer y no puedo es leer luego esa palabra encriptada desde el archivo, probe con Get y nada, no lo lee, no se como pueod hacer para leer toda la palabra desde el archivo, antes de que pregunten el archivo esta abierto, y deberia leer toda la palabra, osea hasta que sea fin de archivo.
Les agradeceria que me contesten porq es Urgente, desde ya Muchas Gracias !!!!