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