Работа с двоичными данными (SQL Server + ASP)

4279
знаков
4
таблицы
0
изображений

Христофоров Юрий

В статье будет рассказано как можно работать с двоичными данными в SQL Server с помощью связки ASP + ADO. Поставим перед собой три задачи:

загрузить jpg-файл в столбец типа image таблицы SQL Server

выгрузить этот файл с сохранением на диске

отобразить на web-странице изображение, взятое из базы данных

Для начала создадим базу данных в SQL Server - пусть она будет называться test. Далее необходимо создать таблицу в нашей базе данных - назовем ее blob. Для выполнения указанных действий можно воспользоваться инструментом SQL Server Enterprise Manager.

Ниже на скриншоте показана структура этой таблицы:

Работа с двоичными данными (SQL Server + ASP)

blob_id - первичный ключ таблицы (поле типа IDENTITY)

Теперь можно приступать к разработке ASP-скрипта для загрузки тестового файла test.jpg в созданную таблицу.

Начиная с версии ADO 2.5 и выше в ADO появился объект ADODB.Stream. Он отлично подходит для работы с двоичными данными. Его мы и будем использовать.

Файл import.asp

<%@ Language=VBScript %>

<%

option explicit

Response.Buffer = True

Response.Expires = 0

Server.ScriptTimeout = 600

Dim cn, rs, objStream, sSQL

Set cn = Server.CreateObject("ADODB.Connection")

Set rs = Server.CreateObject("ADODB.Recordset")

Set objStream = Server.CreateObject("ADODB.Stream")

cn.Open "Provider=SQLOLEDB.1;Initial Catalog=test;Data Source=localhost;UID=yura;PWD=yura;"

sSQL = "SELECT * FROM blob WHERE blob_id=0"

rs.Open sSQL, cn, 1, 3

rs.AddNew

objStream.Type = 1

objStream.Open

' путь к файлу для загрузки

objStream.LoadFromFile(Server.MapPath("./") & "test.jpg" )

rs.Fields("name").Value = "Тестовая картинка"

rs.Fields("blob_file").Value = objStream.Read

rs.Update

rs.Close

objStream.Close

cn.Close

Set rs = Nothing

Set objStream = Nothing

Set cn = Nothing

%>

<html>

<head>

<body>

<center>

<b>Файл успешно загружен !</b>

</center>

</body>

</head>

</html>

Теперь напишем скрипт для экспорта двоичных данных из базы данных в jpg файл.

Файл export.asp

<%@ Language=VBScript %>

<%

option explicit

Response.Buffer = True

Response.Expires = 0

Server.ScriptTimeout = 600

Dim cn, rs, objStream, sSQL

Set cn = Server.CreateObject("ADODB.Connection")

Set rs = Server.CreateObject("ADODB.Recordset")

Set objStream = Server.CreateObject("ADODB.Stream")

cn.Open "Provider=SQLOLEDB.1;Initial Catalog=test;Data Source=localhost;UID=yura;PWD=yura;"

' запрос однозначно получающий запись из таблицы

' в данном случае для примера blob_id = 1

' в Вашем случае это может быть другое число

sSQL = "SELECT * FROM blob WHERE blob_id=1"

rs.Open sSQL, cn, 1, 3

objStream.Type = 1

objStream.Open

objStream.Write rs.Fields("blob_file").Value

' папка, где сохраняется файл, должна иметь NTFS права на чтение/запись для

' интернет-пользователя (обычно IUSR_<имя_компьютера>)

' в данном случае - это текущая папка

objStream.SaveToFile Server.MapPath("./") & "test_from_db.jpg", 2

rs.Close

objStream.Close

cn.Close

Set rs = Nothing

Set objStream = Nothing

Set cn = Nothing

%>

<html>

<head>

<body>

<center>

<b>Файл успешно сохранен из базы данных !</b>

</center>

</body>

</head>

</html>

Теперь напишем скрипт для получения изображения из базы данных и непосредственного отображения на web-странице.

Файл img.asp

<%@ Language=VBScript %>

<%

option explicit

Response.Buffer = True

Response.Expires = 0

Server.ScriptTimeout = 600

Response.ContentType = "image/jpeg"

Dim cn, rs, sSQL, binStream

Set cn = Server.CreateObject("ADODB.Connection")

Set rs = Server.CreateObject("ADODB.Recordset")

cn.Open "Provider=SQLOLEDB.1;Initial Catalog=test;Data Source=localhost;UID=yura;PWD=yura;"

' запрос однозначно получающий запись из таблицы

' в данном случае для примера blob_id = 1

' в Вашем случае это может быть другое число

sSQL = "SELECT * FROM blob WHERE blob_id=1"

rs.Open sSQL, cn, 1, 3

binStream = rs.Fields("blob_file").Value

rs.Close

cn.Close

Set rs = Nothing

Set cn = Nothing

Response.BinaryWrite binStream

%>

ASP-скрипт img.asp можно указать в атрибуте src тега img:

Файл img_test.asp

<%@ Language=VBScript %>

<html>

<head>

</head>

<body>

<center>

<img border=0 src="/images/null.png">

</center>

</body>

</html>


Информация о работе «Работа с двоичными данными (SQL Server + ASP)»
Раздел: Информатика, программирование
Количество знаков с пробелами: 4279
Количество таблиц: 4
Количество изображений: 0

Похожие работы

Скачать
126025
4
0

... между SQL Server и остальной системой на выделенном компьютере. SQL Server использует память в количестве, отведенном ему настраиваемым параметром "memory". Machine Memory, (MB) SQL Server Memory, (MB) 16 24 32 48 64 128 256 512 4 6 16 28 40 100 216 464 Не следует выделять SQL Server слишком много памяти (относительно общего объема памяти ...

Скачать
79258
97
1

... форматами поддерживает OLE DB Persistence Provider. Кроме сохранения, можно также загружать (восстанавливать) объект Recordset из файлов. Сохранение и последующая загрузка рекордсета из файла в формате XML дали возможность использования XML-документов в качестве баз данных. OLE DB Persistence Provider жестко задает формат результирующего XML-документа: для описания структуры и типов узлов всегда ...

Скачать
194681
23
7

... поставленной задачи показала правильность выбранного подхода. Тем не менее, работа требует дальнейше доработаки для организации постоянного доступа читателей к библиографическим ресурсам библиотекам города через Интернет. Литература 1.          Глушаков С.В., Ломотьков Д.В. Базы данных: Учебный курс. – К.: Абрис, 2000. -504с. 2.          Джейсон Мейнджер. Java: основы программирования :Пер ...

Скачать
102741
6
12

... на будущее. DAO и RDO известны уже достаточно давно, и появление двух разных механизмов было связано с необходимостью оптимизации решения двух отдельных задач: доступа к локальным и удаленным базам данных соответственно. Однако естественное развитие вычислительных систем привело к необходимости создания единого механизма, который обеспечил бы единый подход при работе с БД различных классов. В ...

0 комментариев


Наверх