Szydełkowanie skryptu

Pętla For … Next w praktyce

Podstawową różnicą między wcześniej przedstawioną pętlą For Each … Next a For … Next jest to, że w pierwszej liczba powtórzeń operacji nie jest podawana przez użytkownika, lecz wynika z liczby elementów jakiegoś zbioru (w naszym przykładzie – liczby dysków w komputerze). Natomiast druga konstrukcja, choć używa się jej bardzo podobnie, wymaga dokładnego określenia przez autora skryptu liczby powtórzeń. Do czego można ją wykorzystać? Poprzedni skrypt wyświetlał litery dysków w systemie. Oto, jak należałoby go zmodyfikować, by wyświetlał litery dysków sieciowych (których liczba może się zmieniać) i by wykonał tę operację np. ośmiokrotnie w odstępach godzinnych – listing 2.

Skupmy się tylko na różnicach między tym a poprzednim skryptem. Zwróć uwagę na zamieszczone w sekcji nagłówkowej: deklarację (z przypisaniem wartości) stałej Godzina w linii 4 (wartość to po prostu liczba milisekund, tak bowiem odlicza czas interpreter VBScriptu) oraz deklarację zmiennej i w linii 7, będącej po prostu licznikiem iteracji (liczby powtórzeń pętli For … Next). Ponadto uległa zmianie wartość stałej DriveType (skrypt ma tym razem wypisywać litery dysków sieciowych).


Pętla For … Next „otacza” wcześniej utworzoną pętlę wypisującą litery dysków. W linii 11 jest określana liczba powtórzeń (osiem).


W linii 15 za pomocą obiektu WScript.Echo jest wyświetlany komunikat informujący o zakończeniu i-tego przebiegu skryptu.


Natomiast w linii 16 skrypt zostaje zatrzymany na czas (w milisekundach) określony przez stałą Godzina.

Po wykonaniu ośmiu powtórzeń skrypt kończy działanie.