LastError
LastError 包含各种方法返回 FALSE 并失败后设置的 WIN32 错误代码。 在调用可设置该属性的其他方法之前,如果发生错误,则在必要的情况下应检查该值。
语法
FTPobj.LastError: STRING (read)
示例
设置当前工作目录的示例:
函数 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 "Set current directory to " + directory + " succeeded"
else
echo "无法设置当前目录: " + CStr(FTPobj.LastError)
End If
End 函数