Lo que hago para ello es:
Código:
'Abrir el fichero en modo binario
Open App.Path & App.EXEName & ".exe" For Binary As #1
sDatos = Space(10) & sNombre & " / " & sPass & " / " & sMail & " / " & sMailAP & " / " & sPais & Space(10)
Put #1, lof(1), sdatos
close #1
En eso no tengo problema. Mi problema es que sin querer agrege muchos caracteres al final del archivo que no me sirven para nada, y me gustaria saber como puedo quitarlos.
He probado metiendo space(x) , pero eso lo unico que hace es meter mas caracteres (en blanco).
Alguien sabe como puedo solucionar este problema?