Why its does not work?

[GodlessSinner]

#Include <File.au3>

#Include <Array.au3>

$FileList=_FileListToArray(@StartupCommonDir)

For $i = 1 To $FileList[0] Step 1

$link = FileGetShortcut(@StartupCommonDir & "\" & $FileList[$i])

FileWriteLine(@ScriptDir & "\info.txt", $FileList[$i] & "=" & $link[0] & @CRLF)

Next

If @Error=1 Then

MsgBox (0,"","No Files\Folders Found.")

Exit

EndIf

---------

Script write to "info.txt" only first 2 items and then in console I see:

C:\Documents and Settings\Vitaliy\??????? ????\AutoIt v3 Script (4).au3 (7) : ==> Subscript used with non-Array variable.:

FileWriteLine(@ScriptDir & "\info.txt", $FileList[$i] & "=" & $link[0] & @CRLF)

FileWriteLine(@ScriptDir & "\info.txt", $FileList[$i] & "=" & $link^ ERROR

[Jos]

Test the @error returned by FileGetShortcut() to ensure it was able to retrieve information.

Jos

[GodlessSinner]

Thanks. Fixed. The topic can be closed.