Основное меню
Главная
Написать мне
Гостевая
Новости сайта

Статьи
О Языках программирования
Delphi
Visual Basic
JavaScript
VBScript

Мои программы
CLOCK
CD-organizer
VBS. Основы

VBS. Основы


О том, что такое VBS и что оно из себя представляет можете прочитать статью About VBScript, а сейчас сразу начнём "действовать" :-) Сперва, нам надо писать тег <SCRIPT> и </SCRIPT>, для того, чтобы между ними написать сам сценарий. У тега <SCRIPT> есть 2 основных атрибута:

- LANGUAGE - он нужен для тошо чтобы браузер понял какой язык мы используем. И там надо написать VBScript или просто VBS.

- RUNAT это для того, чтобы указать место исполнения сценария - на сервере, или в браузере, но мы этот атрибут писать не будем, а если этот атрибут опустить, то по умолчанию всё будет выполнятся в браузере.

Поехали дальше. Много где написано, что код сценария нодо заключать в теги <!-- и -->, для того чтобы скрыть код от старых браузеров, которые не поддерживают язык VBScript, но можно и не писать эти теги, т.к. сейчас, в наше время, никто с такими старыми браузерами в и-нете не лазят, хотя кто его знает :-)...

Примеры:

<SCRIPT LANGUAGE="VBS">
  Sub baton_OnClick
   Alert "Тыкни себе по носу!"
  End Sub
</SCRIPT>

Это у нас код скрипта, который при нажатии на пимпу с именем baton выводит сообщение "Тыкни себе по носу!"... Теперь надо сделать кнопку с именем button

<input type="button" name="baton" value="ПИМПА">

Вот и всё! Вот Этот пример:



Натыкался? :-) Ну тогда поехали дальше! Так... Теперь я покажу интересный примерчик(на мой взгляд)...

<SCRIPT LANGUAGE="VBS">
  Sub testSub
    Alert "Дарова, пельмень!"
  End Sub
</SCRIPT>
<INPUT type="button" name="baton1" value="OnClick" onclick="testSub">
<INPUT type="button" name="baton2" value="onMouseOver" onmouseover="testSub">

Вот приведённый пример:



Так, давай разберёмся в этом примере.... У нас написана процедура testSub, которая выводит сообщение, потом мы добавили 2 кнопки, и у каждой кнопки есть свои события, (у одной OnClick (когда кликаешь), а у другой OnMouseOver(это когда наводишь мышку на элмент)), которые вызавают процедуру testSub...

Всё очень легко!