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

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

Создать базу данных [IB6.x]


Sers ©   (2002-10-29 10:45:00) 

Можно ли создать пустую базу данных из программы:

Create Database "..."; ?

Если можно, то как ?


mikl2002   (2002-10-29 11:51:00) [1]

Рабочий пример,когда-то писал...
ibdatabase1.Connected := false;
ibdatabase1.DatabaseName := Filename;
ibdatabase1.SQLDialect := 1;
try
ibdatabase1.Params.Clear;
ibdatabase1.Params.add("USER "SYSDBA"");
ibdatabase1.Params.add("PASSWORD "masterkey"");
ibdatabase1.CreateDatabase;
if ibdatabase1.Connected then ibdatabase1.Close;
ibdatabase1.Params.Clear;
ibdatabase1.Params.add("user_name");
ibdatabase1.Params.Values["user_name"] := "SYSDBA";
ibdatabase1.Params.add("password");
ibdatabase1.Params.Values["password"] := "masterkey";
if not ibdatabase1.Connected then ibdatabase1.Connected := true;
if not ibtransaction1.Active then ibtransaction1.Active := true;
IBsql1.SQL.Clear;
ibsql1.SQL.Add("CREATE TABLE PRESENT_TABLE( ID INTEGER NOT NULL,S_PRES CHAR(20),PRIMARY KEY (ID));");
IBsql1.EXECQUERY;
IBsql1.SQL.Clear;
...
и т.д.


Sers   (2002-10-29 11:39:00) [2]

Какие именно ?

IBSQL - требует в свойствах указания базы данных. А что мне указывать, если я ее создаю ?


stone   (2002-10-29 11:28:00) [3]

Можно, если использовать IB компоненты


Наверх

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