Сравнительный анализ JavaScript и VBScript. VBScript. Основы VBScript

Dynamik HTML
© Питер, 2000

Обработка массивов

Dim -- объявляет переменную-массив. Она может быть статической с постоянным количеством элементов или динамической и может иметь до 60 измерений.
ReDim -- используется для изменения размера переменной-массива, объявленной как динамическая.
Preserve -- ключевое слово, используемое для сохранения содержимого массива при изменении его размера. Если вы используете это слово, вы можете изменять лишь элементы, находящиеся справа.

Dim strEmpl ()
ReDim strEmlp (9 , 1)

strEmpl (9 , 1) = "Phil"

ReDim strEmpl (9 , 2) " теряем содержимое элемента (9 , 1)
strEmpl (9 , 2) = "Paul"

ReDim Preserve strEmpl (9 , 3) " сохраняем содержимое элемента (9 , 2)
strEmpl (9 , 2) = "Smith"

LBound -- возвращает наименьший индех для данного массива. Учитывая, что массивы всегда начинаются с нулевого элемента, данная функция всегда будет возвращать ноль.
UBound -- используется для задания размера массива.

Dim strCustom (10,5)
intSizeFirst = UBound (strCustom , 1) " присваиваем значение 10 переменной SizeFirst
intSizeSecond = UBound (strCustom , 2) " присваиваем значение 5 переменной SizeSecond

Операторы присваивания

Let -- используется для присваивания переменной значения (необязателен)
Set -- используется для присваивания переменной ссылки на объект.

Let intNumberOf Days = 365
Let txtTextBox = txtControl
txtTextBox.Value = "Привет Всем!"

Управляющие операнды

For ... Next - выполняет часть кода заданное число раз.

For Each ... Next Statement - выполняет часть кода для всех элементов массива или коллекции.

Do ... Loop - выполняет часть кода до тех пор, пока условие выполняется, или до тех пор, пока оно не станет выполнятся (в зависимости от конструкции).

If ... Then ... Else - используется для запуска различных блоков кода при выполнении различных условий.

Select Case - используется для замены оператора If ... Then ... Else при большом количестве условий.

While ... WEnd - выполняет блок кода, пока выполняется условие.

Объявление переменных

Dim -- объявляет переменную.

Обработка ошибок

On Error Resume Next - указывает, что при появлении ошибки необходимо ее игнорировать и начать дальнейшую обработку кода со следующей строки.
Err - объект error , содержащий информацию об ошибках выполнения.

Возможности для обработки ошибок в VBScript ограничены, и для выяснения, произошла ли ошибка, необходимо явно проверять объект Err .

Операции ввода-вывода

Для вывода сообщений служит конструкция MsgBox , для ввода - InputBox .

MsgBox

Она выдает сообщение и может возвращать значение, показывающее, какая кнопка нажата.
MsgBox "Hello There", 35, "Hello Message"

Параметры:

"Hello There" -- содержит текст сообщения. Это обязательный параметр.
35 -- указывает, какие картинка и кнопки появятся в окне сообщения.
"Hello Message" -- текст заголовка окна сообщения.

Если добавить путь к файлу справки (например: "\win\help\MyHelp.hlp"), то в окне появится кнопка Help и определяется, какой файл справки будет вызван при ее нажатии.

Значения пареметра, определяющего картинку и кнопки:

Для задания конкретной картинки и кнопок необходимо сложить соответствующие величины. Так, в примере сложили 32+3 для изображения кнопок Да, Нет и Отмена, где Да - активна по умолчанию, и картинка вопроса.

Можно определить, какая кнопка нажат, присвоив значение, возвращенное функцией MsgBox переменной:

intButtonClicked = MsgBox ("Hello There", 35, "Hello Message")

Заметим, что при использовании такой инструкции параметры функции заключены в скобки. В следующей таблице показаны значения, присваемые при этом переменной intButtonClicked .

InputBox

Воспринимает текстовую запись пользователя и передает ее коду как строку.
strEntered=InputBox ("Введите ваше имя, пожалуйста", "Login", "Джон Смит", 500, 500)
MsgBox "Hello There" & strEntered, 35, "Hello Message"

