Så här använder du VBScript för att spara en fil

Liksom andra skriptspråk innehåller VBScript funktioner för hantering av filingång och -utmatning. Som ett Microsoft-skriptspråk har VBScript tillgång till Windows-objekt som hanterar Internet-anslutningar och filbesparingar. Om ditt företag använder Windows övervägande kan det vara en hjälpsam skicklighet att veta hur man använder VBScript för att automatisera grundläggande filer för läsning och skrivning. För att automatisera sparandet av filer från Internet kan du använda ADODB-strömmande objekt för att trampa data till en lokal fil på datorn. Detta kommer att skriva filen och automatiskt spara den.

1.

Skapa variabler för dina uppladdnings- och nedladdningsplatser:

Dim url = "//www.domain.com/file.zip" Dim download = "D:\file.zip" 

2.

Ladda ner filen från webben:

Ange objXMLHTTP = CreateObject ("MSXML2.XMLHTTP")

 objXMLHTTP.open "GET", url, false objXMLHTTP.send() 

3.

Skapa en dataström för nedladdningsobjektet och ställ in läsplatsen till början av den nedladdade filen:

Ange ström = CreateObject ("ADODB.Stream") stream.Open stream.Type = 1 'adTypeBinary

stream.Write objXMLHTTP.ResponseBody stream.Position = 0

4.

Skapa ett Systemobjekt för att hantera information från filen, läs från strömmen till filen och stäng dataströmmen:

Ange system_file = Skapa objekt ("Scripting.FileSystemObject") Om system_file.Fileexists (download) Hämta objFSO.DeleteFile Ange system_file = Ingenting

stream.SaveToFile nedladdning stream.Close Set stream = Inget slut om

Populära Inlägg