Wait for file to exist

[JLC123]

Sorry for posting such a simple question, but I've been coding since 8:30 this morning and I'm fried.

I just need a little While/Wend loop to wait for my file to exist and give up after 5 minutes and exitloop.

Can anyone slap that together for me please?

Thanks!

[Daniel W.]

AdlibEnable( "_Exists" , 1000 )
Global $path = "" ; Your path
Global $Timer = 0
While 1 
    Sleep( 100 )
WEnd

func _Exists()
    If $Timer < 1000 * 60 * 5 Then
        $Timer += 1000
        If FileExists( $path ) Then
            Return 1
        Else
            Return 0
        EndIf
    EndIf
EndFunc

Maybe this

[Briegel]

Is this what you want?

While 1
    Sleep(100)
    If FileExists("yourpath\yourfile") = 1 Then
        Sleep(300000)
        ExitLoop()
    EndIf
WEnd

[JLC123]

Both of those scripts wait 5 minutes even if the file I'm waiting for already exists.

I need the loop to end as soon as the file exists and to wait no more than 5 minutes for that event to occur.

Make sense?

[JLC123]

ok - this seems to do the trick:

$Timer = 0
While 1 
    If $Timer < 300000 Then
        If FileExists("u:\jlc.ini") Then
    ExitLoop
        Else
    $Timer = +1000
        EndIf
    EndIf
WEnd

[BPBNA]

I don't think that would go for the right amount of time. It adds a second every time it loops, chances are a loop will take much less than a second

try

$begin = TimerInit()

While TimerDiff($begin) < 300000
     If FileExists("u:\jlc.ini") then ExitLoop
WEnd

Edited July 12, 2006 by BPBNA

[Simucal]

I don't think that would go for the right amount of time. It adds a second every time it loops, chances are a loop will take much less than a second

try

$begin = TimerInit()

While TimerDiff($begin) < 300000
     If FileExists("u:\jlc.ini") then ExitLoop
WEnd

I dont think I would make it Exitloop if the fileexists, that is the same result you will get if the file doesnt exist in 5 minutes. Also, put a sleep in there, that will be a hard hitting loop for the CPU.

[BPBNA]

Yeah I didn't really think that through I guess, but he can replace the Exitloop with whatever code he wanted to be there when it finds it.

$begin = TimerInit()

While TimerDiff($begin) < 300000
     If FileExists("u:\jlc.ini") then
         ;insert code
     EndIf
WEnd

Edit: Forgot to close the code tag

Edited July 12, 2006 by BPBNA

[Jasp402]

Quote

waitForExistFile('D:\New Text Document.txt',30000)

Func waitForExistFile($sPath, $iTimeOut)
   $sBegin = TimerInit()
   While TimerDiff($sBegin) < $iTimeOut
        If FileExists($sPath) then 
            Return True
         Else
            ContinueLoop
        EndIf
        Return false
   WEnd
EndFunc

 

Returns true if the file exists or false if the time runs out

Edited January 29, 2018 by Jasp402

[Melba23]

Jasp402,

I take it you did not notice that the post above yours dates from nearly 12 years ago! Please do not necro-post like this again.

M23