File Transfer Protocol is een technologie die wordt gebruikt om bestanden tussen computers via het internet . VBA is een programmeertaal ontwikkeld door Microsoft . VBA is gebaseerd op Microsoft Component Object Model , waardoor het mogelijk wordt om te verwijzen naar objecten en maken gebruik van hun eigenschappen en methoden om programma's te maken . Een dergelijk object kunt u verwijzen in VBA is de Microsoft Internet Transfer Control -object . Dit object behandelt file transfers op Windows-platforms . Met behulp van de Microsoft Internet Transfer Control -object , kan programmeurs maken en gebruiken FTP binnen hun programma's . Het verwerven van de Microsoft Internet Transfer Control -object aan de diensten van FTP gebruiken is eenvoudig voor een beginnende VBA programmeur en duurt slechts een paar stappen . Instructies
1 Open Microsoft Excel . Kopen van 2 Klik op " Extra ", " Macro " en vervolgens " Visual Basic . " Dit zal de VBA programmeeromgeving openen.
3 Klik op " Tools" en " Reference . " Scroll naar beneden en selecteer de " Microsoft Internet Transfer Control " en klik op "OK . "
4 Klik op " Invoegen" en " Module . " Je bent nu in een programmeercode module Typ of kopieer
en plak de volgende code in de module : . Functie uploadfile
( ByVal HostName als Koord , _ ByVal gebruikersnaam
As String , _ ByVal Wachtwoord
als Koord , _ ByVal LocalFileName
als Koord , _ ByVal RemoteFileName als Koord
) zoals Van Boole Dim FTP
als inet
Stel FTP = Nieuwe Inet
Met FTP
. Protocol = icFTP
. = HostName
. UserName = Gebruikersnaam remotehost
. Password = Wachtwoord
. Uitvoeren . URL , " Put " + LocalFileName + " " + RemoteFileName
Do While . StillExecuting
DoEvents < br Loop uploadfile = ( . responseCode = 0 ) >
End met
Stel FTP = Nothing End Function
< br >
|
