-аТОа

<INPOT

а/Т0></ТП><ТП><Т[;>1э1 </Т0><Т1 <1=1 аааувпе, Val .jaI>a;/TO></TR>

<Х

павастна }

aipae IP при aei вагваавиа/ТВ

</Ша<11

х>

</TDX/TRXTRXTD>&nbsp;

var Email =

Email , ; : 80,

cma.ExecutciJ;

Обратите внимание, как мы : . . параметры хранимой процеду-

ры, имеющие отношение к данным . типов.

Для целых чисел мы указываем константу : :- текстовые строки передаются г .:. . константы adVarChar, а для передачи денежных данных применяется константа .ICjrruncy И наконец, отметка о времени передается с использованием константы adDBTiaeStamu,

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

<FORM . - .

; учетной записи посетителя

<ТАВ1Е - . .-

<INPUT

SELECT Ч : - - . . . - -clients WHERE

Исходный текст страницы Update User.asp, выполняющей обновление

записи показан в листинге 4-55.

Листинг 4-55 Вы найдете в файле 3-1\BookShop\UpdateU ier а р на прилагаемом к книге компакт-диске.

<1 LANGUAGE

flinclude ->

< : . а* ->

в своей работы серверный сценарий, расположенный на этой страни-

laa проверяет пряпя пользователя. Мы разрешаем изменять учетные записи покупателей только администраторам.

Далее сценарий вызывает - процедуру Set Use г Data, передавая ей входные . идентификатор пользователя и обновленное содержи-

мое полей учетной var rs, connect;

connect = - . -- :i ,DODB Carincctian );

= 15; ;. = 10;

cmd =

= SetUserData ;

= connect;

После того как : отредактирует учетную запись поку-

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

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

Листинг 4-54 Вы найдете в файле cti4\Bi. ptsWbo.GelUeer. РЯС на

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

Эта процедура просто выбирает пояя записи пользователя, возвращая их через выходные параметры.

CREATE PROCEDURE GetUser - int, - - -а output, tPass varcnariSO.)

output, - . varchar(50) output, ... . . iHeB,lsterOatrj aatetlae

output, varchar(15) . varchar(80) output AS

SELECT - .-a :

3, 1, 4,

Name , 200, 1, 20,

¥аг Pass=cid, CreaTePara.iciu

Pass , 200, 1, 20, Heqa48t(-aiii i{1));

Email , 200, 1, 80,

После обновления записи мы попадаем на страницу GetSearch-

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

res(ar(:

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

Листинг 4-56 Вы найдете в файле ch4\BookShopScripts\dbo.SetUserData.PRC на прилагаемом к книге компакт-диске.

Она обновляет поля таблицы clients полученными через свои

параметры:

CREATE PROCEDURE а . int,

- AS

OPDATE clients SET : : WHERE CliaatIO=siD

Работа с ADO в приложениях С++

Объектная модель ADO создавалась для применения с различными языками и системами программирования, совместимыми с СОМ. В предыдущих разделах главы мы основные приемы . . : . и мето-

дов ADO в серверных сценариях ASP, написанных на языке Microsoft JScript. Вместе с тем модель ADO также доступна в серверных сценариях V 13 Script, в программах Java, Microsoft Visual Basic и в приложениях, подготовленных при помощи Microsoft Viaaai С++.

Такие языки программирования, как Microsoft JScript, VB Script и Microsoft Visual Basic, в значительной маскируют тот факт, что работа с ADO

выполняется средствами СОМ. Это позволяет . составлять доста-

точно сложные программы, обращающиеся к базам данных, не затрудняя себя детальным изучением модели компонентных объектов СОМ. В случае использования ( требуются более глубокие знания, хотя и здесь есть возможности для упрощения разработки приложений, интенсивно взаимодействующих с Л1)0,