Private ftp As FTP
ftp.Initialize("ftp","ftp.locksdownunder.com.au",21, "[email protected]", "my password")
ftp.PassiveMode = True
ftp.List($"ftp.locksdownunder.com.au"$) '/public_html/usersTools/"$ & Main.userID)
Wait For FTP_ListCompleted (ServerPath As String, Success As Boolean, Folders() As FTPEntry, Files() As FTPEntry) '<----
If Success Then
For Each f As FTPEntry In Files
Log(f)
Next
End If
#if b4a
ftp.Close
#End If