Indhold
Når du skriver kode i VBScript, kan en programmør have brug for bekræftelse på, at der findes en fil, før han udfører en handling eller kalder en funktion. Dette kan kobles ved at få adgang til "Windows Script Host" sammen med VBScript og gøre brug af FileSystemObject. Den bedste måde at lære denne programmeringsteknik på er at følge et trin-for-trin eksempel. Det er god praksis for en programmør, der er ny i VBScript.
Trin 1
Åbn Notesblok. Klik på menuen "Start" og skriv "Notesblok" i søgefeltet. Vælg Notesblok i søgeresultaterne.
Trin 2
Opret en ny fil i Notesblok. Skriv nogle tilfældige bogstaver i filen, og gem den som: "C: Temp test.txt". Det vil blive brugt til at demonstrere VBScript-koden.
Trin 3
Opret et nyt dokument i Notesblok, og gem det som: "C: Temp FileCheck.vbs". Inkludering af ".vbs" -udvidelsen i tekstfilen opretter en Windows-eksekverbar VBScript-fil.
Trin 4
Kopier og placer følgende kode i dit Notesblok-dokument:
Mulighed eksplicit
’Indstil dimension DIM fso
’Set Object Set fso = CreateObject (" Scripting.FileSystemObject ")
'Opret tilstand, hvis (fso.FileExists ("C: Temp test.txt")) Derefter' Alert bruger WScript.Echo ("Filen findes!") WScript.Quit () Ellers 'Alert bruger WScript.Echo (" Filen findes ikke! ") Afslut Hvis
'Exit Script WScript.Quit ()
Trin 5
Gem den VBScript-fil, du oprettede, og afslut programmet.
Trin 6
Åbn mappen, der indeholder VBScript-filen, og dobbeltklik på "FileCheck.vbs". Der vises en meddelelsesboks, der bekræfter: "Filen findes!" Vælg "OK" for at lukke meddelelsesfeltet.
Trin 7
Omdøb eller slet filen "C: Temp test.txt" oprettet i trin 1, dobbeltklik derefter på scriptet "FileCheck.vbs" igen. Den angivne fil findes ikke længere, og du får vist en meddelelse, der siger: " Filen findes ikke! "(Filen findes ikke!). If-Then-Else-sætningen i koden kontrollerer og informerer dig om resultaterne. Vælg" OK "for at lukke meddelelsesfeltet.