Главная страница
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.02 c
3-49896
rvs
2002-04-22 08:21
2002.05.16
BatchMove - batCopy


1-50025
VID
2002-04-29 20:42
2002.05.16
Разблокировка реестра


1-49944
Reticent
2002-05-03 13:16
2002.05.16
Совсем простой вопрос :)


1-49978
Zevsus
2002-04-29 18:19
2002.05.16
Из БД да в Exel


14-50137
MBo
2002-04-04 17:09
2002.05.16
Еще задачки