Чтение онлайн

на главную - закладки

Жанры

Windows Script Host для Windows 2000/XP

Попов Андрей Викторович

Шрифт:

SOut+="\nИ "+NomRecs+" ЗАПИСЬ(ЕЙ)";

//Закрываем объект Recordset

RS.Close;

//Выводим на экран строку SOut

WScript.Echo(SOut);

Листинг 9.4. Получение информации о полях таблицы

/*******************************************************************/

/* Имя: TableInfo.js */

/* Язык: JScript */

/*
Описание: Получение информации о полях таблицы */

/*******************************************************************/

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

var

 RS, //Экземпляр объекта Recordset

 SSource, //Строка с текстом SQL-запроса к БД

 SConnect, //Строка с параметрами соединения с БД

 SOut, //Строка, в которой сохраняется выходная информация

 NomField, //Количество полей в таблице

 NomRecs, //Количество записей в таблице

 i;

//Формируем SQL-запрос к таблице Phone

SSource = "SELECT * FROM Phone";

//Формируем строку с параметрами соединения с БД

//(указываем нужный DSN)

SConnect = "DSN=PhoneDS";

//Создаем объект Recordset

RS=WScript.CreateObject("ADODB.Recordset");

//Задаем статический курсор

RS.CursorType = 3;

//Открываем набор записей-результат запроса

RS.Open(SSource,SConnect);

//Определяем число полей в наборе данных RS

NomFields = RS.Fields.Count;

//Определяем число записей в наборе данных RS

NomRecs = RS.RecordCount;

SOut="ТАБЛИЦА Phone СОДЕРЖИТ "+NomFields+" ПОЛЯ(ЕЙ):\n\n";

//Перебираем все поля набора данных RS

for (i=0; i<RS.Fields.Count; i++) {

 //Формируем строку с номером и именем поля таблицы

 SOut+="Поле N "+i+": "+RS.Fields(i).Name+"\n";

}

SOut+="\nИ "+NomRecs+" ЗАПИСЬ(ЕЙ)";

//Закрываем объект Recordset

RS.Close;

//Выводим на экран строку SOut

WScript.Echo(SOut);

/************* Конец *********************************************/

Сортировка записей в таблице 

Используя предложение

ORDER BY
в операторе
SELECT
, можно получить из
источника данных записи, отсортированные по какому-либо полю. Например, следующий SQL-запрос

SELECT * FROM Phone ORDER BY LastName

вернет упорядоченный по полю

LastName
набор, содержащий все записи из таблицы Phone (рис. 9.12).

Рис. 9.12. Сортировка записей таблицы Phone по полю LastName

Мы напишем сценарий SortRecords.wsf, с помощью которого можно будет выводить записи из таблицы Phone, отсортированные либо по фамилии (поле

LastName
), либо по телефону (поле
Phone
). Выбор осуществляется с помощью ввода соответствующего значения в диалоговом окне (рис. 9.13).

Рис. 9.13. Выбор поля для сортировки

Само диалоговое окно реализуется с помощью VBScript-функции

WSHInputBox(Message, Title)
:

Function WSHInputBox(Message, Title)

 'Выводим диалоговое окно со строкой ввода

 WSHInputBox = InputBox(Message,Title)

End Function

Эта функция вызывается из написанной на JScript части сценария следующим образом:

//Формируем текст сообщения в диалоговом окне ввода

SMenu="1 - Сортировка по фамилии\n";

SMenu+="2 - Сортировка по телефону\n";

SMenu+="\n\nКоманда:";

//Выводим диалоговое окно для ввода режима сортировки

Res=WSHInputBox(SMenu, "Работа с базой данных");

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

Res
и анализируется в операторе
switch
:

//Анализируем введенное значение

switch (Res) {

case "1": {

 SSort="LastName";

 break;

}

case "2": {

 SSort="Phone";

 break;

}

default: {

 WScript.Echo("Вы ввели неправильное значение!");

 WScript.Quit;

}

}

После того как в переменную

SSort
занесено имя поля, по которому нужно производить сортировку, мы можем полностью сформировать нужный SQL-запрос к таблице Phone:

Поделиться:
Популярные книги

Острова

Орлов Алекс
5. Бронебойщик
Фантастика:
боевая фантастика
8.41
рейтинг книги
Острова

Чёрная магия (Сборник)

Гейман Нил
Шедевры фантастики
Фантастика:
фэнтези
6.40
рейтинг книги
Чёрная магия (Сборник)

Искатели приключений

Роббинс Гарольд
Проза:
классическая проза
8.33
рейтинг книги
Искатели приключений

Верность

Романовский Адриан Адамович
Приключения:
исторические приключения
морские приключения
5.00
рейтинг книги
Верность

Том 6 (доп.). История любовная

Шмелев Иван Сергеевич
6. И. Шмелев. Собрание сочинений в 5 томах
Проза:
классическая проза
4.20
рейтинг книги
Том 6 (доп.). История любовная

Вечный. Книга II

Рокотов Алексей
2. Вечный
Фантастика:
боевая фантастика
попаданцы
рпг
5.00
рейтинг книги
Вечный. Книга II

Счастливый ребенок. Универсальные правила

Курпатов Андрей Владимирович
Универсальные правила
Дом и Семья:
воспитание детей
здоровье детей
5.00
рейтинг книги
Счастливый ребенок. Универсальные правила

Ксения

Зиминоид
Любовные романы:
современные любовные романы
5.00
рейтинг книги
Ксения

Воронцов. Перезагрузка. Книга 2

Тарасов Ник
2. Воронцов. Перезагрузка
Фантастика:
попаданцы
альтернативная история
фэнтези
5.00
рейтинг книги
Воронцов. Перезагрузка. Книга 2

Перезагрузка

Поселягин Владимир Геннадьевич
6. Дитё
Фантастика:
боевая фантастика
7.62
рейтинг книги
Перезагрузка

Острова в океане

Хемингуэй Эрнест Миллер
Книга на все времена
Проза:
классическая проза
6.60
рейтинг книги
Острова в океане

Ученик афериста

Lexie Greenstwater
Проза:
современная проза
5.00
рейтинг книги
Ученик афериста

Первый среди равных. Книга III

Бор Жорж
3. Первый среди Равных
Фантастика:
попаданцы
аниме
фэнтези
6.00
рейтинг книги
Первый среди равных. Книга III

Двенадцатая реинкарнация. Трилогия

Богдашов Сергей Александрович
Фантастика:
боевая фантастика
5.60
рейтинг книги
Двенадцатая реинкарнация. Трилогия