|
Hello
everyone,
I've got a script that's been running fine
until I tried to modify one statement.
I changed this
statement:
strArrayFileName = View(Row:=5, Col:=25,
Length:=21) 'C:\ARRAY\20030411.TXT
to this: strArrayFileName = View(Row:=5, Col:=25,
Length:=17) & Facility & ".txt"
'C:\ARRAY\20030411
Then when I get to this point in the
script it errors out with Error 53 - File not
found.
Sub Parse(Optional dummy As String)
Dim F As Integer Dim G As Integer Dim S As String F = FreeFile Open strArrayFileName For Input As F '**** I GET THE ERROR - FILE NOT FOUND... 10/28/04 If LOF(F) < Len(Rec) Then Stop 'no source file But if I put the original statement back
in, which only captures the file info on the screen, it is
fine.
I watched the Locals and saw that
strArrayFineName was getting the correct assignment of
C:\ARRAY\20030411SSC.TXT even
when getting the error File not found.
Any
ideas?
Thanks
again,
Scott
|
<<image001.jpg>>
