Sådan bruges VBScript til at gemme en fil

Ligesom andre skriptsprog indeholder VBScript funktioner til håndtering af filindgang og -udgang. Som et scriptningssprog i Microsoft har VBScript adgang til Windows-objekter, der håndterer internetforbindelser og filbesparelse. Hvis din virksomhed primært bruger Windows, kan det være en nyttig færdighed at vide, hvordan man bruger VBScript til at automatisere grundlæggende filer til læsning og skrivefunktioner. For at automatisere lagring af filer fra internettet kan du bruge ADODB streaming-objekt til at tragte data til en lokal fil på computeren. Dette vil skrive filen og gemme den automatisk.

1.

Opret variabler til dine upload og download steder:

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

2.

Download filen fra internettet:

Indstil objXMLHTTP = CreateObject ("MSXML2.XMLHTTP")

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

3.

Opret en datastrøm for downloadobjektet og indstil dets læseposition til starten af ​​den downloadede fil:

Sæt stream = CreateObject ("ADODB.Stream") stream.Open stream.Type = 1 'adTypeBinary

stream.Write objXMLHTTP.ResponseBody stream.Position = 0

4.

Opret et systemobjekt til at håndtere oplysninger fra filen, læs fra strømmen til filen og luk datastrømmen:

Indstil system_file = Opretobjekt ("Scripting.FileSystemObject") Hvis system_file.Fileexists (download) Så hent objFSO.DeleteFile Indstil system_file = Intet

stream.SaveToFile download stream.Close Sæt stream = Intet ende hvis

Populære Indlæg