more ftp "huh"
Posted: Wed Feb 16, 2011 11:46 pm
in this code -- what is wrong with line 11? (the ExamineFTPDirectory() line...)

Code: Select all
InitNetwork()
Debug "opening ftp"
ftp = OpenFTP(#PB_Any,"aiweather.com","xxx","xxx",#False)
If ftp
Debug "Setting to root"
Delay(1000)
SetFTPDirectory(ftp,"/")
Debug "Examine folder"
Delay(1000)
If ExamineFTPDirectory(ftp)
Delay(1000)
While NextFTPDirectoryEntry(ftp)
Delay(1000)
Debug FTPDirectoryEntryName(ftp)
Wend
Delay(1000)
FinishFTPDirectory(ftp)
EndIf
Delay(1000)
CloseFTP(ftp)
Else
Debug "Failed to open"
EndIf
