Kā pārbaudīt, vai fails pastāv, izmantojot VBScript

click fraud protection
Failu lejupielāde datora ekrānā

Izmantojot VBScript, ir viegli apstiprināt faila esamību.

Attēla kredīts: Ablestock.com/AbleStock.com/Getty Images

Rakstot VBScript kodu, programmētājam, iespējams, būs jāapstiprina faila esamība pirms darbības veikšanas vai funkcijas izsaukšanas. To var paveikt, piekļūstot Windows Script Host ar VBScript un izmantojot FileSystemObject. Labākais veids, kā apgūt šo programmēšanas tehniku, ir sekot līdzi soli pa solim sniegtajam piemēram. Šī ir laba prakse iesācējam VBScript programmētājam.

1. darbība

Atveriet Notepad. Noklikšķiniet uz Windows izvēlnes "Sākt" un meklēšanas lodziņā ierakstiet "notepad". Meklēšanas rezultātos atlasiet Notepad.

Dienas video

2. darbība

Izveidojiet jaunu failu programmā Notepad. Ievadiet failā dažus nejaušus burtus un saglabājiet to kā "C:\Temp\test.txt". Šis fails tiks izmantots, lai demonstrētu VBScript kodu.

3. darbība

Izveidojiet citu jaunu dokumentu programmā Notepad un saglabājiet šo failu kā "C:\Temp\FileCheck.vbs". Pievienojot teksta failam paplašinājumu ".vbs", Windows datorā tiek izveidots izpildāms VBScript fails.

4. darbība

Nokopējiet un ielīmējiet šo kodu savā Notepad dokumentā:

Izteikta opcija

'Iestatīt Dimension DIM fso

'Set Object Set fso = CreateObject("Skriptēšana. FileSystemObject")

Izveidot nosacījumu Ja (fso. FileExists ("C:\Temp\test.txt")) Pēc tam 'Brīdināt lietotāja WScript. Echo ("Fails pastāv!") WScript. Quit() Else 'Brīdināt lietotāja WScript. Atbalss("Fails neeksistē!") Beigas Ja

Iziet no Script WScript. Iziet ()

5. darbība

Saglabājiet tikko izveidoto VBScript failu un izejiet no Notepad.

6. darbība

Pārlūkojiet līdz mapei, kurā atrodas jūsu VBScript fails, un veiciet dubultklikšķi uz "FileCheck.vbs". Jāparādās ziņojuma lodziņam, kas apstiprina: "Fails pastāv!" Izvēlieties "OK", lai aizvērtu ziņojuma lodziņu.

7. darbība

Pārdēvējiet vai izdzēsiet failu "C:\Temp\test.txt", ko izveidojāt 1. darbībā; pēc tam vēlreiz veiciet dubultklikšķi uz skripta "FileCheck.vbs". Šoreiz norādītais fails neeksistē, un jūs redzēsit ziņojumu, kas paziņo: "Fails neeksistē pastāv!" Paziņojums If-Then-Else jūsu VBScript kodā veic pārbaudi un brīdina jūs par rezultātus. Izvēlieties "OK", lai aizvērtu ziņojuma lodziņu.

Brīdinājums

Strādājot ar VBSscript failiem, veicot dubultklikšķi uz šiem failiem, tiks palaists VBScript kods. Lai rediģētu failu ar paplašinājumu .vbs, ar peles labo pogu noklikšķiniet uz faila un konteksta izvēlnē atlasiet Rediģēt.