| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
JPEG + Access + Delphi [D7, MS Access]
Devil2005 © (2005-12-12 13:07:00)Привет всем!
Вчера весь день проламал голову над своей проблемой. Delphi не мой основной язык программирования, поэтому прошу ногами не пинать за возможно ламмерский вопрос. Мне надо занести в MS Access (поле Мемо или ОЛЕ) исходник картинки (джипег например). Всё бы хорошо, но вот с запросом проблема (я точного синтаксиса не помню, но идея, думаю, понятна):
var := JPEGSourseASString;
ADOCommand1.CommandText = 'INSERT INTO table(picture) VALUES('''+JPEGSourseASString+''')';
ADOCommand1.Execute;
ошибка при запросе как я понял из сообщения происходит из-за наличия специальных символов. Я пробовал перевести строку в юникод, делать quote но это не помагает. видимо должна быть функция, которая решает проблему со строкой. или ещё какой-то способ.
мне нужно решить проблему именно в таком формате, т.е. руками писать запрос INSERT.
заранеее спасибо за помощь. Алекс.
Devil2005 (2005-12-12 16:05:00) [1]Спасибо, попробую.
Desdechado (2005-12-12 13:16:00) [2]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;
| |
