Я использую VB 6 с SQL Server 2005. Я установил тип данных поля subject в базе данных в «Изображение». Когда я сохраняю изображение из элемента управления изображением, он отображается как двоичный файл в БД. Тем не менее Im не смог загрузить двоичный файл из базы данных в элемент управления изображением. Как программно сохранить и загрузить изображение с помощью элемента управления изображением?Как сохранить и загрузить изображения с помощью VB 6
Это может не постигнуть вас, но в таких сценариях я обычно выгружаю байты в временный файл, а затем использую стандартный VB6 LoadImage для перехода с диска в объект изображения. Конечно, после этого вы должны удалить временный файл. Это единственный способ, которым я знаю без использования Win API и/или библиотек настраиваемого типа.
Довольно упрощенный пример, который загружает изображение из записей (RS) в графическом элементе управления (Изображение1):
Set strStream = New ADODB.Stream
strStream.Type = adTypeBinary
strStream.Open
strStream.Write RS.Fields("**YourImageField**").Value
strStream.SaveToFile "C:\Temp.bmp", adSaveCreateOverWrite
Image1.Picture = LoadPicture("C:\Temp.bmp")
Kill ("C:\Temp.bmp")