О том, что такое 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...