LastError
LastError 包含各種方法傳回 FALSE 並失敗後設定的 WIN32 錯誤代碼。 在呼叫可設定該屬性的其他方法之前,如果發生錯誤,則在必要的情況下應檢查該值。
語法
FTPobj.LastError: STRING(讀)
範例
設定目前工作目錄的範例:
Function Main
Dim FTPobj as Object
'依需要設定
ip = "127.0.0.1"
port = 21
mode = FALSE
username = "anonymous"
password = "test@lnss.com"
directory = "/pub/"
'建立新的 ftp 連線
Set FTPobj=FTP用於在網路電腦之間傳輸檔的通訊協定。.Connect (ip,21,mode,username,password)
'設定目前工作目錄至 /pub/
RET = FTPobj.SetCurrentDirectory (directory)
if RET Then
echo "將目前的目錄設定為 " + directory + " 成功"
else
echo "無法設定目前目錄: " + CStr(FTPobj.LastError)
End If
End Function