| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как записать графическое изображение в MS SQL, используя ADO? [D5, MSSQL]

Newer ©   (2002-12-23 13:20:00) 

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

---

Newer   (2002-12-23 15:50:00) [1]

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

---

Hooch   (2002-12-23 15:49:00) [2]

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

---

Newer   (2002-12-23 15:49:00) [3]

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

---

Hooch   (2002-12-23 15:48:00) [4]

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

---

Newer   (2002-12-23 15:29:00) [5]

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

---

Newer   (2002-12-23 14:12:00) [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;

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

---

Hooch   (2002-12-23 13:58:00) [7]

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 13:51:00) [8]

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

---

Hooch   (2002-12-23 13:42:00) [9]

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

---

Newer   (2002-12-23 13:40:00) [10]

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

---

Hooch   (2002-12-23 13:29:00) [11]

INSERT INTO Image VALUES(:Image)

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

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

---

Наверх