File Transfer Protocol è una tecnologia utilizzata per trasferire file tra computer su Internet . VBA è un linguaggio di programmazione sviluppato da Microsoft . VBA è basato su Component Object Model di Microsoft , che permette di fare riferimento agli oggetti e fare uso delle loro proprietà e metodi per creare i programmi . Uno di questi oggetti è possibile fare riferimento in VBA è l'oggetto di controllo Microsoft Internet Transfer . Questo oggetto gestisce i trasferimenti di file su piattaforme Windows . Utilizzando l'oggetto di controllo Microsoft Internet Transfer , i programmatori possono creare e utilizzare FTP nei loro programmi . Acquisire l'oggetto di controllo Microsoft Internet Transfer per utilizzare i servizi di FTP è semplice per un programmatore alle prime armi e VBA richiede solo pochi passi . Istruzioni
1
Aperte .
2
Clicca su "Strumenti " Microsoft Excel "macro " e poi " Visual Basic ". Si aprirà l'ambiente di programmazione VBA .
3
Clicca su "Strumenti " e " Riferimento ". Scorrere verso il basso e selezionare l'opzione " Internet Transfer Control Microsoft " e fare clic su " OK ".
4
Fare clic su " Inserisci" e "Modulo ". Si è ora in un modulo di codice di programmazione
Digitare o copiare e incollare il seguente codice nel modulo : .
Funzione UploadFile ( ByVal NomeHost As String , _ ByVal
UserName String, _
ByVal password As String , _
LocalFilename ByVal As String , _
RemoteFileName ByVal come stringa) come booleano
Dim FTP come inet
FTP = New inet
Con FTP
. protocollo = icFTP
. RemoteHost = hostname
. UserName = NomeUtente
. password = password
. Esegui . URL , " Put " + LocalFilename + " " + RemoteFileName
Do While . StillExecuting
DoEvents < br >
loop
UploadFile = ( . risposta = 0 ) per
End With
FTP = Nothing End Function
< br >