Как записать содержимое файла в таблицу SQL Server?

19.03.2007, 14:10. **Показов** 2973. **Ответов** 7

Студворк — интернет-сервис помощи студентам

Требуется записать файл любого размера в таблицу SQL Server 7.0; подскажите какой тип столбца для этого нужен (подозреваю, что image) и как будет выглядеть код и SQL-оператор. Как взять файл из базы - я знаю, а вот как его туда положить -нет.

@Deom · 19.03.2007, 17:03

Привет !
Существуют различные uploader's
например мне нравиться aspSmartUpload
этот компонент можно стащить с www.aspsmart.com
вот а асп код пихания файла с помошью
этого аплоадера будет выглядеть так
<HTML>
<BODY BGCOLOR='white'>

<H1>aspSmartUpload : Sample 4</H1>
<HR>

<%
' Variables
' *********
Dim mySmartUpload
Dim file
Dim oConn
Dim oRs
Dim intCount
intCount=0

' Object creation
' ***************
Set mySmartUpload = Server.CreateObject('aspSmartUpload.Smar tUpload')

' Upload
' ******
mySmartUpload.Upload

' Connect to the DB
' *****************
Set oConn = Server.CreateObject('ADODB.Connection')
curDir = Server.MapPath('scriptsaspSmartUploadSam ple.mdb')
oConn.Open 'DBQ='& curDir &'

river={Microsoft Access Driver (*.mdb)}

riverId=25;FIL=MS Access;'

' Open a recordset
' ****************
strSQL = 'SELECT FILENAME,FILE FROM TFILES'

Set oRs = Server.CreateObject('ADODB.recordset')
Set oRs.ActiveConnection = oConn
oRs.Source = strSQL
oRs.LockType = 3
oRs.Open

' Select each file
' ****************
For each file In mySmartUpload.Files
' Only if the file exist
' **********************
If not file.IsMissing Then

' Add the current file in a DB field
' **********************************
oRs.AddNew
file.FileToField oRs.Fields('FILE')
oRs('FILENAME') = file.FileName
oRs.Update
intCount = intCount + 1
End If
Next

