Error message

[Stephon98caffe]

Is there something wrong with this code? I get this error message.

' VB Script Document

Dim objFile, strGuyFile, strFilePath

strFilePath = "c:\temp\outofdate.txt"
'opens file
Set objFile = CreateObject("Scripting.FileSystemObject")

'****Invalid procedure call or argument****
Set strGuyFile = objFile.OpenTextFile(strFilePath, True,false)

do while not strGuyFile.AtEndOfStream
line = strGuyFile.ReadLine
Wscript.Echo line
loop



strGuyFile.Close

 

[tsuji]

>Set strGuyFile = objFile.OpenTextFile(strFilePath, [red]True[/red],false)
Red 2nd parameter is 1 (read), 2 (write) or 8 (append). true is practically -1 for vb(s) (vbtrue=-1). Change the value to either one of them.