"Введите ваше имя, пожалуйста" - строка, показываемая в окне ввода.
"Login" - сообщение в заголовке.
"Джон Смит" - значение, определенное по умолчанию для поля ввода.
500 - определяет координату по горизонтали окна ввода.
500 - определяет координату по вертикали окна ввода.

Аналогично можно задать файл подсказки и кнопку для его вызова.

Процедуры

Call - необязательный метод для вызова подпрограммы.
Function - используется для объявления функции.
Sub - используется для объявления подпрограммы.

В данном примере инструкция Function используется для объявления имени, аргументов и кода, составляющих основу процедуры Function.

В данном примере инструкция Sub используется для описания имени, аргументов и кода, составляющих основу процедуры Sub.

Другие ключевые слова

Rem - старый метод для добавления комментариев в код.
Option Explicit - заставляет объявлять переменную до того, как она может быть использована.

А так же на страницах сайта можно прочесть о VBScript:
Константы | Учебник по VBScript | Функции | Коды ошибок выполнения На главную |

Хотя в VBScript определен только один тип

Таблица П2.1. Подтипы данных

В переменную, которая была ранее объявлена с использованием ключевого слова

Set FSO=CreateObject("Scripting.FileSystemObject")

Здесь функция

Пользовательские константы в VBScript объявляются с помощью ключевого слова

Const MyConst="Это моя константа"

Кроме этого, VBScript поддерживает много встроенных именованных констант (их не нужно дополнительно объявлять в сценарии), применение которых упрощает использование различных внутренних функций (например,

Таблица П2.2. Константы для обозначения цветов

Таблица П2.3. Константы для нумерации дней недели

Таблица П2.4. Константы для определения первого дня в неделе и первой недели в году

Таблица П2.5. Константы для работы с датой и временем

Таблица П2.6. Константы для диалоговых окон

Таблица П2.7. Результаты нажатия кнопок в диалоговых окнах

Таблица П2.8. Константы для обозначения подтипов данных

Таблица П2.9. Прочие константы

Массивы в VBScript могут быть двух видов: статические (фиксированной длины) и динамические (переменной длины). Объявляются массивы, как и обычные переменные, с помощью ключевого слова

Для объявления статического массива нужно после его названия указать в круглых скобках наибольшее значение, которое может принимать индекс элемента в этом массиве, например:

В языке VBScript (в отличие, например, от VBA) нумерация в массивах всегда начинается с нуля, поэтому объявленный выше массив

Можно объявить двумерный массив, указав максимальные значения индексов для строк и столбцов соответственно, например:

Dim MyArr(5, 10) "Массив из 6 строк и одиннадцати столбцов

При объявлении динамического массива его размеры в круглых скобках не указываются:

Для использования динамического массива в сценарии применяется оператор

После этого к элементам динамического массива можно обращаться так же, как и к элементам обычного:

MyArr(0)="Это первый элемент"

MyArr(1)="Это второй элемент"

Отметим, что размеры динамического массива можно менять неоднократно (с помощью того же

В VBScript поддерживаются операторы нескольких типов, которые описаны ниже.

Арифметические операторы языка VBScript представлены в табл. П2.10.

Таблица П2.10. Арифметические операторы

Операторы отношения используются для сравнения значений двух переменных. Эти операторы, описанные в табл. П2.11, могут возвращать только логические значения

Таблица П2.11. Операторы отношения

Также внутри условных операторов могут применяться логические операторы (табл. П2.12).

Таблица П2.12. Логические операторы

В VBScript поддерживается условный оператор

If условие_1 Then

выражение_3 ]

При выполнении оператора

Другим оператором, позволяющим производить выбор из нескольких вариантов, является

Select Case выражение

Case значение_1

выражение_3 ]

Здесь сначала вычисляется значение , которое затем по очереди сравнивается со значениями, стоящими после ключевых слов

Color = "Цвет непонятен"

В VBScript поддерживаются несколько типов циклов: цикл

В общем случае оператор цикла

For counter=start То end

Параметр здесь является счетчиком цикла;

Пример использования цикла

"Цикл выполнится 11 раз

Оператор цикла

For Each element In group

Здесь параметр является переменной, в которую будет записываться значение текущего элемента массива или коллекции при итерациях; - имя массива или коллекции объектов.

