Writing to a text file.... Help!

charlie79 · Mar 12th, 2002, 12:14 PM

Any idea why this code doesn't work? Gives me an Invalid procedure call or argument runtime error... Am I missing a reference for my project?

Const ForReading = 1, ForWriting = 2, ForAppending = 3
Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile("c:testfile.log", ForAppending, True, TristateFalse)
f.Write "Hello world!"
f.Close

DMeador52 · Mar 12th, 2002, 12:29 PM

I believe the value for appending should be 8.

Doug

charlie79 · Mar 12th, 2002, 12:34 PM

Good call Doug, thanks a bunch

Mar 12th, 2002, 12:35 PM

I believe ForAppending should be 8 not 3.

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

Mar 12th, 2002, 12:14 PM	#1
charlie79 Board Regular Join Date: Feb 2002 Posts: 97	Any idea why this code doesn't work? Gives me an Invalid procedure call or argument runtime error... Am I missing a reference for my project? Const ForReading = 1, ForWriting = 2, ForAppending = 3 Dim fs, f Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.OpenTextFile("c:testfile.log", ForAppending, True, TristateFalse) f.Write "Hello world!" f.Close

Mar 12th, 2002, 12:29 PM	#2
DMeador52 New Member Join Date: Mar 2002 Posts: 32	I believe the value for appending should be 8. Doug

Mar 12th, 2002, 12:34 PM	#3
charlie79 Board Regular Join Date: Feb 2002 Posts: 97	Good call Doug, thanks a bunch

Mar 12th, 2002, 12:35 PM	#4
Guest Posts: n/a	I believe ForAppending should be 8 not 3.