Line -1: Error: Subscript used with non-Array variable

[Willow]

When running this code, it will randomly fail with the error message: Line -1: Error: Subscript used with non-Array variable.

Any help in finding the cause is appreciated.

$archive_folder = "C:\Archived backups"
IF NOT FileExists($archive_folder) THEN DirCreate($archive_folder)
$arc = "C:\data"
$FoldersToMove = "backup*"
$FolderArray = _FileListToArray( $arc, $FoldersToMove, 2)
For $i = 1 To $FolderArray[0]
    DirMove($arc & "\" & $FolderArray[$i], $archive_folder & "\" & $FolderArray[$i], 1)
Next

[BigDaddyO]

because if it doesn't find any files, the variable is not an array.

You need to put in

if @error then

error message or something...

else

Run your loop

endif

[Willow]

Thanks, Mike,

Not sure I quite follow what you mean. I now realize the array is failing because there are no files,however I don't need to display an error message, the code just needs to continue past this as it will be running unattended and finding no file(s) is not a worry as sometimes there will be files, other times there will be not.

[BigDaddyO]

ok,

in that case I would use if Not @error then. I don't think your supposed to use if not due to some performance issues in the milliseconds but i havn't had a problem.

So your code should be like

$archive_folder = "C:\Archived backups"
IF NOT FileExists($archive_folder) THEN DirCreate($archive_folder)
$arc = "C:\data"
$FoldersToMove = "backup*"
$FolderArray = _FileListToArray( $arc, $FoldersToMove, 2)
if not @error then
For $i = 1 To $FolderArray[0]
    DirMove($arc & "\" & $FolderArray[$i], $archive_folder & "\" & $FolderArray[$i], 1)
Next
endif

Edited August 13, 2010 by MikeOsdx

[UEZ]

#Include <File.au3>
#Include <Array.au3>
$archive_folder = "C:\Archived backups"
IF NOT FileExists($archive_folder) THEN DirCreate($archive_folder)
$arc = "C:\data"
$FoldersToMove = "backup*"
$FolderArray = _FileListToArray( $arc, $FoldersToMove, 2)
If Not @error And IsArray($FolderArray) Then
    For $i = 1 To $FolderArray[0]
        DirMove($arc & "\" & $FolderArray[$i], $archive_folder & "\" & $FolderArray[$i], 1)
    Next
Else
    MsgBox(16, "Error", "An error has occured!")
EndIf

Br,

UEZ