' Display the number of files uploaded
' ************************************
Response.Write(intCount & ' file(s) uploaded.
')

' Destruction
' ***********
oRs.Close
oConn.Close
Set oRs = Nothing
Set oConn = Nothing
%>
</BODY>
</HTML>
вообще этот аплоадер позволяет
пихать в базу данных файлы(в том числе и рисунки)
вытаскивать их из нее и тд и тд
вообще у меня есть эта компонента могу кинуть если что
там хелпа очень хорошая
если есть вопросы пишите на dim@delo.ru

19.03.2007, 17:24

Я знаю этот компонент, но дело не в нем. Мне не нужно закачивать файлы пользователей на сервер, мне нужно только занести в базу локальный файл, хотя с помощью ASPSmartUpload конечно можно было ы все это организовать, но мне бы не хотелось лишний раз различные компоненты использовать. Вот что-то типа:
'===============================
Dim a, fs, pth, fname, BinArray
set con=server.createobject('ADODB.Connectio n')
con.open 'dsn','user'
'Получение двоичного файла (просто readAll не годится)
fname = cstr(request('file'))
pth = Server.MapPath(' ') & ' '
Set fs = CreateObject('Scripting.FileSystemObject ')
Set a = fs.OpenTextFile(pth & fname, 1, 0)
Do while not a.AtEndOfStream
BinArray = BinArray & chrB(asc(a.Read(1)))
Loop
a.Close
'SQL запрос
con.execute('insert into tab_1 (file_url,file_content) value (''&pth & fname&'','&?????????&')')
set con=nothing
'=========================
Вот не знаю, что вместо вопросиков писать; что-то типа convert(binary,BinArray)... это не работает.

@Deom · 20.03.2007, 10:03

Привет !
Не мог бы ты уточнить свою задачу.
Что тебе вообще нужно сделать .
с какими файлами ты работаешь ?

DIM

20.03.2007, 10:23

Просто нужно хранить файлы в БД SQL Server, любые файлы. Файлы не должны закачиваться пользователем, а должны заноситься в базу администратором.

28.03.2007, 22:08

Как-то мне пришлось писать базу для создания мультимедийных дисков. Мне тоже нужно было хранить в базе картинки и html-файлы. Долго искал, в итоге все сделал через утилитку textcopy. Было бы очень интересно, если бы кто-то рассказал как можно хранить в SQL Server картинки.

30.03.2007, 00:29

Я использую SAFileManager от Software Artisans - http://www.SoftArtisans.com
Он бесплатный и имеет много полезностей, и в их числе метод ExportToBlob. С помощью этого метода можно экспортировать содержимое любого файла в рекордсет, потом сделать апдейт рекордсету и...
готово - как раз то что тебе нужно. Я с помощью этого компонента и Microsoft Posting Acceptor'а
успешно загружаю картинки от пользователя в базу данных MS SQL 7.0. Дальше рассказывать не буду - у компонента превосходная документация (не все платные имеют такую :-(( )

30.03.2007, 21:18

Есть два классных метода для добавления больших объемов данных в базу
appendchunk() и getchunk()
они принадлежат то ли Recordset'у, то ли Field'у

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .

Sergik

	Как записать содержимое файла в таблицу SQL Server? 19.03.2007, 14:10. Показов 2973. Ответов 7 Метки нет (Все метки) Требуется записать файл любого размера в таблицу SQL Server 7.0; подскажите какой тип столбца для этого нужен (подозреваю, что image) и как будет выглядеть код и SQL-оператор. Как взять файл из базы - я знаю, а вот как его туда положить -нет.

@Deom 0 / 0 / 0 Регистрация: 19.03.2007 Сообщений: 15
	19.03.2007, 17:03
	Привет ! Существуют различные uploader's например мне нравиться aspSmartUpload этот компонент можно стащить с www.aspsmart.com вот а асп код пихания файла с помошью этого аплоадера будет выглядеть так <HTML> <BODY BGCOLOR='white'> <H1>aspSmartUpload : Sample 4</H1> <HR> <% ' Variables ' ******* Dim mySmartUpload Dim file Dim oConn Dim oRs Dim intCount intCount=0 ' Object creation ' *********** Set mySmartUpload = Server.CreateObject('aspSmartUpload.Smar tUpload') ' Upload ' ** mySmartUpload.Upload ' Connect to the DB ' *************** Set oConn = Server.CreateObject('ADODB.Connection') curDir = Server.MapPath('scriptsaspSmartUploadSam ple.mdb') oConn.Open 'DBQ='& curDir &'river={Microsoft Access Driver (.mdb)}riverId=25;FIL=MS Access;' ' Open a recordset ' ************* strSQL = 'SELECT FILENAME,FILE FROM TFILES' Set oRs = Server.CreateObject('ADODB.recordset') Set oRs.ActiveConnection = oConn oRs.Source = strSQL oRs.LockType = 3 oRs.Open ' Select each file ' ************ For each file In mySmartUpload.Files ' Only if the file exist ' ****************** If not file.IsMissing Then ' Add the current file in a DB field ' ****************************** oRs.AddNew file.FileToField oRs.Fields('FILE') oRs('FILENAME') = file.FileName oRs.Update intCount = intCount + 1 End If Next ' Display the number of files uploaded ' ******************************** Response.Write(intCount & ' file(s) uploaded. ') ' Destruction ' ********* oRs.Close oConn.Close Set oRs = Nothing Set oConn = Nothing %> </BODY> </HTML> вообще этот аплоадер позволяет пихать в базу данных файлы(в том числе и рисунки) вытаскивать их из нее и тд и тд вообще у меня есть эта компонента могу кинуть если что там хелпа очень хорошая если есть вопросы пишите на dim@delo.ru 0

Sergik
	19.03.2007, 17:24
	Я знаю этот компонент, но дело не в нем. Мне не нужно закачивать файлы пользователей на сервер, мне нужно только занести в базу локальный файл, хотя с помощью ASPSmartUpload конечно можно было ы все это организовать, но мне бы не хотелось лишний раз различные компоненты использовать. Вот что-то типа: '=============================== Dim a, fs, pth, fname, BinArray set con=server.createobject('ADODB.Connectio n') con.open 'dsn','user' 'Получение двоичного файла (просто readAll не годится) fname = cstr(request('file')) pth = Server.MapPath(' ') & ' ' Set fs = CreateObject('Scripting.FileSystemObject ') Set a = fs.OpenTextFile(pth & fname, 1, 0) Do while not a.AtEndOfStream BinArray = BinArray & chrB(asc(a.Read(1))) Loop a.Close 'SQL запрос con.execute('insert into tab_1 (file_url,file_content) value (''&pth & fname&'','&?????????&')') set con=nothing '========================= Вот не знаю, что вместо вопросиков писать; что-то типа convert(binary,BinArray)... это не работает.

@Deom 0 / 0 / 0 Регистрация: 19.03.2007 Сообщений: 15
	20.03.2007, 10:03
	Привет ! Не мог бы ты уточнить свою задачу. Что тебе вообще нужно сделать . с какими файлами ты работаешь ? DIM 0

Sergik
	20.03.2007, 10:23
	Просто нужно хранить файлы в БД SQL Server, любые файлы. Файлы не должны закачиваться пользователем, а должны заноситься в базу администратором.

ZatWhYS
	28.03.2007, 22:08
	Как-то мне пришлось писать базу для создания мультимедийных дисков. Мне тоже нужно было хранить в базе картинки и html-файлы. Долго искал, в итоге все сделал через утилитку textcopy. Было бы очень интересно, если бы кто-то рассказал как можно хранить в SQL Server картинки.

Mamont
	30.03.2007, 00:29
	Я использую SAFileManager от Software Artisans - http://www.SoftArtisans.com Он бесплатный и имеет много полезностей, и в их числе метод ExportToBlob. С помощью этого метода можно экспортировать содержимое любого файла в рекордсет, потом сделать апдейт рекордсету и... готово - как раз то что тебе нужно. Я с помощью этого компонента и Microsoft Posting Acceptor'а успешно загружаю картинки от пользователя в базу данных MS SQL 7.0. Дальше рассказывать не буду - у компонента превосходная документация (не все платные имеют такую :-(( )

DimOS
	30.03.2007, 21:18
	Есть два классных метода для добавления больших объемов данных в базу appendchunk() и getchunk() они принадлежат то ли Recordset'у, то ли Field'у