Замечание

Напомним, что в JScript для перебора всех элементов коллекции необходимо использовать вспомогательный объект

.

С помощью оператора

Пример использования цикла

"Объявляем переменные

Dim FSO, Folder, Files, File, s

s = "Список файлов" & vbCrLf

"Создаем объект FileSystemObject

Set FSO = CreateObject("Scripting.FileSystemObject")

" Создаем объект Folder для корневого каталога диска С:

Set Folder = FSO.GetFolder("C:\")

"Создаем коллекцию Files всех файлов в корневом каталоге диска С:

"Перебираем все элементы коллекции Files

"Выделяем имя файла для текущего элемента File коллекции

"Выводим сформированную строку на экран

Таким образом, в цикле

Пример использования цикла

theCount = 42 "Начальное значение счетчика цикла

theMoments = "До взрыва осталось " & theCount & " сек!"

theMoments = "Осталась секунда!"

theCount = theCount - 1 "Уменьшаем значение счетчика

Этот цикл может применяться в двух видах (с предусловием, которое проверяется до начала очередной итерации, и с пост-условием, которое проверяется после окончания итерации):

Do условие

Loop условие

Если в цикле используется ключевое слово

Оператор

Пример использования цикла

Dim howFar "Верхний предел для счетчика цикла

Dim sum(10) "Массив из 11 элементов, индексы от 0 до 10

"Цикл выполнится 11 раз

Рассмотрим еще несколько часто применяемых операторов (табл. П2.13).

Таблица П2.13. Прочие операторы

Режим обработки исключительных ситуаций в VBScript включается с помощью оператора

Для анализа ошибок используется специальный объект

В качестве примера приведем часть сценария, в которой происходит обработка исключительных ситуаций при подключении сетевого диска:

On Error Resume Next " Включаем обработку ошибок времени выполнения

" Подключаем сетевой диск

WshNetwork.MapNetworkDrive Drive, NetPath

Mess="Ошибка при подключении диска " & Drive & " к " & NetPath &_

"Код ошибки: " & е.number & "Описание: " & е.description

WshShell.Popup Mess, 0, "Подключение сетевого диска", vbCritical

Mess = "Диск " & Drive & " успешно подключен к " & NetPath

WshShell.Popup Mess, 0, "Подключение сетевого диска", vbInformation

Для отмены режима обработки исключительных ситуаций нужно выполнить оператор

VBScript поддерживаются два вида подпрограмм: встроенные функции и функции или процедуры пользователя.

Имеющиеся в VBScript функции, предназначенные для математических вычислений, описаны в табл. П2.14.

Таблица П2.14. Математические функции

Наиболее часто используемые функции, с помощью которых можно производить различные операции над символьными строками, описаны в табл. П2.15.

Таблица П2.15. Символьные функции

Для работы с датой и временем в VBScript имеется большой набор функций, основные из которых приведены в табл. П2.16.

Таблица П2.16. Функции для работы с датой и временем

В этом начальном уроке, мы изучим синтаксис vbscript языка. Синтаксис языка vbscript является таким же как и в языке Visual Basic и фактически, является подмножеством данного языка программирования. Основной упор в использовании vbscript – это возможность написания сценариев (расширение vbs) с открытым кодом для платформы Windows. Пользователю не нужно прибегать к установке дополнительного программного обеспечения, так как все сценарии выполняются под управлением сервера сценариев .

И так, давайте рассмотрим базовый синтаксис vbscipt и его возможности.

• Комментарии – для комментирования строк кода можно использовать ключевое слово REM , или одинарную кавычку (").
• Строки кода – что бы произвести перенос одной строки на несколько, используется символ подчёркивания.
• Переменные – для объявления переменных используется ключевое слово Dim . Более детально, работу с ними я рассмотрел в статье " "

Можно прописать несколько операторов в одну строчку, для этого используется знак двоеточия (:). Сам язык нечувствителен к регистру символов.

Хорошо, давайте рассмотрим синтаксис языка vbscript на таком примере:

Видим, что тут, мы вначале прописали комментарии, далее объявили три переменные. Как видим, язык vbscript не требует назначения типа данных (более детально, работу с типами данных я рассмотрел в статье – " "). В конце, для вывода данных мы использовали функцию MsgBox, в данном случае она прописана в упрощенном варианте. Давайте рассмотрим ее полный синтаксис:

MsgBox(prompt[, buttons] [, title ][, helpfile, context ]) – видим, что тут, функции передаются пять параметров, последние два мы рассматривать не будет, так как они не являются актуальными и практически не применяются.

• prompt – собственно, сообщение, которое надо вывести
• buttons – позволяет задать дополнительные кнопки, их значения указываются через константы
• title – заголовок окна

Работу с данной функцией я более детально рассмотрел в статье " ".

Язык vbscript предоставляют также функции для работы со строками и датой, а также, ряд математических функций.

Конечно, синтаксис vbscript позволяет пользователю создавать собственные процедуры и функции. Для определения процедуры, т. е. подпрограммы, которая не возвращает никакого значения, в VBScript используется конструкция Sub ... End Sub . После ключевого слова Sub идёт имя процедуры, а в круглых скобках указывается список её пара­метров, например:

Sub MyProcedure(Param1, Param2)
Строки кода
End Sub

Если процедура не имеет параметров, то в скобках после имени ничего ука­зывать не нужно:

Sub MyProcedure()
…

End Sub

Вызывать процедуру из сценария можно двумя способами. Во-первых, мож­но просто написать имя и указать через пробел список передаваемых параметров, например: MyProcedure 3,10. Во-вторых, можно использовать специальный оператор Call , при этом спи­сок параметров обязательно должен быть заключен в круглые скобки: Call MyProcedure(3,10) .

Для определения функции, т. е. подпрограммы, которая возвращает опреде­ленное значение, применяется конструкция Function ... End Function . Как и при описании процедур, после названия функции в круглых скобках указывается список её параметров, например:

Function MyFunction(Param1, Param2) … End Function

Для того чтобы возвратить из функции какое-либо значение, нужно внутри неё присвоить это значение переменной, название которой совпадает с именем функции:

Function MyFunction(Param1, Param2)
Dim Sum
Sum = Paraml+Param2
MyFunction = Sum
End Function

Если возвращаемое функцией значение не нужно присваивать никакой пе­ременной, то функция вызывается так же, как и процедура - пишется имя этой функции и через пробел указывается список ее аргументов: MyFunction 3,5

Если же необходимо записать значение в какую-либо переменную, то аргументы функции заключаются в круглые скобки.

Вот простой пример синтаксиса vbscript для использования собственных процедур и функций:

Помимо процедур и функций, можно создавать собственные массивы (

синтаксический программирование оператор скрипт

В VBScript предусмотрено два типа процедур: процедуры (subroutines) - ключевое слово Sub, и функции (functions) - обозначаются ключевым словом Function. Единственное отличие - функции возвращают какое-либо значение. В обоих случаях процедуры - это блок программного кода. Определение процедуры или функции должно заканчиваться ключевыми словами End Sub или End Function Вызов процедуры или функции: Call имя_процедуры, слово Call можно пропустить. Параметры могут передаваться процедуре по ссылке или по значению. По ссылке - значение исходной переменной меняется, по значению - создается копия, а значение исходной переменной не меняется. По умолчанию в VBScript параметр передается по ссылке (ByRef). Если нужно передать по значению, можно использовать ключевое слово ByVal: Function имя_функции(ByVal имя_переменной)

Встроенные функции VBScript

• 1. Функции преобразования и проверки типов данных VBScript (C-convert, I-Is(type)):
  • * CBool() - преобразует переменную к типу Boolean;
  • * CByte() - преобразует переменную к типу Byte;
  • * CCur() - преобразует переменную к типу Currency;
  • * CDate() - преобразует переменную к типу Date;
  • * CDbl() - преобразует переменную к типу Double;
  • * CInt() - преобразует переменную к типу Integer;
  • * CLng() - преобразует переменную к типу Long;
  • * CSng() - преобразует переменную к типу Single;
  • * CStr() - преобразует переменную к типу String;
  • * TypeName() - которая возвращает имя используемого типа данных;
  • * IsNumeric();
  • * IsDate();
  • * IsArray();
  • * IsEmpty();
  • * IsError();
  • * IsMissing();
  • * IsNull();
  • * IsObject();
  • * Hex() - преобразовывают десятичные данные в строковое представление шестнадцатеричных значений;
  • * Oct() - преобразовывают десятичные данные в строковое представление восьмеричных значений.
• 2. Строковые функции (string functions) в VBScript:
  • * Asc() - возвращает числовой код символа;
  • * AscB() - возвращает первый байт числового кода символа;
  • * AscW() - возвращает код для символа в формате unicode;
  • * Chr(), ChrB(),ChrW() - возвращает символ по коду;
  • * InStr() - позволяет найти в теле строковой переменной последовательность символов и вернуть ее позицию. Поиск ведется с начала строки. Если ничего не найдено - возвращается 0;
  • * InStrRev() - выполняет то же самое что и InStr(), но поиск ведется с конца строки;
  • * Left() - позволяют взять из строковой последовательности указанное количество символов, считая слева;
  • * Right() - позволяют взять из строковой последовательности указанное количество символов, считая справа;
  • * Mid() - позволяют взять из строковой последовательности указанное количество символов, считая от указанной позиции;
  • * Len() - возвращает длину строки;
  • * LCase() - переводит строку в нижний регистр;
  • * UCase() - переводит строку в верхний регистр;
  • * LTrim() - убирает пробелы в начале строки;
  • * RTrim() - убирает пробелы в конце строки;
  • * Trim() - убирает пробелы в начале и конце строки;
  • * Replace() - производит замену подстроки на другую;
  • * Space() - возвращает строку указанной длины из пробелов;
  • * String() - возвращает строку указанной длинны из символов;
  • * StrComp() - сравнивает две строки;
  • * StrConv() - преобразует строку;
  • * StrReverse() - "переворачивает" последовательность символов строки в обратный порядок;
  • * Tab(). - вывод на экран указанного кол-ва символов табуляции (аналогично встроенной константе vbTab);
• 3. Числовые функции (numeric functions) в VBScript:
  • * Abs() - возвращает модуль числа;
  • * Int() - возвращает ближайшее целое;
  • * Fix() - отбрасывает дробную часть;
  • * Round() - округляет до указанного количества знаков после запятой;
  • * Rnd() и команда Randomize - используются для получения случайных значений. Синтаксис: случайное_число=Int(минимум + (Rnd()*максимум)). Перед использованием Rnd() необходимо инициализировать генератор случайных чисел командой Randomize;
  • * Sgn() - возвращает информацию о знаке числа. Возвращает -1 для отрицательного, +1 для положительного и 0 для 0.
• 4. Функции даты/времени (datetime functions) в VBScript:
  • * Date() - возвращает системную дату;
  • * Time() - возвращает системное время;
  • * Now() - возвращает дату и время. Установить их можно одноименными операторами, например: Date = #6/10/2009# (#Месяц/день/год#);
  • * DateAdd() - Добавляет к дате указанное число лет, месяцев и т.п.;
  • * DateDiff() - возвращает разницу между датами в единицах от лет до секунд;
  • * DatePart() - возвращает указанную часть даты (год, месяц, день недели и т.п.);
  • * DateSerial() - создает значение даты на основе передаваемых символьных значений. То же самое делает функция DateValue(), но при другом формате принимаемых значений. Аналогичным образом (для времени) работают TimeSerial() и TimeValue();
  • * Day() - возвращает день (аналогично соотв. DatePart());
  • * Year() - возвращает год;
  • * Month() - возвращает месяц;
  • * Weekday() - возвращает день недели;
  • * Hour() - возвращает час;
  • * Minute() - возвращает минуты;
  • * Second() - возвращает секунды;
  • * MonthName() - возвращает название месяца;
  • * Timer() - возвращает количество секунд, прошедших после полуночи.
• 5. Функции форматирования (formatting functions) в VBScript:
  • * Format() - синтаксис Format(выражение, "формат"), например: Format(2.505, "#,##0.00"). Аналогично для остальных функций;
  • * FormatNumber();
  • * FormatCurrency();
  • * FormatDateTime();
• 6. Функции для работы с массивами в VBScript:
  • * Array() - позволяет автоматически создать массив нужного размера и типа и сразу загрузить в него переданные значения;
  • * Filter() - позволяет на основе одного массива получить другой, отфильтровав в исходном массиве нужные нам элементы;
  • * LBound() - возвращают информацию о нижней границе массива (номер первого имеющегося в массиве значения);
  • * UBound() - возвращают информацию о верхней границе массива (номер последнего имеющегося в массиве значения)
  • * Join() - соединяет множество строк, составляющих массив, в одну строковую переменную. В качестве разделителя по умолчанию используется пробел, но можно указать и свой разделитель;
  • * Split() - функция, обратная Join().
• 7. Функции для взаимодействия с пользователем в VBScript:
  • * MsgBox(), константы +
  • * InputBox().

Пример использования MsgBox

Response = MsgBox("Нажмите кнопку", vbYesNo)

If Response = vbYes Then

" если нажали кнопу Yes

" если нажали кнопу No

Так же для взаимодействия с пользователем используются метод WshShell.Popup(), команда Beep.

Процедура sub выполняет последовательность действий, но не возвращает никакого, значения, ассоциированного с ее именем. Она имеет следующий синтаксис:

sub имя_процедуры ([список-параметров])

операторы

Через необязательный параметр можно передать в процедуру внешние данные или, наоборот, получить некоторые вычисленные ею значения.

Вызов процедуры sub осуществляется оператором call, после которого указывается имя процедуры и в круглых скобках параметры. Процедуру можно вызвать и простым указанием ее имени, но в этом случае передаваемые ей параметры задаются без скобок. Следующие два способа вызова процедуры эквивалентны:

call MyProc(firstarg, secondarg)

MyProc firstarg, secondarg

Функция также выполняет определенную последовательность операторов и ей можно передать внешние данные через параметры процедуры, но, в отличие от процедуры sub, она возвращает значение, присваиваемое ее имени, и может быть использована в выражениях VBScript. Она имеет следующий синтаксис:

function имя_процедуры ([список-параметров])

операторы

имя_процедуры = значение

В операторах процедуры обязательно должен присутствовать оператор присвоения имени процедуры некоторого значения.

VBScript предоставляет два способа передачи параметров в процедуру:

По значению

Способ передачи параметров по ссылке, применяемый по умолчанию, передает фактический адрес переменной, используемой в качестве параметра. Это позволяет изменить содержимое соответствующего адреса памяти, а тем самым, и значение переменной.

Передача параметров по значению предполагает передачу в процедуру копии переменной, а не адреса самой переменной. Поэтому любые изменения параметра внутри процедуры воздействуют на копию, а не на саму переменную, и, следовательно, значение переменной, переданной в качестве параметра, изменяться не будет. Для указания интерпретатору, что параметр передается в процедуру по значению, используется ключевое слово ByVal, задаваемое перед параметром в описании процедуры.

6 Объекты

6.1 JavaScript

На самом верхнем уровне иерархии находится объект window, представляющий окно браузера и являющийся “родителем” всех остальных объектов. Расположенные ниже в иерархии объекты могут иметь свои подчиненные объекты.

Особняком стоит объект navigator с двумя дочерними (подчиненными) объектами. Он относится к самому браузеру, и его свойства позволяют определить характеристики программы просмотра.

Каждая страница в добавление к объекту navigator обязательно имеет еще четыре объекта:

window – объект верхнего уровня, свойства которого применяются ко всему окну, в котором отображается документ.

document – свойства которого определяются содержимым самого документа: связи, цвет фона, формы и т.д.

location – свойства которого связаны с URL-адресом отображаемого документа.

history – представляет адреса ранее загружавшихся HTML-страниц.

Кроме указанных объектов страница может иметь дополнительные объекты, зависящие от ее содержимого, которые являются дочерними объектами объекта document. Если на страницы расположена форма, то все ее элементы являются дочерними объектами этой формы. Для задания точного имени объекта используется точечная нотация с полным указанием всей цепочки наследования объекта. Это возможно, так как объект верхнего уровня имеет свойство, значением которого является объект нижнего уровня. Ссылка на объект осуществляется по имени, заданному параметром NAME тэга HTML.