Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ADO и база данных [D5, dBase, FoxPro]


User_OKA ©   (2002-04-19 09:56:00) 

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

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


Kuusiniemi   (2002-04-19 15:45:00) [1]

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


User_OKA   (2002-04-19 15:37:00) [2]

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

ПОМОГИТЕ!!!


User_OKA   (2002-04-19 15:23:00) [3]

Спасибо


Kuusiniemi   (2002-04-19 14:41:00) [4]

А вот так:

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 12:25:00) [5]

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


Kuusiniemi   (2002-04-19 11:18:00) [6]

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


User_OKA   (2002-04-19 10:30:00) [7]

Через 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 создать ту же базу данных.


zx   (2002-04-19 10:04:00) [8]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо