Yo (newbie en vb6) me "ingenie" una "funcion" para obtener datos desde un archivo y "hacer" algo con ellos
Ademas, no necesariamente necesitaras hacer un .ini o .txt, sino la extensión que tu quieras
Aca, mas o menos, te lo adapto a lo que vos queres
Private Sub Form_Load()
Ruta = "Tu Ruta" 'por ej: "C:\Archivo.ini"
On Error Resume Next
x = GetAttr(Ruta)
Dim file As String
Dim Msg As String
Dim fileno As Integer
Dim i As Integer
Dim t(10000000) As Byte
file = Ruta
fileno = FreeFile()
Open file For Binary As fileno
For i = 1 To FileLen(file)
Get fileno, i, t(i)
Msg = Msg + Chr(t(i))
Next
Close fileno
Text1.Text = Msg 'Textbox donde ira toda la "data"
End Sub
Eso seria para que cuando inicie el form se vuelque la "data" al textbox
Ahora, para hacer que cuando cierre guarde la "data" es lo siguiente:
Private Sub Form_Unload(Cancel As Integer)
Ruta = "Ruta" (si, otra vez xD)
Canal = Freefile
Open Ruta For output as #canal
Print #canal, text1.text 'Textbox donde estara la "data" para guardar
Close #canal
End sub
Aclaro, que los codigos no son los mas perfectos, ya que muchos conocimientos no tengo, pero son "buenos" por asi decirlo jeje
Saludos!
Mostrar Mensajes
