есть 2 базы под firebird 1.5 записи из одной нужно перенести в другую делаю так q1,q2-компоненты ibsql
Код:
1 2 3 4 5 6 7 8 | q1 . Close; q1 . SQL . Clear;
q1 . SQL . Add( 'insert into address Values(' );
q1 . SQL . Add(Format( '' '%s' ',' ,[(q2 . FieldByName( 'mail_title' ).AsString)]));
if Length(q2 . FieldByName( 'rec_date_change' ).AsString) <> 0
then q1 . SQL . Add(Format( '' '%s' ',' ,[q2 . FieldByName( 'rec_date_change' ).AsString]))
else q1 . SQL . Add( 'null' );
q1 . SQL . Add( ');' );
q1 . ExecQuery;
|
Admin: Пользуемся тегами!
в одном из значений mail_title содержиться '7Б' - в ковычках в исходной базе
при переносе этой записи прога вываливаеться с ошибкой unexpected end of command. Пробовал делать без format а заключить все это в chr(39) - непомогло.
Помогите пожалуйста незнаю че делать.