Visual Basic for Applications , eller VBA , är en version av Microsofts Visual Basic språket , integreras i Office svit av verktyg produktivitet programvara . VBA -program körs från ett Office- verktyg - t.ex. Word - tillgång och manipulera data som för närvarande förvaltas av detta verktyg - till exempel ett Word-dokument . Ett VBA -program kan läsa sin input från , eller skriva sina resultat , filer som lagras på en fjärrserver via File Transfer Protocol eller FTP . Du kan skriva VBA-kod som instruerar FTP-klient - förinstallerade som standard på datorn - att samverka med FTP-servrar . Instruktioner
1
Skapa FTP- kommandot fil med en lista över kommandon som FTP -klient ska köras. Följande VBA-kod fragment skapar en sådan fil :
Dim ftpFileHandle As Integer
ftpFileHandle = FreeFile
Öppna " ftpCommand.txt " för utskrift som # ftpFileHandle
Print # ftpFileHandle , " open ftpserver.com "
Print # ftpFileHandle , " userid "
Print # ftpFileHandle , " lösenord "
Print # ftpFileHandle , " skicka localfile.xls "
Print # ftpFileHandle , " recv remotefile.doc "
Print # ftpFileHandle , " bye "
Close # ftpFileHandle
Ersätt " ftpserver.com " med namnet på FTP -servern , " userid " med namnet på ditt konto på servern och " lösenord " med ditt lösenord . Kodexemplet laddar upp ett kalkylblad i en fil som heter " localfile.xls " och nedladdningar ett dokument som återfinns i en fil med namnet " remotefile.doc . " Du kan använda något av kommandona från " Lista över FTP-kommandon " på NSF Tools hemsida innan du stänger sessionen med " bye . "
2
Skapa en batch , eller körbara skript fil som åberopar FTP-klienten för att få det köra FTP kommandofil . Följande VBA-kod fragment skapar en sådan fil :
Dim batFileHandle As Integer
batFileHandle = FreeFile
Öppna " doFtp.bat " för utskrift som # batFileHandle
Print # batFileHandle , " ftp - s : ftpCommand.txt "
Close # batFileHandle
3
Kör kommandofilen genom att inkludera följande rad i din VBA-kod :
Shell ( " doFtp.bat " ) , vbHide '' , vbMinimizedNoFocus
Observera att raden innehåller två enkla citattecken , utan tecken mellan dem , omedelbart före andra kommatecknet . Din VBA -programmet kommer att åberopa kommandofilen som i sin tur kommer att åberopa den FTP-klient och få denne utföra den sekvens av kommandon från Steg 1 .
