Для того чтобы переменная была видна во всех процедурах, ее нужно описать вне этих процедур. В противном случае, ее область действия (область видимости) ограничивается рамками этой процедуры.
<HTML> <HEAD> <TITLE>Пример использования области видимости переменных.</TITLE> <SCRIPT LANGUAGE=VBScript> <!-- X=0'Начальное значение переменной. Sub Button1_OnClick() X=X+1 'Увеличение переменной на единицу. Alert X 'Вывод ее значения на экран. End Sub '--> </SCRIPT> </HEAD> <BODY> <H2> Иллюстрация использования области видимости.</H2> Переменной Х было присвоено значение 0 при загрузке документа. При нажатии кнопки значение этой переменной увеличивается на единицу и выводится в диалоговом окне.<BR> <FORM> <INPUT TYPE=BUTTON NAME=BUTTON1 VALUE="Нажмите кнопку"> </FORM> </BODY> </HTML>
Результат работы приложения на рисунке 1:
Рис.1. Пример использования области видимости переменных.