Programming Forums > Application Development > Visual Basic

ViOLATiON · Oct 26th, 2005, 11:11 PM

Ok, I've made a textbox sort of like a text editor (ie: notepad), but I would like it to read the text in the textbox from a .txt file .. I think thats how you say it.. :eek:

The reason for this is because its going to be a fairly long paragraph.

Here's a quick little diagram to help clear things up

<3 mspaint

I'm sure this is really easy, maybe I'm using the wrong words on Google.

EDIT: I've found this:

(Toggle Plain Text)

Dim Myfile As String
'Replace "c:\testfile.txt
file = "c:\testfile.txt"
Open Myfile For Input As #1
Text1.Text = Input(LOF(1), #1)
Close

When i run it i get an error, i click Debug and the line Open Myfile For Input As #1 is highlighted.

Any ideas?

Thanks in advance

Ghost · Oct 26th, 2005, 11:53 PM

What version of Visual Basic?

In VB.NET I believe:
FileStream file = new FileStream("C:\textfile.txt",FileMode.OpenOrCreate, FileAccess.Read)
StreamReader sr = new StreamReader(file)

Text1.Text = sr.ToString()

ViOLATiON · Oct 26th, 2005, 11:55 PM

New idea, is to make it read HTML files. I downloaded the MozillaControl 1.0 Type Library, and the code I have right now is:

MozillaBrowser1.Navigate ("file.html")

Where file.html is in the same dir as the exe, but it won't find it unless I put the direct path in the source code (ie: c:\app\file.html), and that sucks because everyone wont have it in the same place.

Anyway around this? I've tried ("\file.html"), same thing.

Thanks guys.

ViOLATiON · Oct 26th, 2005, 11:55 PM

Quote:

Originally Posted by Ghost

What version of Visual Basic?

In VB.NET I believe:
FileStream file = new FileStream("C:\textfile.txt",FileMode.OpenOrCreate, FileAccess.Read)
StreamReader sr = new StreamReader(file)

Text1.Text = sr.ToString()

If it were VB.NET it would be in the VB.NET forum :p

I'm running VB 6

Ghost · Oct 26th, 2005, 11:56 PM

Sorry, I got a direct link from the home page....lets see really quick here....

Ghost · Oct 27th, 2005, 12:01 AM

Use the source from a really old project I have. I don't have VB6 anymore or I'd post it for you and I can't remember it correctly, so here is my program's source.

ivan · Oct 27th, 2005, 2:02 AM

Quote:

Originally Posted by ViOLATiON

(Toggle Plain Text)

Dim Myfile As String
'Replace "c:\testfile.txt
file = "c:\testfile.txt"
Open Myfile For Input As #1
Text1.Text = Input(LOF(1), #1)
Close

Thanks in advance

Instead of:

(Toggle Plain Text)

file = "c:\testfile.txt"

Write:

(Toggle Plain Text)

Myfile = "c:\testfile.txt"

coldDeath · Oct 27th, 2005, 3:20 AM

Good to see a well posted question.

Rory · Oct 27th, 2005, 10:08 AM

Indeed. Nevertheless Option Explicit would have avoided this problem.

ViOLATiON · Oct 27th, 2005, 1:40 PM

Thank you ivan, you proved the title below your name

@coldDeath, i figure if I want an answer I should atleast post it so people will understand. I think my sweet diagram helped :p

Oct 27th, 2005, 3:20 AM	#8
coldDeath Expert Programmer Join Date: Aug 2005 Location: UK Posts: 862 Rep Power: 4	Good to see a well posted question. __________________ Programming Tutorials - Linux Installation Guide - Learn Python - Learn C++ Got Slack? Join us at #programmingforums @ irc.freenode.net! My software never has bugs. It just develops random features.

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Oct 26th, 2005, 11:11 PM	#1
ViOLATiON Programmer Join Date: Sep 2005 Posts: 58 Rep Power: 4	Using Text Files... Ok, I've made a textbox sort of like a text editor (ie: notepad), but I would like it to read the text in the textbox from a .txt file .. I think thats how you say it.. :eek: The reason for this is because its going to be a fairly long paragraph. Here's a quick little diagram to help clear things up <3 mspaint I'm sure this is really easy, maybe I'm using the wrong words on Google. EDIT: I've found this: (Toggle Plain Text) Dim Myfile As String 'Replace "c:\testfile.txt file = "c:\testfile.txt" Open Myfile For Input As #1 Text1.Text = Input(LOF(1), #1) Close Dim Myfile As String 'Replace "c:\testfile.txt file = "c:\testfile.txt" Open Myfile For Input As #1 Text1.Text = Input(LOF(1), #1) Close When i run it i get an error, i click Debug and the line Open Myfile For Input As #1 is highlighted. Any ideas? Thanks in advance Last edited by ViOLATiON; Oct 26th, 2005 at 11:22 PM.

Oct 26th, 2005, 11:53 PM	#2
Ghost Man Bear Pig Hunter Join Date: Jul 2005 Location: NorCal, USA Posts: 295 Rep Power: 4	What version of Visual Basic? In VB.NET I believe: FileStream file = new FileStream("C:\textfile.txt",FileMode.OpenOrCreate, FileAccess.Read) StreamReader sr = new StreamReader(file) Text1.Text = sr.ToString()

Oct 26th, 2005, 11:55 PM	#3
ViOLATiON Programmer Join Date: Sep 2005 Posts: 58 Rep Power: 4	New idea, is to make it read HTML files. I downloaded the MozillaControl 1.0 Type Library, and the code I have right now is: MozillaBrowser1.Navigate ("file.html") Where file.html is in the same dir as the exe, but it won't find it unless I put the direct path in the source code (ie: c:\app\file.html), and that sucks because everyone wont have it in the same place. Anyway around this? I've tried ("\file.html"), same thing. Thanks guys.

Oct 26th, 2005, 11:56 PM	#5
Ghost Man Bear Pig Hunter Join Date: Jul 2005 Location: NorCal, USA Posts: 295 Rep Power: 4	Sorry, I got a direct link from the home page....lets see really quick here....

Oct 27th, 2005, 10:08 AM	#9
Rory Expert Programmer Join Date: Jan 2005 Location: London Posts: 542 Rep Power: 4	Indeed. Nevertheless Option Explicit would have avoided this problem.

Oct 27th, 2005, 1:40 PM	#10
ViOLATiON Programmer Join Date: Sep 2005 Posts: 58 Rep Power: 4	Thank you ivan, you proved the title below your name @coldDeath, i figure if I want an answer I should atleast post it so people will understand. I think my sweet diagram helped :p

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)

Programming Forums > Application Development > Visual Basic

Using Text Files...