Ako ste do sada radili u Visual Basic-u, tajmer ste sigurno koristili svaki put kada u određeno vreme treba da „okinete“ neki događaj. Tajmer u VBScript-u nije isti kao kod Visual Basic-a. Ovde se radi o tzv. time-out tipu tajmera, koji u stvari služi za merenje isteka vremena. U praksi, tajmeru dodelite neko vreme, a on će nakon njegovog isteka „okinuti“ neki događaj, i to samo jednom. Ovim tajmerom recimo možete korisnicima ostaviti na raspolaganju određeno vreme za popunu formulara pre nego što mu ponudite pomoć, ili na primer za prikaz poruke u statusnoj liniji na nekoliko sekundi. Takođe, opcija može poslužiti i za slide-show vaših stranica, tako da se menja stranica na svakih 10 sekundi.
Za podešavanje tajmera koristi se metoda setTimeOut objekta window, a za poništavanje metoda clearTimeOut. Predstavićemo vam i sintaksu ove metode:
sat = setTimeOut "Naziv", Vreme
clearTimeOut sat
Varijabla sat služi za smeštanje ID-a tajmera, a ovaj ID vam je potreban za poništenje tajmera pre nego što istekne njegovo postavljeno vreme. Naziv predstavlja naziv potprocedure koju ćete pozvati kada istekne vreme tajmera, a kod identifikatora procedure morate postaviti navodnike. Parametar Vreme predstavlja količinu vremena, izraženu u milisekundama, za koju tajmer treba da sačeka da bi odradio.
U narednom primeru videćemo kako se koristi tajmer objekta window. U skriptu ćemo podesiti tajmer na 5 sekundi, što znači da će se nakon učitavanja stranice u browser, u roku od 5 sekundi odigrati neki događaj. ID tajmera ćemo smestiti u varijablu intTajmerID. Kada tajmer odradi, pozvaće proceduru koja će prikazati jednostavnu poruku.
<HTML>
<SCRIPT LANGUAGE="VBScript">
<!–
Dim intTajmerIDSub Poruka
alert "Ovo je poruka iz VBScripta!"
End SubintTajmerID = setTimeOut( "Poruka", 5000,"VBScript" )
–>
</SCRIPT>
Za oko 5 sekundi videcete poruku.
</HTML>
Pratite Krstaricu na www.krstarica.com