Программно Сохоанить фото в mdb и потом показать его

[gutorov]

Всем доброго здоровья, Уважаемые.

Искал.... не нашел, или не понимаю.

вопрос, может у кого что есть готовое, необходимо в Аксессовской бд програмно сохранить jpg, и потом его показать ну на новой форме к примеру.

Вроде сохранить получилось так
fs = CreateObject("Scripting.FileSystemObject")
a = fs.OpenTextFile(CommonDialog1.FileName, 1, 0)
While Not a.AtEndOfStream
BinArray = BinArray & a.Read(1)
End While
rs("Pic1").AppendChunk(BinArray)

А как её считать и показать?
Спасибо,
С Уважением, Вадим

[GSerg]

Искал.... не нашел, или не понимаю.

Не верю.
Поиск наверху выделен красным.
Если ввести в него одновременно A c c e s s и j p g, и указать "Искать все слова", сразу всё находится.

[gutorov]

Большое спасибо!
Заодно и с поиском разобрался

[Alexanbar]

мОЖНО СДЕЛАТЬ ВСЁ ТАК.

1) Привязываем Picturebox к соответсвующему полю бд.
2) С помощью Commondialog выбираем нужный файл
3) загружаем картинку в Picturebox с помощью метода LoadPicture

В базу картинка проконвертируется в BMP формат;
LoadPicture отказывается грузить некоторые jpg . Лучше использовать для этой цели GDI+