InstantForum.NET v4.1.4Релибhttp://www.relib.com/forums/robot@relib.comSat, 22 Nov 2008 20:21:55 GMT20http://www.relib.com/forums/Topic881328-2-1.aspx[quote="vpanasenko"]Странно, у меня через JET - работает...:-))) Ведь мой пример через него, родимого...[/quote] Спасибо.. теперь и у меня заработало... че к чему... или все или ничего. .теперь и через jet и ado.. СПАСИБО... тема закрыта!Mon, 03 Oct 2005 21:11:00 GMTmentos_has_arisenhttp://www.relib.com/forums/Topic881328-2-1.aspx[quote="mentos_has_arisen"]мда.. с колобом весело... через драйвер- ADO предпочтительней... интерфейс тоже можно... только ведь правду через jet SQL не идет инструкции CONSTRAINT и ALTER TABLE ... через DAO в МСДН нашел примеры, но у меня не рулят.. ну и фиг с ним.. кажется нашел альтернативный вариант.. правда производительность падает заметно... Возвращаясь к колобку!!! Повтою дискуссионный вопрос: есть TblRubrika с уникальным ключем IdRubrika, налету создаются таблицы с полем IdRubrika и связью к таблице TblRubrika... вот и все! Мне б интерфейсом предпочтительней, но ведь правда это невозможно? ;)[/quote]Странно, у меня через JET - работает...:-))) Ведь мой пример через него, родимого...Mon, 03 Oct 2005 09:53:00 GMTvpanasenkohttp://www.relib.com/forums/Topic881328-2-1.aspxмда.. с колобом весело... через драйвер- ADO предпочтительней... интерфейс тоже можно... только ведь правду через jet SQL не идет инструкции CONSTRAINT и ALTER TABLE ... через DAO в МСДН нашел примеры, но у меня не рулят.. ну и фиг с ним.. кажется нашел альтернативный вариант.. правда производительность падает заметно... Возвращаясь к колобку!!! Повтою дискуссионный вопрос: есть TblRubrika с уникальным ключем IdRubrika, налету создаются таблицы с полем IdRubrika и связью к таблице TblRubrika... вот и все! Мне б интерфейсом предпочтительней, но ведь правда это невозможно? ;)Fri, 30 Sep 2005 20:55:00 GMTmentos_has_arisenhttp://www.relib.com/forums/Topic881328-2-1.aspxДа, еще... Все-таки в вопросе (повторяюсь) для приличия нужно указать, чем стучишь к БД... Может, он вообще в машкодах кодит, а мы тут копья ломаем..:-)))Thu, 29 Sep 2005 18:04:00 GMTvpanasenkohttp://www.relib.com/forums/Topic881328-2-1.aspx[quote="Airhand"][quote="vpanasenko"]Да и врешь ты все на счет ограничения CREATE TABLE.. Пример на Delphi 5, АДО:procedure TForm1.Button1Click(Sender: TObject);beginADOC.Connected := True;Qry.SQL.Text := ''''''''drop table t1'''''''';Qry.ExecSQL;Qry.SQL.Text := ''''''''create table t1( idRubrik integer not null, Rubrik char(100), primary key(idRubrik))'''''''';Qry.ExecSQL;Qry.SQL.Text := ''''''''create table t2( id integer not null, IdRubrik integer, primary key (id), foreign key(idRubrik) references t1(idRubrik))'''''''';Qry.ExecSQL;end;[/quote] Зачем же так резко... Во первых: ADO работает через драйвер, а человек видимо работает из интерфейса. Во вторых: т.к. ADO работает через драйвер, то не факт, что приведенный выше пример должен работать на Access-е всех версий, не говоря уже о том что описанные конструкции - это уже transact SQL, а не стандарт ...[/quote]Кто такое сказал, то Т-сиквел ? Эта конструкция очень даже работоспособна и в InterBase/FireBird... А этот сервер очень сильно привязан к стандарту SQL(в отличии от "скалы")Thu, 29 Sep 2005 18:03:00 GMTvpanasenkohttp://www.relib.com/forums/Topic881328-2-1.aspx[quote="vpanasenko"]Да и врешь ты все на счет ограничения CREATE TABLE.. Пример на Delphi 5, АДО:procedure TForm1.Button1Click(Sender: TObject);beginADOC.Connected := True;Qry.SQL.Text := ''''drop table t1'''';Qry.ExecSQL;Qry.SQL.Text := ''''create table t1( idRubrik integer not null, Rubrik char(100), primary key(idRubrik))'''';Qry.ExecSQL;Qry.SQL.Text := ''''create table t2( id integer not null, IdRubrik integer, primary key (id), foreign key(idRubrik) references t1(idRubrik))'''';Qry.ExecSQL;end;[/quote] Зачем же так резко... Во первых: ADO работает через драйвер, а человек видимо работает из интерфейса. Во вторых: т.к. ADO работает через драйвер, то не факт, что приведенный выше пример должен работать на Access-е всех версий, не говоря уже о том что описанные конструкции - это уже transact SQL, а не стандарт ...Thu, 29 Sep 2005 17:30:00 GMTAirhandhttp://www.relib.com/forums/Topic881328-2-1.aspxДа и врешь ты все на счет ограничения CREATE TABLE.. Пример на Delphi 5, АДО:procedure TForm1.Button1Click(Sender: TObject);begin ADOC.Connected := True; Qry.SQL.Text := ''drop table t1''; Qry.ExecSQL; Qry.SQL.Text := ''create table t1( idRubrik integer not null, Rubrik char(100), primary key(idRubrik))''; Qry.ExecSQL; Qry.SQL.Text := ''create table t2( id integer not null, IdRubrik integer, primary key (id), foreign key(idRubrik) references t1(idRubrik))''; Qry.ExecSQL;end;Как видим, стандарт SQLThu, 29 Sep 2005 09:33:00 GMTvpanasenkohttp://www.relib.com/forums/Topic881328-2-1.aspx[quote="mentos_has_arisen"]а ALTER TABLE только через DAO.. и то ошибку выдает.. может примерчик хоть маленький? Есть таблица "рубрик" (ключевое IdRubrik) и создается таблица наименований с собственным ключем и полем IdRubrik с связью таблицы "рубрик".Спасибо заранее :) [/quote]Ты хоть(как тот Колобок), намекни, чем стучишь с Access...Thu, 29 Sep 2005 09:15:00 GMTvpanasenkohttp://www.relib.com/forums/Topic881328-2-1.aspxа ALTER TABLE только через DAO.. и то ошибку выдает.. может примерчик хоть маленький? Есть таблица "рубрик" (ключевое IdRubrik) и создается таблица наименований с собственным ключем и полем IdRubrik с связью таблицы "рубрик".Спасибо заранее :) Tue, 27 Sep 2005 22:20:00 GMTmentos_has_arisenhttp://www.relib.com/forums/Topic881328-2-1.aspxа ALTER TABLE ?Mon, 26 Sep 2005 16:05:00 GMTvpanasenko