Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADODB.Stream / 5 сообщений из 5, страница 1 из 1
06.02.2007, 17:20
    #34310098
Modi
Modi
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ADODB.Stream
Привет всем!

У меня такой вопрос мне надо добавить ворд доки в SQL и загрузить эти доки из базы. я как то добавляю данные в базу но Load делать не могу. Если кто нибудь знает пожалуста подскайите и лудше на примере.
Спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.02.2007, 17:28
    #34310129
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ADODB.Stream
Modi я как то добавляю данные в базу Для самого себя что ли секрет?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
'Из базы
Dim FotoData() As Byte
    If rsData("Image").ActualSize >  0  Then
        FotoData = rsData("Image").Value
        Open "c:\doc1.doc" For Binary As # 1 
        Put # 1 , , FotoData
        Close # 1 
    End If

'В базу. Таки открою секрет
Dim FotoData() As Byte
    If FotoName <> "" Then
        Open "c:\doc1.doc" For Binary As # 1 
        ReDim FotoData( 0  To LOF( 1 ) -  1 )
        Get # 1 , , FotoData()
        Close # 1 
        rsData("Image").Value = FotoData
    End If
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.02.2007, 19:47
    #34310586
Бенедикт
Бенедикт
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ADODB.Stream
Antonariy,
открытие файла For Binary не изменяет размер файла. Т. о., если существует файл с таким именем, может получиться начало от нового, хвост от старого. Простой способ избежать - Open For Output: Close, уже затем Open For Binary.

И, сдаётся мне, аффтор не об этом сценарии толкует (хотя, кто ж его поймёт?).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.02.2007, 19:51
    #34310594
Бенедикт
Бенедикт
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ADODB.Stream
Antonariy,
я неправильно выразился: конечно, размер файла, открытого For Binary, может изменяться. Но если в него запишется меньше байт, чем его размер, размер не изменится.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.02.2007, 10:10
    #34311364
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ADODB.Stream
Если вы считаете, что открыли для меня Америку, таки нет. Предполагается, что автор знаком с тонкостями записи файлов For Binary, и обсуждаем мы в общем-то не их, а запись и получение файла из базы (хотя, кто ж его поймёт?).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADODB.Stream / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 493ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2164556]:
 0ms
get settings:
 10ms
get forum list:
 19ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 154ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 245ms
total:  493ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]