11-14-2009, 10:04 PM
7 posts and no one helped him, wow you guys......
I didn't tested this as I don't have need tools for testings.
But I'm sure it's what you are looking for.
I didn't tested this as I don't have need tools for testings.
But I'm sure it's what you are looking for.
Code:
f = FreeFile
path = App.Path & "\file.txt"
Open path For Input As f
TextBox1.Text = Input(Lof(f), f)
Close f