Turinys
Rašydamas kodą „VBScript“ programuotojui gali prireikti patvirtinimo, kad failas egzistuoja prieš atlikdamas veiksmą ar iškviesdamas funkciją. Tai galima susieti prisijungus prie „Windows Script Host“ kartu su VBScript ir naudojant „FileSystemObject“. Geriausias būdas išmokti šios programavimo technikos yra sekti žingsnis po žingsnio pavyzdžiu. Tai yra gera VBScript programuotojo praktika.
1 žingsnis
Atidarykite „Notepad“. Spustelėkite meniu „Pradėti“ ir paieškos laukelyje įveskite „Užrašų knygelė“. Paieškos rezultatuose pasirinkite „Notepad“.
2 žingsnis
Sukurkite naują failą „Notepad“. Į failą įveskite keletą atsitiktinių raidžių ir išsaugokite ją kaip: "C: Temp test.txt". Jis bus naudojamas VBScript kodui parodyti.
3 žingsnis
Sukurkite naują dokumentą „Notepad“ ir išsaugokite jį kaip: „C: Temp FileCheck.vbs“. Įtraukus „.vbs“ plėtinį į tekstinį failą, sukuriamas „Windows“ vykdomasis VBScript failas.
4 žingsnis
Nukopijuokite ir įdėkite šį kodą į savo „Notepad“ dokumentą:
Variantas aiškus
’Nustatykite„ Dimension DIM fso “
’Set Object Set fso = CreateObject („ Scripting.FileSystemObject “)
'Sukurti sąlygą, jei (fso.FileExists ("C: Temp test.txt")), tada' Įspėti vartotoją WScript.Echo ("Failas egzistuoja!") WScript.Quit () Kitas 'Įspėti vartotoją WScript.Echo (" Failo nėra! ") Pabaiga If
’Išeikite iš scenarijaus WScript.Quit ()
5 žingsnis
Išsaugokite sukurtą VBScript failą ir išeikite iš programos.
6 žingsnis
Atidarykite aplanką, kuriame yra VBScript failas, ir dukart spustelėkite „FileCheck.vbs“. Turėtų pasirodyti pranešimo laukelis, patvirtinantis: "Failas egzistuoja!" Pasirinkite „Gerai“, kad uždarytumėte pranešimų laukelį.
7 žingsnis
Pervardykite arba ištrinkite „C: Temp test.txt“ failą, sukurtą atlikus 1 veiksmą, tada dar kartą dukart spustelėkite scenarijų „FileCheck.vbs“. Nurodyto failo nebėra ir pamatysite pranešimą: Failas neegzistuoja! "(Failo nėra!). Kode esantis sakinys„ If-Then-Else “tikrina ir informuoja jus apie rezultatus. Norėdami uždaryti pranešimo laukelį, pasirinkite„ OK “.
