por favor necesito ayuda :S
este es el codigo
guardar
Private Sub Command1_Click()
Open "C:\WINDOWS\xd.txt" For Append As #1
'vbCrLf es como un enter
Print #1, "fecha="; Date; vbCrLf; vbCrLf; "clave= "; Text1.Text & vbCrLf; "nombre="; Text2.Text & vbCrLf; "precio="; Text3.Text; vbCrLf
Close #1
MsgBox "guardado"
End Sub
abrir
Private Sub Command2_Click()
Dim foo As Integer
foo = FreeFile
Open "C:\WINDOWS\xd.txt" For Input As #foo
Text4.Text = Input(LOF(foo), #foo)
Close #foo
aqui esta el programa
http://www.mediafire.com/?37o07mrd6l01wg6
necesito si me podrian ayudar a que la informacion del archivo de texto se borre ojala me pudieran ayudar
no entiendo, como que se borre?
porque no borrar todo el archivo?
lo que quiero es que se borre la informacion que ay adentro del archivo text o si se puede borrar una linea desde visual basic
la unica forma de borrar una linea de un archivo de texto que conozco es
Cargar toda la informacion del txt en visual.
Modificarlo ahi, con manejo de caracteres.
y escribir todo de nuevo reemplazando lo que habia en el txt.
Se entiende?