Stap 5: Schrijven van het script deel 3: als dan verklaringen als foutcorrectie.
Als dan de verklaring zegt in feite als iets gebeurt dan dit anders doen dat doen. Door te nesten als/dan verklaringen kunt u een reeks van dingen die moeten gebeuren. Als een en b en c gebeuren Voer dit anders dat doen.
in het volgende voorbeeld:
We willen ervoor zorgen dat het bestand dat we willen schrijven is er
Als we vinden die we willen niets doen
Als we niet vinden die we willen maken van het
of
We willen om te controleren of de map er en als het niet te maken
en vervolgens controleren of het bestand er is zodra we de map vinden
en als het niet te maken
de eerste is een voorbeeld van een als dan verklaring de tweede is een geneste als.
Hoe we het doen:
Er zijn vier delen van een if vervolgens verklaring
Als/dan
anders
eind als
het is eigenlijk als dit waar is dan dit anders die doen dan de instructie eindigen
een goed gecodeerde als toen de verklaring zou zijn:
Als er iets = iets Then
doen wat je nodig hebt gedaan
Anders
iets anders doen
End If
U kunt een van de argumenten, zolang het klopt het volgen van het toenmalige deel en negeren het anders deel maar als het onwaar is zal het overslaan van de toenmalige en gaan tot anders
Vervolgens wanneer we eindigen als vermelding van we stellen "end if", maar als we zijn genest als verklaringen hebben we aan het einde van elke als verklaring. Het zal eindigen ze van kind naar ouder dus de eerste "end als" de als eindigt instructie binnen de ouder, waar naar de tweede men het origineel (bovenliggend niveau eindigt) als verklaring.
Om een pop-up we enkel type
Wscript.Echo ("wat we willen zeggen in het bericht")
waarde toe te voegen een variabelen in het we het buiten of tussen dubbele aanhalingstekens de ampersandoperator (&) teken als scheidingsteken gebruiken, zodat het script weet dat het is een variabele en niet naar een tekst.
Als dit:
Wscript.Echo ("Blah blah blah" & strDir & "bla bla bla" & strFilename & "blah blah blah".)
De uitvoer zou een pop-up die zei
Blah blah blah blah blah blah blah blah blah shutdown_catcher.txt C:\Catcher.
Werkelijke verbruik:
' als de map C; \exist
Als objFiSyOb.FolderExists(strDir) dan
' map ophalen
Set objSysFold = objFiSyOb.GetFolder(strDir)
' anders
Anders
' Maak de map c; \catcher
Set objSysFold = objFiSyOb.CreateFolder(strDir)
' en controleer of het bestand en de map bestaat
Als objFiSyOb.FileExists (strDir & strFile) dan
' als het krijgt map c:\catcher
Set objSysFold = objFiSyOb.GetFolder(strDir)
' anders
Anders
' Maak tekst document shutdown_catcher.txt
Set objFile = objFiSyOb.CreateTextFile (strDir & strFile)
' dan knal opwaarts een bericht om te zeggen u beiden hebt gemaakt
Wscript.Echo ("Hebben we een map met de naam" & strDir & "en een bestand met de naam" & strFilename & "en geplaatst in de" & strDir & strFile & "map.")
' einde geneste als verklaring
End If
' einde oorspronkelijke als verklaring
End If
' nu in de eerste verklaring we al gecontroleerd voor map en vond het zo nu wij Controleer voor bestand
Als objFiSyOb.FileExists (strDir & strFile) dan
' als gevonden krijgen map
Set objSysFold = objFiSyOb.GetFolder(strDir)
' anders
Anders
' Maak de tekst-doc
Set objFile = objFiSyOb.CreateTextFile (strDir & strFile)
' Maak een popup zeggen wij het tekstdocument is gemaakt
Wscript.Echo ("Hebben we een bestand met de naam" & strFileName & "in de" & strDir & "bestandsmap.")
End If