Главная страница
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.033 c
1-1137157199
manefesto
2006-01-13 15:59
2006.02.12
Создание объектов в dll и создание обработчиков для них.


15-1138086687
konda
2006-01-24 10:11
2006.02.12
Языковая панель в Windows XP


2-1138006484
ИвашкаИзПросквашки
2006-01-23 11:54
2006.02.12
Timer в Сервисе


9-1120751144
Micke
2005-07-07 19:45
2006.02.12
Припозднившийся God Mode.


2-1138054140
DenXi
2006-01-24 01:09
2006.02.12
TService и че с ним делать