Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.02.12;
Скачать: CL | DM;

Вниз

JPEG + Access + Delphi   Найти похожие ветки 

 
Devil2005   (2005-12-12 13:07) [0]

Привет всем!
Вчера весь день проламал голову над своей проблемой. Delphi не мой основной язык программирования, поэтому прошу ногами не пинать за возможно ламмерский вопрос. Мне надо занести в MS Access (поле Мемо или ОЛЕ) исходник картинки (джипег например). Всё бы хорошо, но вот с запросом проблема (я точного синтаксиса не помню, но идея, думаю, понятна):

var := JPEGSourseASString;
ADOCommand1.CommandText = "INSERT INTO table(picture) VALUES("""+JPEGSourseASString+""")";
ADOCommand1.Execute;

ошибка при запросе как я понял из сообщения происходит из-за наличия специальных символов. Я пробовал перевести строку в юникод, делать quote но это не помагает. видимо должна быть функция, которая решает проблему со строкой. или ещё какой-то способ.
мне нужно решить проблему именно в таком формате, т.е. руками писать запрос INSERT.

заранеее спасибо за помощь. Алекс.


 
Desdechado ©   (2005-12-12 13:16) [1]

Query1.Sql.Text :=
  "INSERT INTO testblob " +
  " ( " +
  "  fBlob" +
  " )" +
  " VALUES" +
  " (" +
  " :ParamBlobField" +
  ")";
Query1.ParamByName("ParamBlobField").DataType := ftBlob;
Query1.ParamByName("ParamBlobField").ParamType := ptInput;
Query1.ParamByName("ParamBlobField").LoadFromFile("MyFile",ftBlob);
Query1.ExecSql;


 
Devil2005   (2005-12-12 16:05) [2]

Спасибо, попробую.



Страницы: 1 вся ветка

Текущий архив: 2006.02.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.051 c
15-1137823185
begin...end
2006-01-21 08:59
2006.02.12
С Днём рождения! 21 января


15-1137498922
Empleado
2006-01-17 14:55
2006.02.12
Небольшие заметки. Куба


15-1137571462
PKT
2006-01-18 11:04
2006.02.12
Выбрать предмет в универе


6-1130929111
oleggar
2005-11-02 13:58
2006.02.12
openssl


2-1138145935
Змей
2006-01-25 02:38
2006.02.12
colordialog