Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.19;
Скачать: CL | DM;

Вниз

FireBird & CreateDatabase   Найти похожие ветки 

 
Fl@sh ©   (2006-03-03 13:23) [0]

Пытаюсь создать базу програмно.
FireBird 1.0.3

edUser.Text=SYSDBA
edPassword.Text=masterkey

Вот код:

const
 Directory: string = "C:\Program files\System Klient-Bank";
 FileName: string = "Base.fdb";

...
 begin
   with DataModul.IBDatabase do
   begin
     Connected := False;
     Params.Clear;
     DatabaseName := Directory + "\" + FileName;
     Params.Add("USER "" + edUser.Text + """);
     Params.Add("PASSWORD "" + edPassword.Text + """);
     //Params.Add("DEFAULT CHARACTER SET WIN1251");
     SQLDialect := 3;
   end;

 
   if not DirectoryExists(Directory) then
     CreateDir(Directory);
   if not FileExists(Directory + "\" + FileName) then
   begin
     DataModul.IBDatabase.Params.Add("PAGE_SIZE=4096");
     DataModul.IBDatabase.CreateDatabase;

   end;

   DataModul.IBDatabase.Connected := True;

 end; {if check passw..}


Этот код работает, создает базу, казалось бы все отлично, но
как только додаю
Params.Add("DEFAULT CHARACTER SET WIN1251");
Все!! Появляется такая ошибка:
Project SystemKlientBank.exe raised exception EIBInterBaseError with message
"Dinamic SQL Error, SQL Error kode -104
Token Unknown line 1, char 68,
"SYSDBA"" process stop..

Непонимаю как непонятен, это ж логин пользователя, к тому же если не задавать CHARACTER, то создает
Да, при следуючим создании база удаляется и создается новая.

В книжках пишут, что надо задавать user_name=SYSDBA(а не USER, как у меня, и без кавычек) и password=masterkey(тоже без кавычек и с знаком "=").

Ставлю такие параметры:
Params.Add("USER_NAME="" + edUser.Text + """);
Params.Add("PASSWORD="" + edPassword.Text + """);
без DEFAULT CHARACTER SET
Появляется ошибка:
Project SystemKlientBank.exe raised exception EIBInterBaseError with message
"Your user name and password are not defined. Ask your database administrator to set up an InterBaselogin" process st..

Если без кавычек:
Params.Add("USER_NAME=" + edUser.Text);
       Params.Add("PASSWORD=" + edPassword.Text);

без DEFAULT CHARACTER SET

Появляется предыдущая ошибка.

Что я не так делаю. Как надо правильно.


 
Desdechado ©   (2006-03-03 13:46) [1]

неужели тяжело дважды кликнуть на IBDatabase, заполнить параметры, нажать ок, потом в инспекторе ткнуть на params и посмотреть, в каком формате задается это все?


 
Sergey13 ©   (2006-03-03 13:48) [2]

>Пытаюсь создать базу програмно.
А смысл?


 
Fl@sh ©   (2006-03-03 14:24) [3]


> Desdechado ©   (03.03.06 13:46) [1]
> неужели тяжело дважды кликнуть на IBDatabase, заполнить
> параметры, нажать ок, потом в инспекторе ткнуть на params
> и посмотреть, в каком формате задается это все?

Ок, обязательно посмотрю


> Sergey13 ©   (03.03.06 13:48) [2]

Незнал про IBConsolе, теперь знаю, но почему не работает єтот вариант, интерестно.


 
Sergey13 ©   (2006-03-03 14:41) [4]

2[3] Fl@sh ©   (03.03.06 14:24)
> Незнал про IBConsolе
Есть еще IBExpert - зе бест оф зе бест для ИБ-клонов.

Но я про другое. 8-)
Я понимаю еще DBF-ки создавать в рантайме - файл он и есть файл. Но тут то БД это не только таблицы, но и хранимки всякие, тригеры и т.п. лабуда. Все в рантайме делать? Не проще ли файл с готовой пустой БД скопировать?


 
Fl@sh ©   (2006-03-03 15:04) [5]


> Sergey13 ©   (03.03.06 14:41) [4]

Вы правы! :), я так и буду делать, просто хотелось узнать, почему не работает CreateDatabase, т.е. оно работает, но я что-то не так задаю params. Дома попробую еще по совету Desdechado.
Спасибо.


 
Amoeba ©   (2006-03-03 17:46) [6]


> Незнал про IBConsolе

Выкинь нафиг это старье! Есть ведь IBExpert.


 
Amoeba ©   (2006-03-03 17:47) [7]

И обнови Fibird до 1.53



Страницы: 1 вся ветка

Текущий архив: 2006.03.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.041 c
2-1141118521
Patrick
2006-02-28 12:22
2006.03.19
Принципиальный вопрос.


2-1141120216
dera
2006-02-28 12:50
2006.03.19
В чем ошибка?


2-1141608415
tolians
2006-03-06 04:26
2006.03.19
Помогите сделать SQL запрос


2-1141141601
VitV
2006-02-28 18:46
2006.03.19
Interbase+Delphi+Flash


15-1140680802
McSimm
2006-02-23 10:46
2006.03.19
Конкурсы и призы, азарт, соревновательность и интерес.