Текущий архив: 2003.01.16;
Скачать: CL | DM;

Вниз

Как записать графическое изображение в MS SQL, используя ADO?   Найти похожие ветки 

← →
Newer   (2002-12-23 13:20) [0]

Подскажите, как записать в поле БД типа binary графическое изображение в MS SQL, используя ADO-компоненты?

---

← →
Hooch   (2002-12-23 13:29) [1]

INSERT INTO Image VALUES(:Image)

Query.Parameters.ParamByName("Image").LoadFromStream(MS,ftBlob);

где MS - поток в котором картинка

---

← →
Newer   (2002-12-23 13:40) [2]

А как поместить в поток изображение?

---

← →
Hooch   (2002-12-23 13:42) [3]

А оно у тебя в чем лежит ?

---

← →
Newer   (2002-12-23 13:51) [4]

Просто графический файл

---

← →
Hooch   (2002-12-23 13:58) [5]

var
MS : TFileStream;
begin
MS := TFileStream.Create("X:\XXX\Оооооо.JPG",fmOpenRead);
try
...
Query.Parameters.
ParamByName("Image").LoadFromStream(MS,ftBlob);
Query.ExecSql;
finally
MS.Free;
end;
end;

---

← →
Newer   (2002-12-23 14:12) [6]

Ругается, пишет ошибка "String or binary data would be truncated"

Структура таблицы:
Id int {identity}
EmpFile binary

Код:
procedure TfmMain.Button1Click(Sender: TObject);
var
MS : TFileStream;
begin
MS := TFileStream.Create("D:\Test.jpg", fmOpenRead);
with Query1 do try
Close;
SQL.Text := "Insert Into dbo.T_EmpFile (EmpFile) Values (:pmEmpFile)";
Parameters.ParamByName("pmEmpFile").LoadFromStream(MS, ftBlob);
ExecSQL;
finally
MS.Free;
end;
end;

В чем может быть проблема?

---

← →
Newer   (2002-12-23 15:29) [7]

Народ, помогите!!!

---

← →
Hooch   (2002-12-23 15:48) [8]

не binary а Image и будет сказка ! :-)

---

← →
Hooch   (2002-12-23 15:49) [9]

имеется ввиду тип поля в таблице

---

← →
Newer   (2002-12-23 15:49) [10]

Да, точно, я уже понял, спасибо!

---

← →
Newer   (2002-12-23 15:50) [11]

Hooch, ты в Аське бываешь?

---

Страницы: 1 вся ветка

Текущий архив: 2003.01.16;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.009 c