Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Vytvorte súbor príkazov FTP so zoznamom príkazov , ktoré klient FTP sa vykonávajú . Nasledujúci fragment kódu VBA vytvorí taký súbor : 
 
 Dim ftpFileHandle As Integer 
 
 ftpFileHandle = FreeFile 
 
 Otvorte " ftpCommand.txt " Pre výstup ako # ftpFileHandle 
 
 Print # ftpFileHandle , " open ftpserver.com " 
 
 Print # ftpFileHandle , " userid " 
 
 Print # ftpFileHandle , " heslo " 
 
 Print # ftpFileHandle , " odoslať localfile.xls " 
 
 Print # ftpFileHandle , " recv remotefile.doc " 
 
 Print # ftpFileHandle , " bye " 
 
 Close # ftpFileHandle 
 
 Nahradiť " ftpserver.com " s názvom FTP servera , " userid " s názvom vášho účtu na tomto serveri a " heslo " s vašim heslom . Ukážkový kód nahrá tabuľky obsiahnuté v súbore s názvom " localfile.xls " a stiahne dokument obsiahnutý v súbore s názvom " remotefile.doc . " Pred uzavretím relácie s môžete použiť niektorý z príkazov zo " zoznamu FTP príkazy " na NSF Nástroje internetových stránkach " Dovidenia . " 
 2 
 vytvoriť dávkový alebo spustiteľný skript , súbor , ktorý vyvolá FTP klient , aby to spustiť príkazový súbor FTP . Nasledujúci fragment kódu VBA vytvorí taký súbor : 
 
 Dim batFileHandle As Integer 
 
 batFileHandle = FreeFile 
 
 Otvorte " doFtp.bat " Pre výstup ako # batFileHandle 
 
 Print # batFileHandle , " ftp - s : ftpCommand.txt " 
 
 Close # batFileHandle 
 3 
 spustite dávkový súbor zahrnutím nasledujúci riadok v kóde jazyka VBA : 
 
 Shell ( " doFtp.bat " ) , vbHide '' , vbMinimizedNoFocus 
 
 Všimnite si , že riadok obsahuje dva apostrofy , bez akéhokoľvek charakteru medzi nimi , bezprostredne pred druhým čiarkou . Váš program VBA vyvolá dávkový súbor , ktorý , podľa poradia , bude vyvolanie FTP klienta a majú to vykonať postupnosť príkazov od kroku 1.