Помогите с созданием базы данных InterBase

← →
Программер © (2003-05-20 09:12) [0]

Народ помогите пожалуйста, дипломная висит на волоске.

Необходимо создать прогу в которой динамически создавалась бы БД InterBase, и таблицы в ней (все это нужно реализовать при помощи SQL-запросов).

Я пробовал сделать так CREATE DATABASE primer.gdb; и Дельфя выдала мне что это типа глюк. Может я че не так пишу, подскажите плиз.

Заранее благодарен.
С Уважением, Программер.

← →
Reindeer Moss Eater (2003-05-20 09:20) [1]

Create process + isql.exe + CreateDatabase.sql

or

ibase.h + isc_dsql_execute_immediate

← →
Ann © (2003-05-20 09:22) [2]

> Reindeer Moss Eater

:))

← →
3JIA9I CyKA © (2003-05-20 09:33) [3]

Хана диплому

← →
Программер © (2003-05-20 09:56) [4]

2 Reindeer Moss Eater

Оригинально :) А как это понять :( Объясни поподробнее, плиз

2 3JIA9I CyKA
Зачем так пессиместично :(

← →
Reindeer Moss Eater (2003-05-20 10:18) [5]

Create process + isql.exe + CreateDatabase.sql означает, что сделай файл CreateDatabase.sql со скриптом создания БД (со скриптом создания БД и объектов в ней), с помощью функции Create process запусти isql.exe из состава клиентской части IB и передай в качестве входного файла созданный скрипт.

or

ibase.h + isc_dsql_execute_immediate означает: возьми файл ibase.h, сделай из него ibase.pas, и воспользуйся функцией isc_dsql_execute_immediate описанной в нем. Одним из аргументов функции будет строка "CREATE DATABASE ....."

← →
Программер © (2003-05-20 10:30) [6]

2 Reindeer Moss Eater
Круто, спасибо попробую :)

а что нить попроще, например в IBX:
TIBDataBase.CreateDatabase;
Call CreateDatabase to create a database using Params as the rest of the CREATE DATABASE command.

Блин, во студент пошел!
Нет я конечно понимаю, сам писал диплом в последние 2 недели, но ведь уже знал что писать и как.
А тут 20 мая, диплом по базам, а он даже не знает как создать базу данных.
Извините за оффтоп.

← →
Reindeer Moss Eater (2003-05-20 12:56) [9]

>kravchuk ©
Это не проще, это то же самое.

unit unit IBDatabase;
......

procedure TIBDatabase.CreateDatabase;
var
tr_handle: TISC_TR_HANDLE;
begin
CheckInactive;
tr_handle := nil;
Call(
isc_dsql_execute_immediate(StatusVector, @FHandle, @tr_handle, 0,
PChar("CREATE DATABASE """ + FDBName + """ " + {do not localize}
Params.Text), SQLDialect, nil),
True);
end;

Помогите с созданием базы данных InterBase Найти похожие ветки