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

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

Копирую из InterBase в MS SQL с фотографиями! [D7, IB6.x, MSSQL]


Страницы:   1 2 3 4

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

а он не подрезает их??


Страницы:   1 2 3 4

Наверх

Титульная страница Поиск, карта сайта Написать письмо