Zawartość
Pisząc kod w języku VBScript, programista może potrzebować potwierdzenia, że plik istnieje przed wykonaniem akcji lub wywołaniem funkcji. Można to połączyć, uzyskując dostęp do „Hosta skryptów systemu Windows” razem z VBScript i wykorzystując FileSystemObject. Najlepszym sposobem na nauczenie się tej techniki programowania jest wykonanie przykładu krok po kroku. Jest to dobra praktyka dla programistów, którzy nie znają VBScript.
Krok 1
Otwórz Notatnik. Kliknij menu „Start” i wpisz „Notatnik” w polu wyszukiwania. Wybierz Notatnik w wynikach wyszukiwania.
Krok 2
Utwórz nowy plik w Notatniku. Wpisz losowe litery w pliku i zapisz go jako: „C: Temp test.txt”. Będzie używany do zademonstrowania kodu VBScript.
Krok 3
Utwórz nowy dokument w Notatniku i zapisz go jako: „C: Temp FileCheck.vbs”. Dołączenie rozszerzenia „.vbs” do pliku tekstowego powoduje utworzenie pliku wykonywalnego VBScript systemu Windows.
Krok 4
Skopiuj i umieść następujący kod w dokumencie Notatnika:
Opcja jawna
„Ustaw wymiar DIM fso
’Set Object Set fso = CreateObject (" Scripting.FileSystemObject ")
'Utwórz warunek If (fso.FileExists ("C: Temp test.txt")) Then' Alert użytkownika WScript.Echo ("Plik istnieje!") WScript.Quit () Else 'Alert użytkownika WScript.Echo (" Plik nie istnieje! ”) End If
„Exit Script WScript.Quit ()
Krok 5
Zapisz utworzony plik VBScript i zamknij program.
Krok 6
Otwórz folder zawierający plik VBScript i kliknij dwukrotnie „FileCheck.vbs”. Powinien pojawić się komunikat potwierdzający: „Plik istnieje!” Wybierz „OK”, aby zamknąć okno komunikatu.
Krok 7
Zmień nazwę lub usuń plik „C: Temp test.txt” utworzony w kroku 1, a następnie ponownie kliknij dwukrotnie skrypt „FileCheck.vbs”. Określony plik już nie istnieje i zobaczysz komunikat: „ Plik nie istnieje! ”(Plik nie istnieje!). Instrukcja If-Then-Else w kodzie sprawdza i informuje o wynikach. Wybierz„ OK ”, aby zamknąć okno komunikatu.