LastError
LastError contiene el código de error WIN32 establecido por varios métodos cuando la devolución de estos incluye FALSE y un error. Este valor se debe verificar si es necesario antes de solicitar otro método que pueda establecer esta propiedad en caso de error.
Sintaxis
FTPobj.LastError: STRING (read)
Ejemplo
Un ejemplo que establece el directorio de funcionamiento actual:
Function Main
Dim FTPobj as Object
'configurar según sea necesario
ip = "127.0.0.1"
port = 21
mode = FALSE
username = "anonymous"
password = "test@lnss.com"
directory = "/pub/"
'crear a una nueva conexión FTPProtocolo que se utiliza para transferir archivos entre equipos de redes.
Set FTPobj=FTP.Connect (ip,21,modo,nombredeusuario,contraseña)
'Establecer el directorio de funcionamiento actual en /pub/
RET = FTPobj.SetCurrentDirectory (directorio)
if RET Then
echo "Set current directory to " + directory + " succeeded"
else
echo "failed to Set current dir: " + CStr(FTPobj.LastError)
End If
End Function