1. . .IProc, = connect;

IJsti , .. 50, Roquest( ID-)(1));

I. .- - adVarChar, adParamlnput, 50, RtquestC USR M 1)1

var , - -

ppid, adVarChar, adParamlnput, 50, Hequest( PiD ){ 1));

var -

Rights , adVarChar, adParamlnput, 16, Beqyest( R{i )( 1)};

cmd. .

Исходный текст i SetMgr находится в листинге 4-34.

Листинг4-34хранитсявфайле j. BoakShopScripts\dbo.SDtMgr.PRCHaприлагаемом к книге компакт-диске.

Она >6ноиляс г поля записи файла managers, вводя значения, полученные через параметры:

CREATE PROCEDURE SetMgr ipUser varcBarCuU). iNewUser varcnar(50) ,

varchar(16) AS UPDATE managers SET iaae=f ewlJ8er. . -.0 - $3 FROM managers WHERE NaBe=ilj3ei

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

Редактирование списка книг

Сотрудники Вашего магазина должны иметь возможность г . и ре-

дактировать список книг, имеющихся в продаже, а также описания этих книг. Эти задачи решаются с помощью серверных сценариев books.asp, .. ,

. . - . . . ; и - р.

Просмотр списка книг

Для просмотра списка книг используется страница books.asp, исходный текст которой в листинге 4-35.

Листинг 4-35 Вы найдете в файле ch4\ BookShop\books.asp на прилагаемом к книге компакт-диске.

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

LlatBoaks;

Если список пуст, вместо таблицы со списком книг отображается строка Нет В противном случае сценарий формирует таблицу с описанием книг, обрабатывая в цикле набор записей rs, полученный в результате работы процедуры 11 stBooks;

iff га.EOF) I

?;>

<TR><TD cell.SPAM=4 АШ1Ч=-СЕ1ТЕВ >ГНвт mrmmisl<J~i)></M> <x

else

:B0RDER=1>

, , th.></tr.=

var while

Author

Title . Publisher )i></i

y.e.

<td>

<a lire = ed:i tbcaw. aso1II)=<I=rs, Fi eldaf beaaalD }i

</td><tr>

<tr><td .... - - - . )l>

rs,CloseC), oonnect.Close();

.аг connect; var rs;

connect =

= 15;

: = If);

185 Базы данных в - Прашческое

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

выполняется на странице - . а вторая - на странице ctrlhoDk.a.i).

В нижней строке таблицы . . : ссылка Новая книга:

Если ее щелкнуть, загружается страница i . Эта страница предназ-

начена для добавления в базу данных описания новой книги.

Что же касается хранимой процедуры i : .. (листинг 4-36), то ее задача - выбор полей booksID. Author, Title, Publisher, Price, - и Annotation из

таблицыЬоокз.

Листинг 4-36 Вы найдете в файле ch4\BookShopScripts\dl>o.ListBook PRC на прилагаемом к книге компакт-диске.

Эта задача , : с помощью простого оператора SELECT:

CREATE PROCEDURE ListBooks AS

SELECT bcoksIO,Author, Title, Publisher, Price, AtlcDate,Annptation

FHOII books

iilaiiieiie новой книги

Как мы только что сказали, после щелчка ссылки Новая книга управление передается странице newbook.asp (листинг 4-37).

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

Она содержит форму с полями описания книги:

<table ; : : - а 3- CE! LSPAC,l l3=aO :>

<trxtd . . е ,% ... </td>

<td а . - V .

<input ; </td>

</tr><trXtd -а--- - - . -айв </td>

<td а. . ..! . <textarea : . .. </td>

<td . а

<option а .;. . . . . - . : .

<option - а - а - : -

<option .

<td y.e.</td>

<td . - .

<input

<td - :a - :

<textarea rais= .. .. : . </textareax/tdx/t .r>

<td ALISa - .a . - , . </td>