[RESOLVED] command button to save your textboxs value

[milen]

hii everybody
i want ask you about my form that contain 3 textboxs with one command button so i want to make this commandbutton to save what is in the textbox as *txt files for next use
please help and give me if it 's possible the function or code ,okey!
--------------------
your brother milen thx a lot guys
regard's

[leinad31]

Have you researched on the Open statement, Print statement, and Input statement?

[milen]

what means open statment where can i fond him??????

[cssriraman]

Check out this link:

Write text to a Text File

[Static]

here is more specifically what u need

this is assuming the textboxes have 1 line in each.. if multiline then let me know
you could do that a few different ways

Private Sub Command1_Click()
    Open App.Path & "\data.txt" For Output As #1
        Print #1, Text1
        Print #1, Text2
        Print #1, Text3
    Close #1
End Sub
 
Private Sub Form_Load()
    Dim tmp As String
    If Len(Dir(App.Path & "\data.txt")) <> 0 Then
        Open App.Path & "\data.txt" For Input As #1
            Line Input #1, tmp
            Text1 = tmp
            Line Input #1, tmp
            Text2 = tmp
            Line Input #1, tmp
            Text3 = tmp
        Close #1
    End If
End Sub

[milen]

theank you guys it's work
spicilly static thx a lot
milen
regard's

[cssriraman]

When you have received an answer to your question, please mark it as Resolved using the Thread Tools menu.