Imprimir Página - visual basic especie de agenda

Título: visual basic especie de agenda
Publicado por: asdexiva en 13 Noviembre 2012, 20:23 pm

por favor necesito ayuda :S

este es el codigo
guardar

Código:

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

Código:

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

Título: Re: visual basic especie de agenda
Publicado por: Elemental Code en 13 Noviembre 2012, 20:28 pm

no entiendo, como que se borre?
porque no borrar todo el archivo?

Título: Re: visual basic especie de agenda
Publicado por: asdexiva en 13 Noviembre 2012, 20:29 pm

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

Título: Re: visual basic especie de agenda
Publicado por: Elemental Code en 13 Noviembre 2012, 21:23 pm

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?

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: asdexiva en 13 Noviembre 2012, 20:23 pm