![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Копирую из InterBase в MS SQL с фотографиями! [D7, IB6.x, MSSQL]
DmitrichJ © (2007-03-30 16:19:00)Я перевржу БД из InterBase в MS SQL. Все данные копируются хорошо, но с фотографиями небольшая проблема. Они попадают в MS SQL в обрезаном виде-только начало фотографии, а всё остальное серое. Делаю так:
var
stream:TStringStream;
...
//выборка из InterBase
Form1.IBQuery1.SQL.Text:='Select * from ...';
...
//Вставляем в MS SQL
Form1.Query1.SQL.Text:=
'Insert into Table(...,photo) values (.... , :P)';
stream:=TStringStream.Create(Form1.IBQuery1.FieldByName('PHOTO').AsString);
Form1.Query1.ParamByName('P').LoadFromStream(stream,ftBlob);
Form1.Query1.ExecSQL;
Подскажите, что не так/
Поля в БД
InterBase: BLOB BLOB sub_type 1 segment size 1 CHARACTER SET WIN1251
MS SQL: IMAGE
DmitrichJ (2007-03-30 16:36:00) [61]Проверил. Нет это не он подрезает.
Jan (2007-03-30 16:36:00) [62]
> stream:=TStringStream.Create(Form1.IBQuery1.FieldByName('PHOTO').
> AsString);
> Form1.Query1.ParamByName('P').LoadFromStream(stream,ftBlob);
>
а чего так? юзай метод Assign.
> Я перевржу БД из InterBase в MS SQL.
почему не через линкед?
DmitrichJ (2007-03-30 16:34:00) [63]stud, вообще не должен. Т.к. неограничен, но я пытаюсь сейчас проверить.
stud (2007-03-30 16:33:00) [64]DmitrichJ (30.03.07 16:19)
AsString
а он не подрезает их??