Med Microsoft Visual Basic ladda upp filer till en FTP-Server (3 / 5 steg)
Steg 3: Att få Visual Basic för att skapa en .bat fil
Observera, detta kommer inte att vara en fullständig guide om hur du använder VB, jag antar att du är här eftersom du kan använda dess grundläggande funktioner redan. Om du behöver lite hjälp om VB kolla in denna resurs.
Bege dig till delen av ditt VB-skript där du vill ladda upp filer och låt oss skapa vissa variabler. Först kommer att lagra våra lokala katalog och resten kommer att variabler som skapar våra text- och bat-filen.
Dim MyDirectory som sträng
Dim File1 som heltal
Dim fil2 som heltal
File1 = FreeFile
File2 = FreeFile
Nu måste vi ange en katalog att lagra temporär FTP-kommandofiler, detta kan vara valfri katalog som du väljer. Försök att göra det en oanvänd katalog som programmet kommer att radera alla .txt .bat och .out filer varje kör.
MyDirectory = "C:\Temp\FTPFiles"
Om vi använder denna mapp ofta vi kanske vill kolla efter .out avslutning filer och radera dem från denna katalog, vi kan göra detta med den nedan koden
Om Dir (MyDirectory & ".out") <> "" sedan döda (MyDirectory & ".out")
Nästa kommer att vi skapa vår första textfil och möjligt för oss att skriva kommandorader till den under namnet #File1
Öppna MyDirectory & ".txt" för utdata som #File1
Nu börjar vi skriva ut FTP-kommandon i denna fil. Dessa är mycket lik den kommandotolk som vi gjorde tidigare, men uppmärksam var på syntaxen som används. Först och främst, anslutningen till FTP-servern. Varje rad vi vill skriva till fil måste börja med ordet Print, då vi listar namnet då texten att skriva inom citationstecken.
Skriva ut #File1, "öppna ftp.myserver.com"
Nästa kommer att vara vår förbrukaren namn för den här FTP-katalogen, ersätta "my_username" för din faktiska användarnamn.
Skriva ut #File1, "my_username"
Nästa lösenord, igen substitut, "your_password" med din faktisk lösenord.
Skriva ut #File1, "my_password"
Nästa vi kommer att ändra din fjärrmål, igen, om rotkatalogen är bra, utelämna denna del.
Skriva ut #File1, "cd my/fjärr/katalog /"
Nu för att skicka några filer, kan du använda jokertecken detaljer i steg 2 för att skicka mer än en fil eller funktionen mput också detaljerade i steg 2.
Skriva ut #File1, "Lägg C:/MyFiles/thisfile1.png"
Skriva ut #File1, "Lägg C:/MyFiles/thisfile2.png"
När vi har lagt till en rad för alla filer som vi vill ladda upp i vår textfil kommer vi lägga till ett "bye" kommando och stäng filen med följande.
Skriva ut #File1, "bye"
Nära #File1
Nu att skapa den .bat arkivera för att passera vår skriftliga instruktioner för det.
Öppna MyDirectory & "bat" för utdata som #File2
Skriv ut #File2, "ftp - s:" & MyDirectory & ".txt"
Och vi kommer att lägga en slutförd meddelande till botten av den .bat arkivera att låta oss veta när våra upload i klar och stäng filen
Skriva ut #File2, "Echo""komplett" ">" & MyDirectory & ".out"
Nära #File2