SolarCoasters

For my application i have my users able to type something into a text field then it gets saved to a text file but when I read in the file it only reads the first line how do I make VB read the entire file and store it in a variable.
Thankx...

Termor

You probably could have found this pretty quickly if you did a search, but here is the code to read the entire file into a variable.

Edit: Added Open and close code.

chrystal_ph

Hi!

If you are using FileSystemObject, you can try the ReadAll method. This returns the contents of a file in a string :


Function ReadFile() As String
Dim objFSO as New FileSystemObject
Dim objTextStream as TextStream
Set objTextStream = objFSO.OpenTextFile("yourfile.txt",ForReading,False)
ReadFile = objTextStream.ReadAll()
Set objTextStream = Nothing
Set objFSO = Nothing
End Function

Hasin

Above codes are for TextFile or Text Stream. If you use a binary file then this code send you a message that interrupted by null terminating character. So please open all files as binary. You may do this with all type of file.

[vb]
dim j() as byte
open "filaname" for binary as #1
redim j(lof(1)) as byte
get #1,,j
close #1
[vb]

Now you have the entire file in "j" array. You may use and modify as you want.