Uf.. vamos a ver, te doy la idea que siemrpe use yo con los txt...
el usuario es la carpeta, es decir, tienes una base de datos y en una carpeta "users" cuando se registra alguien se crea una carpeta Ej. "Ranslsad" y luego dentro se crean archivos tipo: pass.txt, nick.txt .... y ahi se guarda la informacion del registro.
Es facil..
En cuanto lo de crear texts y eso..
Private Sub Form_Load()
On Error GoTo fuera
Dim cadena As String
Dim separa As Variant
Open App.Path & "\Configuracion.ini" For Input As #1
While Not EOF(1)
Line Input #1, cadena
separa = Split(cadena, ":")
If separa(0) = "LocalPort" Then Text1.Text = separa(1)
'Esto solo lee el archivo y lo pone en el programa
Wend
Close #1
fuera:
End Sub
Private Sub Form_Unload(Cancel As Integer)
Open App.Path & "\Configuracion.ini" For Output As #1
Print #1, "LocalPort:" & Text1.Text
'y aki lo escribe al cerrar
Close #1
End Sub
Esta puesto apra .ini, pero lo podes cambiar para .txt
Leete bien el code
Salu2
Ranslsad
Autor
En línea
