Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.16;
Скачать: CL | DM;

Вниз

ADO и база данных   Найти похожие ветки 

 
User_OKA ©   (2002-04-19 09:56) [0]

Пивет Мастера!!!

Есть такой вопрос: Каким образом, можно с помощью компонента ADOTable создать базу данных DBASE.


 
zx   (2002-04-19 10:04) [1]

Помоему ADO провайдеров для DBASE нету.
Если только ADO через Jet.


 
User_OKA ©   (2002-04-19 10:30) [2]

Через Table я создаю БД так:

try
with Table1 do begin
TableName:="Vrem.db";
TableType:=ttParadox;
FieldDefs.Clear;
FieldDefs.Add("XKr1",FtFloat,0,False);
FieldDefs.Add("YKr1",FtFloat,0,False);
FieldDefs.Add("XKr2",FtFloat,0,False);
FieldDefs.Add("YKr2",FtFloat,0,False);
FieldDefs.Add("XPr1",FtFloat,0,False);
FieldDefs.Add("YPr1",FtFloat,0,False);
FieldDefs.Add("XPr2",FtFloat,0,False);
FieldDefs.Add("YPr2",FtFloat,0,False);
FieldDefs.Add("XPr3",FtFloat,0,False);
FieldDefs.Add("YPr3",FtFloat,0,False);
CreateTable;
Open;
end;
except
Table1.Close;
ShowMessage("Не удалось создать БД!!!");
Exit;
end;

А как через ADOTable создать ту же базу данных.


 
Kuusiniemi ©   (2002-04-19 11:18) [3]

А Create table не пробовали??


 
User_OKA ©   (2002-04-19 12:25) [4]

А можно поподробней!!!


 
Kuusiniemi ©   (2002-04-19 14:41) [5]

А вот так:

ADOQuery1.ConnectionString := "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\;Extended Properties=Paradox 7.x;Mode=Read|Write|Share Deny None; Persist Security Info=True";

ADOQuery1.SQL.Text := "Create Table Vrem (XKr1 Float, YKr1 Float)";

// Ну дальше там перечислите все поля какие Вам нужны.

ADOQuery1.ExecSQL;


 
User_OKA ©   (2002-04-19 15:23) [6]

Спасибо


 
User_OKA ©   (2002-04-19 15:37) [7]

Но вот не задача. Появилась другая проблема:
При выполнении запроса все проходит нормально, если БД еще не создана, а мне необходимо, чтобы БД пересоздавалась.

ПОМОГИТЕ!!!


 
Kuusiniemi ©   (2002-04-19 15:45) [8]

Ну а Drop Table перед Create Table??? :)))



Страницы: 1 вся ветка

Текущий архив: 2002.05.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.009 c
1-49939
BlackGrin
2002-05-03 19:41
2002.05.16
Canvas does not allow drawing


3-49851
ЮРИЙ_К
2002-04-19 10:36
2002.05.16
Прверка существования поля в таблице.


1-49990
Explorer
2002-04-30 09:25
2002.05.16
Руссификация дизайнера PReport


1-49965
DenUp
2002-05-04 23:34
2002.05.16
Помогите....


6-50058
Anar
2002-02-27 14:01
2002.05.16
Подключение к интернет.