Главная страница
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.034 c
5-1124023949
Navi
2005-08-14 16:52
2006.02.12
Компонент не реагирует на сообщение


4-1133445577
lucifer
2005-12-01 16:59
2006.02.12
Как закрыть окно(приложение) под курсором мыши!


5-1124710735
Нулевой
2005-08-22 15:38
2006.02.12
Flat ScrollBar и TScrollBarMode не пойму как применять?


4-1132648371
salexn
2005-11-22 11:32
2006.02.12
Определение версии установленного Office


2-1137926305
Compton's G
2006-01-22 13:38
2006.02.12
Битмап