Private Sub CmdLoad_Click()
File1.Open "\text.txt", fsModeInput
Text1.Text = File1.LineInputString
File1.Close
End Sub
Private Sub Command1_Click()
Dim Save As Variant
File1.Open "\text.txt", fsModeOutput
Save = Text1.Text
File1.LinePrint Save
File1.Close
the above codde is one which gives the same result as the previous one.....
i am having two problems here..
1)I want to open a file from the location i desire
2)Only the first line is retrived when i call back the file...i want the whole text content of the file
the above codes saves the content i typed in the text.txt in some default location and retrives it from there...
please help me
thanks in advance
Dawn
|