Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.05.16;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.006 c
1-49924
HDD
2002-04-29 15:26
2002.05.16
Undo


1-49940
Miwa
2002-05-03 18:42
2002.05.16
TListBox.OnDrawItem


3-49866
Dorosh
2002-04-15 15:23
2002.05.16
Polaris DbTreeView


7-50154
Polygon
2002-02-17 22:45
2002.05.16
Соотношение R/G/B, Яркость изображения


4-50180
chernoruk
2002-03-16 22:20
2002.05.16
Вопрос: Get Process ID (path to a file.exe) ????????????





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский