Руководство по созданию web приложений. Программирование

Программирование >> Руководство по созданию web приложений

1 ... 52 53 54 [ 55 ] 56 57 58 ... 141

Исходный текст хранимой процедуры приведен в листинге 4-10.

Листинг 4-10 Вы найдете в файле сМ1 Сна

прилагаемом к книге компакт-диске.

Процедура ClientLogin имеет ; : входных параметра SUser и @Pass и один

CREATE PROCEDURE ClientLogin output AS

SELECT - . CD FROM clients WHERE AND - -----

clients SET WHERE

С оператора SELECT процедура выбирает ....... ; -

теля из столбца . irlu таблицы clients так, чтобы идентификатор, занисанный в этом столбце, совпадал с содержимым параметра Кроме того, проверя-

ется совпадение пароля . ;.. (хранящегося ;. столбце Password) и содержимого переменной

Если в результате такого запроса в таблице clients найдена под-

ходящая запись, считается, что аутентификация нрощда успещно. С помощью оператора UPDATE процедура ClientEogin ги i поле EastEogin найденного

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

Определение фреймов главной страницы

После уснещной аутентификации страница enter.asp загружает в окно браузера посетителя страницу . . фреймов покупателя с именем

Исходный текст этой подготовленной при помощи Microsoft

FrontPage, Вы найдете в листинге

Листинг 4-11 хранится в файле на прилагаемом к

книге компакт-диске.

С помощью тегов <гПА11Е5ЕТ> и <FRAME> мы определили три фрейма с именами left, rtop и <frameset

<frameset

<р>Для посещения нашего сервера нужен браузер, способный работать с фреймами. <./р>

</noframes>

Фрейм left загружается страницей . содержащей команды а

покупателя - Выход и Оплатить покупки. Фрейм rtop используется для отобра-

списка книг, . в . и загружается страницей

И наконец, фрейм rbottom используется для показа содержимого корзины с

отобранными посетителем для . Он загружается страницей

order.asp с параметром FIRST. . (о этого параметра Вы

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

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

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

других приложения файлы lieadcr.asp и footer.asp - при

помощи оператора доступного в страницах ASP:

<%6 LANGUAGE = Мбатр-г !>

ffiiKlua- ->

<head>

тексты этих файлов приведены в . (листинги 3-19

и 3-20), поэтому мы не будем здесь их что при

любой страницы, в начало которой вставлен файл header.asp, в проверка переменной сеанса с именем Ок. Если

ция пользователя прощла сценарий файла header.asp вставляет в до-

кумент теги <tii и а при - тег <МЕТА>, направ-

ляющий браузер на ,

В результате все, что увидит попытавщийся загрузить

в окно своего браузера страницу main.asp. это страница . с иредложе-

нием ввести идентификатор и пароль или регистрацию.

Страница меню команд

в левом фрейме страницы приложения : расположено команд,

состоящее из двух ссылок - Выход и Оплатить покупки. Исходный текст данного фрейма Вы в

Листинг 4-12 хранится в файле ch4\BookShopClient\toc.asp на прилагаемом к книге компакт-диске.

Ссылка Выход отправляет покупателя на страницу ввести идентификатор и зарегистрированного покупателя или выпол-

нить регистрацию нового покупателя.

<а зр-

Ссылка Оплатить покупки используется для загрузки страницы на которой реализуется процесс оплаты. <а

покупки</а></р>

Страница просмотра списка книг

На просмотра списка книг, в файле (лис-

тинг 4-13) посетитель может отобрать понравившиеся ему книги. Эта страница формируется из таблицы books, содержимое которой готовится сотрудниками Интернет-магазина с помощью административного приложения.

Листинг 4-13 хранится в файле ch ftHopkSh на прилагае-

мом к книге компакт-диске.

Особенностью расположенного на этой является работа

с набором Recordset, полученным в выполнения хранимой

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

ко что рассмотренном на странице enter.asp:

connect =

= 15;

= 10;

Теперь на возвращающую

таблицы books. Вместо того чтобы создавать команду, определять ее параметры и методом Execute, как это делалось раньше, мы другой метод для запуска хранимой процедуры. Набор записей создается лу.чии образом при помощи метода CreateObject объектаЗегуег: rs =

Далее мы его открываем, методу Open объекта Recordset имя

хранимой процедуры , соединение с источником данных con-

nect и другие параметры:

connect,

Константа adOpenForwardOnly, передаваемая методу Open в третьего

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

adEockReadOnly сообщает ADO, что полученный набор записей изменяться не будет, поэтому его не нужно блокировать.

И наконец, константа adCmdS tore dProc, передаваемая методу Open через nd следний параметр, указывает, что первый параметр метода задает имя хранимой процедуры, подлежащей выполнению.

После записей мы проверяем свойство ЕОЕ. Если оно хра-

нит True, это означает что полученный набор записей пуст. В .этом слу-

чае вместо списка книг в верхнем правом фрейме появляется ; записей :

<TRXTD C0LSPAN=4

else i I

1 ... 52 53 54 [ 55 ] 56 57 58 ... 141