Форум: "Базы";
Текущий архив: 2003.05.15;
Скачать: [xml.tar.bz2];
ВнизBlob Найти похожие ветки
← →
Doomalka (2003-04-24 15:14) [0]Доброго времени суток! Подскажите пожалуйста как работать с Blob полями в SQL ? я так понимаю необходимо использовать какие то скрипты....не могбы кто ни-нибудь штонить попонятнее обьяснить чем скрипт отличаеться от обычного SQL и как мне его можно использовать в программе delphi
← →
D (2003-04-24 15:24) [1]В программе потоки можно исп-ть - TBlobStream
← →
Doomalka (2003-04-24 15:26) [2]а скриптом как ? как заполнять блобы в скриптах? как мне использовать блоб-курсоры? использую ADO. please.
← →
Johnmen (2003-04-24 15:30) [3]ADO и IB ????????????????!!!!!!!!!!!!!
Извращение, однако...:)
← →
Doomalka (2003-04-24 15:31) [4]2 Johnmen © (24.04.03 15:30)
спасибо что помог
← →
Johnmen (2003-04-24 15:42) [5]Лучше книг и доков никто тебе не поможет в главном...:)
← →
Doomalka (2003-04-24 15:47) [6]2 Johnmen © (24.04.03 15:42) подскажи в этом случае книги и доки, в Embedded SQLGuide я вижу что писать, но я не понимаю где писать если в gpre то мне не это нужно...если делать компиляцию этих скриптов - то это просто использование API. БЕЗ API могу я как нибудь обойтись?
← →
Doomalka (2003-04-24 15:49) [7]2 Johnmen © (24.04.03 15:42)
а если тебе просто постебаться необходимо - то лучше не надо тратить на это время и место на форуме.
2 модератор
beg your pardon
← →
Johnmen (2003-04-24 16:01) [8]http://delphimaster.net/view/3-1051102245/
← →
Doomalka (2003-04-24 16:54) [9]Query.SQL.Text:=Format("UPDATE Contact SET "MESSAGE" = :Mess WHERE id_contact = ",[IdContact]);
MS:=TMemoryStream.Create;
MS.WriteBuffer(Body,SizeOf(Body));
Query.Parameters.Items[0].LoadFromStream(MS,ftBlob);
Query.ExecSQL;
MS.Free;
гучзусеув end of command
← →
Doomalka (2003-04-24 16:55) [10]ошибка unexpected end of command
что не так?
Body - Widestring
← →
Соловьев (2003-04-24 17:01) [11]
> Query.Parameters.Items[0].LoadFromStream(MS,ftBlob);
а есть такое?
← →
Doomalka (2003-04-24 17:02) [12]чес слово:) даже компилируется:)
← →
Соловьев (2003-04-24 17:03) [13]
> Query.SQL.Text:=Format("UPDATE Contact SET "MESSAGE" = :Mess
> WHERE id_contact = ",[IdContact]);
Query.SQL.Text:="UPDATE Contact SET "MESSAGE" = :Mess WHERE id_contact = :id";
...
> Query.Parameters.Items[0].LoadFromStream(MS,ftBlob);
Query.ParamByName("Mess").LoadFromStream(MS,ftBlob);
Query.ParamByName("id").AsInteger := 5;
...
← →
Doomalka (2003-04-24 17:22) [14]как вариант:) тем не менее прошло, сенкс...а как достать в свою очередь этот поток SELECT"ом?
MS:=TMemoryStream.Create;
Query.SQL.Text:=Format("SELECT "MESSAGE" FROM Contact WHERE id_contact = ",[IdContact]);
Query.Open;
Query.SQL.Text:="Select "MESSAGE" FROM Contact WHERE id_contact = :Id";
TBlobField(Query.Fields[0]).SaveToStream(Ms);
MS.ReadBuffer(Body,SizeOf(Body));?
MS.Free;
streem read error.....
← →
Doomalka (2003-04-24 17:23) [15]понаписал то.....вот так вот:
Query.SQL.Text:=Format("SELECT "MESSAGE" FROM Contact WHERE id_contact = ",[IdContact]);
Query.Open;
TBlobField(Query.Fields[0]).SaveToStream(Ms);
MS.ReadBuffer(Body,SizeOf(Body));?
MS.Free;
← →
Doomalka (2003-04-24 17:57) [16]please
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.05.15;
Скачать: [xml.tar.bz2];
Память: 0.48 MB
Время: 0.009 c