Inhoud
Bij het schrijven van code in VBScript heeft een programmeur wellicht bevestiging nodig dat een bestand bestaat voordat hij een actie uitvoert of een functie aanroept. Dit kan worden gekoppeld door samen met VBScript naar "Windows Script Host" te gaan en gebruik te maken van FileSystemObject. De beste manier om deze programmeertechniek te leren, is door een stapsgewijs voorbeeld te volgen. Het is een goede gewoonte voor een programmeur die nieuw is bij VBScript.
Stap 1
Open Kladblok. Klik op het menu "Start" en typ "Kladblok" in het zoekvak. Selecteer Kladblok in de zoekresultaten.
Stap 2
Maak een nieuw bestand in Kladblok. Typ enkele willekeurige letters in het bestand en sla het op als: "C: Temp test.txt". Het zal worden gebruikt om de VBScript-code te demonstreren.
Stap 3
Maak een nieuw document in Kladblok en sla het op als: "C: Temp FileCheck.vbs". Door de ".vbs" -extensie in het tekstbestand op te nemen, wordt een uitvoerbaar Windows-VBScript-bestand gemaakt.
Stap 4
Kopieer en plaats de volgende code in uw Kladblok-document:
Optie expliciet
’Stel Dimensie DIM fso in
’Set Object Set fso = CreateObject (" Scripting.FileSystemObject ")
'Create Condition If (fso.FileExists ("C: Temp test.txt")) Then' Alert User WScript.Echo ("Het bestand bestaat!") WScript.Quit () Else 'Alert User WScript.Echo (" Bestand bestaat niet! ") End If
’Script WScript.Quit () afsluiten
Stap 5
Sla het VBScript-bestand dat u hebt gemaakt op en sluit het programma af.
Stap 6
Open de map die het VBScript-bestand bevat en dubbelklik op "FileCheck.vbs". Er zou een berichtvenster moeten verschijnen waarin wordt bevestigd: "Het bestand bestaat!" Selecteer "OK" om het berichtvenster te sluiten.
Stap 7
Hernoem of verwijder het "C: Temp test.txt" -bestand gemaakt in stap 1, dubbelklik vervolgens opnieuw op het "FileCheck.vbs" -script. Het opgegeven bestand bestaat niet meer en u zult een bericht zien met de tekst: " Bestand bestaat niet! "(Het bestand bestaat niet!). De If-Then-Else-instructie in de code controleert en informeert u over de resultaten. Selecteer" OK "om het berichtvenster te sluiten.
