Chiokan
Дата: 20.02.2008 04:01:30
нужно создать таблицу...
Dim strs
strs = "CREATE TABLE DEPARTMENT(DepPK INTEGER CONSTRAINT dep_prk PRIMARY KEY," _
& " FacFK INTEGER CONSTRAINT dep_frk_fac REFERENCES FACULTY(FacPK)ON DELETE CASCADE NOT NULL," _
& " Name VARCHAR(30) NOT NULL, Head VARCHAR(20), Building CHAR(5)," _
& " Fund NUMBER(7, 2) CONSTRAINT dep_chk_fnd CHECK(Fund > 0), CONSTRAINT dep_unq_nam_frk UNIQUE (Name, FacFK));"
CurrentDb.Execute strs
Access 2003,пишет " Ошибка синтаксиса в предложении CONSTRAINT"