Как создать новую таблицу в базе данных Access?

← →
Black © (2004-10-07 10:22) [0]

← →
sniknik © (2004-10-07 11:53) [1]

запросом CREATE TABLE ... или SELECT INTO ...

← →
Black © (2004-10-09 07:26) [2]

Извините, а можно немного поподробней, а то я никогда с этим не сталкивался. Если у вас есть какая нибудь ссылка на материал по этой теме то, пожалуйста, напишите

← →
sniknik © (2004-10-09 10:50) [3]

http://www.yandex.ru/yandsearch?text=CREATE+TABLE&stype=www

← →
Silla © (2004-10-09 23:00) [4]

Вот рабочий вариант:

procedure ExistsTblJournal(PathToBase, DataBaseName: String;
ADOConnection: TADOConnection);
var
TablesList: TStringList;
Tab: TADOCommand;
begin
TablesList := TStringList.Create;
try
ADOConnection.GetTableNames(TablesList);
if TablesList.IndexOf("Journal")<0 then
begin
// создать ее
Tab := TADOCommand.Create(nil);
Tab.CommandText := "Create table Journal ("+
"Id INTEGER not null primary key," +
"IdDocument INTEGER," +
"IdDocumentType INTEGER," +
"IdDocumentBased INTEGER,"+
"DocumentDate DATE," +
"IdJob INTEGER," +
"IdUser INTEGER," +
"UserDate DATE);";
Tab.Connection := ADOConnection;
Tab.Execute;
Tab.Free;
end;
finally
TablesList.Free;
end;
end;
Думаю разберешься.

← →
Black © (2004-10-10 11:47) [5]

Спасибо. Очень помогло.

А можно как нибудь ключевое поле ID сделать не числовым а счетчиком

можно конечно.
см. по COUNTER, AUTOINCREMENT, IDENTITY.

тип COUNTER или AUTOINCREMENT

Как создать новую таблицу в базе данных Access? Найти похожие ветки