trouble with a do until loop

[kor]

#include <Array.au3>
#include <File.au3>
#include <FileConstants.au3>

;$aFiles = _FileListToArrayRec("\\express.mpsaz.org\purchasing", "*", $FLTA_FILES, $FLTAR_RECUR)
;_ArrayDisplay($aFiles)
;1246
Do
    $aFiles = _FileListToArrayRec("C:\temp", "*", $FLTA_FILES, $FLTAR_RECUR)
    Sleep(500)
    $iOldFiles = $aFiles[0]
    ConsoleWrite("old files = " & $iOldFiles & "    new files = " & $aFiles[0] & @CR)
Until $iOldFiles < $aFiles[0]
ConsoleWrite("out of the loop" & @CR)

The goal is to monitor a directory and wait.

as soon as a new file appears exit the loop (need help here)

then copy the file to a new directory (haven't got there yet)

then continue back into the loop and keep monitoring

I'm stuck on how to approach this. I'm not good with Do until loops.

What I'm attempting to do in the code is list all files in a directory, count the number of files.. and if the number of files increases (by any number) then do an action... once the action is done.. continue back into the loop.

get number of files in a directory

if # of files in directory increases from the last time you got the # of files then

copy the file to XYZ

then go back to the beginning and keep getting the number of files in a directory.

EDIT: I'm not even sure a Do Until loop is right for me.

My biggest issue is I don't know how to compare the number of files that is in the CURRENT loop to the number of files that was in the LAST loop that just completed.

So if the last time the loop finished the number of files was 105, and now in the current loop the number of files is 106, how do I have the number of files from the last loop survive the loop into the next one?

Edited April 2, 2015 by kor

[kor]

Maybe something like this?

#include <Array.au3>
#include <File.au3>
#include <FileConstants.au3>

While 1
    Sleep(2000) ; slow things down so you can see it
    $aFiles = _FileListToArrayRec("C:\temp", "*", $FLTA_FILES, $FLTAR_RECUR, 0, $FLTAR_FULLPATH)
    If @error Then ContinueLoop
    If $aFiles[0] > 0 Then
        For $i = 1 To UBound($aFiles) - 1
            FileMove($aFiles[$i], "C:\temp1", $FC_OVERWRITE)
        Next
    EndIf
WEnd

Edited April 2, 2015 by kor

[JohnOne]

Take a look at this

'?do=embed' frameborder='0' data-embedContent>>

[kor]

Take a look at this

'?do=embed' frameborder='0' data-embedContent>>

I don't believe that will work.

The file path that I need to monitor is on an IBM iSeries AS400 and isn't a windows file system.

[JohnOne]

I'm surprised AutoIt runs on a non windows file system.

[nitekram]

 

Maybe something like this?

#include <Array.au3>
#include <File.au3>
#include <FileConstants.au3>

While 1
    Sleep(2000) ; slow things down so you can see it
    $aFiles = _FileListToArrayRec("C:\temp", "*", $FLTA_FILES, $FLTAR_RECUR, 0, $FLTAR_FULLPATH)
    If @error Then ContinueLoop
    If $aFiles[0] > 0 Then
        For $i = 1 To UBound($aFiles) - 1
            FileMove($aFiles[$i], "C:\temp1", $FC_OVERWRITE)
        Next
    EndIf
WEnd

I think that should work. Are you not getting the results? The OP code, will never work, as you keep making the value the same and then checking to see if one is larger than the other.