Скачать: CL | DM;

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 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.011 c