LastError
LastError contiene il codice di errore WIN32 impostato da vari metodi quando questi restituiscono un valore FALSE e non riuscito. Il valore deve essere controllato all’occorrenza prima di chiamare un altro metodo che può impostare la proprietà in caso di errore.
Sintassi
FTPobj.LastError: STRING (read)
Esempio
Un esempio che imposta la directory di lavoro corrente:
Function Main
Dim FTPobj as Object
'configurare secondo necessità
ip = "127.0.0.1"
port = 21
mode = FALSE
username = "anonymous"
directory = "/pub/"
'creazione di una nuova connessione ftp
Set FTPobj=FTPUn protocollo utilizzato per il trasferimento dei file tra i computer di rete..Connect (ip,21,mode,username,password)
'Impostazione della directory di lavoro corrente su /pub/
RET = FTPobj.SetCurrentDirectory (directory)
if RET Then
echo "Impostazione della directory corrente su " + directory + " riuscito"
else
echo "impossibile impostare la dir corrente: " + CStr(FTPobj.LastError)
End If
End Function