Why doesn't the Dir functions fives me an error?

[Gti]

scandir = Dir(DirAchada & "*.cls&quot

Do While scandir <> &quot;&quot;
FichAbertura = DirAchada & scandir
FichParaEscrever = Destdir
ScanFonteFicheiro FichAbertura, FichParaEscrever
scandir = Dir
Loop

-------------------------------------------------

This is my code, and when scandir = dir is hit, the program gives me an error! The error Says: &quot;Invalid procedure call or argument!&quot; Why?
How can i solve this?
Tkx )

 

[JohnYingling]

Try
scandir = Dir()
strDir = Dir
works on my VB6(SP5) but try anyway.

http://www.VBCompare.com

http://www.VBSortGen.com

 

[Gti]

It still not working!

Why do you put the () on DIR?
And what does the strDir=Dir does?

 

[sunaj]

Hi,

I bet that you use dir inside ScanFonteFicheiro. That won't work, you can only use dir in one loop at a time...

Sunaj