Разработка баз данныхРазработка баз данных

 Программирование  Программы  Ссылки  Обратная связь
     
. . .
. . .
startpage.htm Новости
about.htm О сайте
fileformat.htm I. Выбор технологии
clientserver.htm Преимущества клиент-серверной технологи
prepare.htm Переход от MDB к ADP
upsizing.htm Инструменты переноса данных
setupserver.htm Выбор версии и установка сервера
selectclient.htm Выбор версии MSAccess
formsreports.htm II. Формы, Отчеты MSAccess
queries.htm Запросы / ADO
inputparameters.htm Передача входных параметров
data_drivers.htm Библиотеки доступа к данным
forms.htm Формы MSAccess
requery.htm Обновление данных в форме
updatableform.htm Обновляемость данных в форме
dialogform.htm Остановка кода пока открыта форма
formsaverecord.htm Сохранить текущую запись
formgotorecord.htm Переход по записям формы
sumform.htm Итоги в формах
serverfiltersample.htm Пример серверного фильтра
formerror.htm Причина Ошибки #Error
menubarevent.htm Перехват нажатия на кнопку меню
woconditionalformat.htm Раскраска строк ленточной формы без условного форматирования
currrec.htm Выделение цветом текущей записи
subform.htm Подчиненные Формы
textboxenter.htm Ввод перевода строки
twimagelistbug.htm treview + imagelist + подч. форма
reports.htm Отчеты, общие рекомендации
report_input_parameters.htm Входные параметры
vbaprog.htm III. Программирование VBA
dbpic.htm Картинки в базе данных
binbmp.htm Двоичные данные картинки в поле таблицы базы данных
piclink.htm Хранение ссылок на файлы
picjpg.htm Бинарное содержимое JPG, Gif файла в бинарном поле базы данных
playsound.htm Воспроизведение звуков
tv.htm Функции для тривью
restartaccess.htm Перезапуск Аксесса
publicvariables.htm Передача и хранение параметров и настроек
collectionfunctions.htm Коллекция полезных функций
datepicker.htm Всплывающий календарик
menuhummer.htm Меню и тулбары
padeg.htm Склонение по падежам
comborowsource.htm Источник данных для поля со списком
filedialog.htm Диалог выбора файла / папки
sendmapi.htm Отправка почты (4 способа) + архивация
autoupdateclient.htm Автоматическое обновление клиентской части
licenses.htm  Устранение проблем с регистрацией компонентов
uncommented.htm Без коментариев
filetime.htm Время и дата файла
reportsample.htm Пример настраивомого отчета
adpformfilter.htm Серверный Фильтр by GEO
tempmdb.htm ADP: Временный MDB для временных таблиц
mutex.htm Запрет запуска нескольких копий приложения
translit.htm Транслитерация всего проекта.
updateident.htm Изменение счетчика
webinterface.htm IV WEB
accessinternet.htm Работа с аксесс через интернет
webupdate.htm Обновление приложения аксесс через интернет
msiecom.htm Программное управление веббраузером
sqlserver.htm MS SQL
mssqltransfer2.htm Перенос/копирование баз
mssqlperm.htm Adp проверка прав пользователя перед открытием формы или управление доступностью полей формы
mssqlcrossdatabase.htm  Межбазовые разрешения
tsqlcollection.htm T-sql коллекция
similarity.htm Сортировка по созвучности
esp.htm расширенные хранимые процедуры
mssqloptimizing.htm Оптимизация быстродействия
     Двоичные данные картинки в поле таблицы базы данных

 
Хранение двоичных данных картинки в поле базы данных


(не OLE-объект, а именно двоичные данные )  

 
1. Делаем таблицу PICS источником данных формы.  
   структура таблицы: PICS  
  • id_pic - счетчик-идентификатор картинки в таблице  
  • PicData - поле для хранения двоичных данных ( тип для MDB - Поле объекта OLE для ADP - image)   
  • PicPath - текстовое поле, путь откуда планируется изначально загрузить картинку  
    2. Добавляем  объект типа  image на форму и задаем для него имя -  MYPIC    
    3. Для отображения картинок в обычных формах (не ленточных и не табличных) и отчетах  достаточно программно  назначить значение  PictureData для объекта  картинка.   
     
    Добавляем код на событие формы Текущая запись:  
     
    Private Sub Form_Current()  
    IF NOT isnull(me.PicData) Then   
       Me.MYPIC.PictureData = me.PicData  
       Me.MYPIC.visible = True   
    Else  
       Me.MYPIC.visible = False  
    End IF  
    End Sub  
       
     

     
     
    Для того чтобы картинка отображалась, необходимо,  чтобы поле таблицы  содержало двоичный  образ картинки.   
     
      Один из способов  загрузки картинок в таблицу:    
     
    разместить на форме Элемент управления типа поле   
    назвать его  CtlPicPath  
    указать свойство данные - PicPath , предназначенное для ввода пути к и имени файла - картинки   
    Добавить Кнопку   
    назвать ее  "загрузить"    
         
    назначить ей код:  
     
    Private Sub загрузить_Click()  
    Me.MYPIC.Picture = CtlPicPath.value   ' "\\servername\path\filename.bmp"  
    Me.PicData = Me.MYPIC.PictureData   ' из картинки сохраняем в поле набора записей формы  
    End Sub  
       
    		•  
    . . .
    . . .
    © 2000 - 2009 Алексей Козин эта вебстраница является зеркалом сайта www.msdatabase.ru Рейтинг@Mail.ru
    Hosted by uCoz