АРХИВ СТАТЕЙ ЖУРНАЛА «МОЙ КОМПЬЮТЕР» ЗА 2002 ГОД

Уроки ASP-технологии. Объекты доступа к данным.

Все журналы \ Номер 22/193 `2002 от 27.05.2002 \ Уроки ASP-технологии. Объекты доступа к данным.

DSN или ConnectionString?

DSN (Data Source Name) в переводе с английского означает «имя источника данных». Оно предназначено для простейшего подключения к базе данных, то есть, если вы создали DSN, то вам не нужно указывать в коде все параметры подключения к базе данных (имя базы данных, режим подключения и др.) — они указываются при создании DSN. Пример использования:

Далее подключение можно использовать как в предыдущем примере.

DSN создается так:

• Откройте «Пуск > Настройка > Панель управления > ODBC32…» (на разных компьютерах раздел ODBC называется по-разному — главное, чтобы в названии фигурировала надпись ODBC).

• Выберите вкладку System DSN.

( Щелкните кнопку Add.

• Выберите нужный драйвер (мы будем использовать Microsoft Access).

• Нажмите Finish.

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

• Нажмите кнопку Select, выделите нужную базу данных и кликните OK.

• Щелкните OK. Новый DSN появится в списке.

Все! На этом процесс создания источника данных заканчивается — продукт готов к употреблению :-).

Примечание: вообще-то я бы рекомендовал использовать ConnectionString вместо DSN — в этом случае вы получаете полный контроль за ситуацией.

Теперь давайте рассмотрим, как добавляются записи в базу данных. Если вы знакомы с SQL, то должны знать, что для этого используется оператор UPDATE. Применим этот оператор к нашей базе данных. В предыдущем примере поменяйте строку

на

Также удалите текст сценария со строки

до строки

включительно.

После этого выполните наш сценарий. Когда вы откроете базу данных, вы увидите, что e-mail у Модеста Матвеевича Камноедова поменялся с kamn@nii.ru на kamnoedov@nii.ru.

Итак, изменять записи мы научились. Теперь давайте добавим в базу данных еще одного покупателя. Измените строку присвоения переменной strSql SQL-запроса таким образом:

Когда вы выполните данный сценарий, в базу данных добавится строка с данными главного персонажа упомянутой повести — Александра Привалова.

Чтобы удалить запись из базы данных, нужно поменять SQL-запрос следующим образом:

После исполнения этого запроса запись о Модесте Матвеевиче Камноедове удалится.

В принципе, я показал вам основные, часто используемые конструкции. Если же вам понадобятся какие-то экзотические операторы, то милости прошу в справку по Microsoft Access. Там вы найдете полный справочник по SQL с примерами.

Сегодня мы начнем строить гостевую книгу собственного формата. Создайте базу данных guestbook.mdb, а в ней таблицу Data со следующими параметрами (см. табл.).

После этого создайте файл addguest.asp и добавьте в него следующий код:

<%@ language=VBScript %>
<% Option Explicit %>

<%
Dim objConn
Dim objRecordset
Dim objField

Dim strSql
Dim strConn

Dim strFirstName
Dim strLastName
Dim strHomeSite
Dim strEmail
Dim strMessage

Dim mypath
Dim mypath2
Dim strDBName1
Dim strDBName

if Request.Form("txtFirstName")<>"" And Request.Form("txtLastName")<>"" And	Request.Form("txtEmail")<>"" And Request.Form("txtMessage")<>"" then

strFirstName = Request.Form("txtFirstName")
		strLastName = Request.Form("txtLastName")
		strHomeSite = Request.Form("txtHomeSite")
		strEmail = Request.Form("txtEmail")
		strMessage = Request.Form("txtMessage")

myPath=Request.ServerVariables("PATH_TRANSLATED")
MyPath2=InstrRev(myPath,"\")
strDBName1=left(MyPath,MyPath2)
strDBName=strDBName1 & "\"

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _
& strDBName & "guestbook.mdb"

set objConn = Server.CreateObject("ADODB.Connection")
set objRecordset = Server.CreateObject("ADODB.Recordset")

objConn.Mode = adModeReadWrite
objConn.ConnectionString = strConn

objConn.Open

strSql = "INSERT INTO Data ([First_Name], [Last_Name], [E-mail], [HomeSite], [Message]) VALUES " & _
			"('" & strFirstName & "', '" & strLastName & "', '" & strEmail & "', '" & strHomeSite & "', '" & strMessage & "')"

set objRecordset = objConn.Execute(strSql)

objConn.Close

set objRecordset = Nothing
set objConn = Nothing

Response.Redirect "view.asp"

Else 
	Response.Write "Fields must not be empty!<br><br>"
	Response.Write "<a href='guestbook.htm'>Go back</a>"
End If

Очевидно, что необходимо также создать каталог includes и скопировать в него файл adovbs.inc, о котором я говорил раньше.

Посмотрим, как работает приведенный выше сценарий. Сначала устанавливается язык сценария и опция обязательного объявления переменных. Затем подключается файл adovbs.inc, в котором определены все константы для доступа к базам данных посредством технологии ADO. Потом происходит объявление используемых переменных. После этого проверяется, заполнены ли все обязательные поля, и если да, то информация добавляется в нашу базу данных с помощью SQL-конструкции INSERT INTO, закрываются и уничтожаются объекты objConn и objRecordset, после чего методом Redirect объекта Response браузеру дается команда перейти на страничку view.asp, о которой речь пойдет дальше. Если же хотя бы одно обязательное поле не заполнено, то пользователю выдается сообщение об ошибке.

На сегодня это все. В следующий раз мы напишем сценарий view.asp, который, собственно, и будет просматривать гостевую книгу.

(Продолжение следует)

Рекомендуем ещё прочитать:

Порядочные алгоритмы. (№28/199 `2002) Владимир Ткачук
Универсальный штемпель. (№5/176 `2002) Геннадий Тихомиров
Я твой слуга, я твой работник. (№6/177 `2002) Дмитрий Сахань
Уроки ASP-технологий. (№17/188 `2002) Нет Автора
JavaScript сценарист по призванию. (№17/188 `2002) Константин Носов
Уроки ASP-технологии. (№20/191 `2002) Нет Автора
Мышление в стиле Visual Basic. (№20/191 `2002) Андрей Гончаров
Слышите меня, бандерлоги? (№41/212 `2002) Сергей Яремчук
Цифровая подпись. (№43/214 `2002) Роман Бречко
Прямой Х и открытый GL. (№50/221 `2002) Роман Савчук

Предыдущая статья Назад К списку журналов Следующая статья