Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Darkangel_Dami en 16 Mayo 2014, 02:11 am

Título: ¿Como grabar 2 textbox en un txt en Visual Basic 6.0?
Publicado por: Darkangel_Dami en 16 Mayo 2014, 02:11 am

La cosa es que hice un formulario de visual basic 6.0 puse 2 TextBox y 1 Button

Text Box 1

Text Box 2

1 Button

y cree un bloc de notas en mi disco Local C:

Mi idea es que al presionar el Button, se envíe al bloc de notas todo lo que esta escrito en el TexBox 1 y en el TextBox 2.

Título: Re: ¿Como grabar 2 textbox en un txt en Visual Basic 6.0?
Publicado por: ignorantev1.1 en 16 Mayo 2014, 03:40 am

Código

Private sub botonqueescribiraenarchivoendiscoc_click()
    Dim nombredelarchivoenelqueseescribira as string
    Dim paraalmacenarlodelastextboxs as string
    Dim ff as long
    nombredelarchivoenelqueseescribira = "C:\elarchivopuntotxt.txt" 
    paraalmacenarlodelastextboxs = Text1.Text & Text2.Text
    ff = Freefile
    Open nombredelarchivoenelqueseescribira for binary as ff
    Put ff,, paraalmacenarlodelastextboxs
    close ff
End sub

... O algo por el estilo.

Saludos

Título: Re: ¿Como grabar 2 textbox en un txt en Visual Basic 6.0?
Publicado por: Cj2009z en 17 Mayo 2014, 04:34 am

buenas noches, puedes intentar con esto:

Código:

Open "C:\archivo.txt" For Append As #1 'Creas el archivo para agregarle texto al final
        Print #1, Text1.Text 'Guardas el contenido del textbox1 en el archivo
        Print #1, Text2.Text 'Guardas el contenido del textbox2 en el archivo
Close #1 'cierras el archivo.

espero que te sirva.