ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADODB.Stream
5 сообщений из 5, страница 1 из 1
ADODB.Stream
    #34310098
Modi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Modi
Участник
Привет всем!

У меня такой вопрос мне надо добавить ворд доки в SQL и загрузить эти доки из базы. я как то добавляю данные в базу но Load делать не могу. Если кто нибудь знает пожалуста подскайите и лудше на примере.
Спасибо.
...
Рейтинг: 0 / 0
06.02.2007, 17:20
| Ответить | Цитировать | Написать  
ADODB.Stream
    #34310129
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
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, 17:28
| Ответить | Цитировать | Написать  
ADODB.Stream
    #34310586
Фотография Бенедикт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бенедикт
Участник
Antonariy,
открытие файла For Binary не изменяет размер файла. Т. о., если существует файл с таким именем, может получиться начало от нового, хвост от старого. Простой способ избежать - Open For Output: Close, уже затем Open For Binary.

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


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