Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Для новичков > Создание базы данных программно!!! Помогите!!!


Автор: Ivan230884 10.11.2015, 08:10
Доброго времени суток!

Подскажите где ошибка кода. Использованное ПО: Delphi XE8, InterBase, FireBird (Firebird-2.5.4.26856_0_x64, superserver, установлен как служба), Firebird_ODBC_2.0.3.154_x64.

Скажу честно, уровень моих знаний в программировании не то что бы не высок - он ниже среднего.
Но есть задача и желание её решить, думаю что смогу разобраться.

Просто бывают моменты когда упираешься в проблему и не как не можешь её решить, хотя она элементарная!

Подскажите пожалуйста где ошибка, компилятор пишет: "Project ***.exe raised exception class EIBInterBaseError with message 'unavailable database' " 

IBDBase - переименованный мною компонент TIBDatabase.

Код

procedure TOpenForm.FormCreate(Sender: TObject);
begin
  if FileExists('D:\12345\Base.ib') then
     begin
     // Пока 
     // пусто!
     end
   else
     begin
       with IBDBase do
         begin
           Connected:=False;
           DatabaseName:='D:\12345\Base.ib';
           SQLDialect:=3;
           Params.Clear;
           Params.Add('user_name=sysdba');
           Params.Add('PASSWORD=12345');
           Params.Add('sql_role_name=3');
           Params.Add('lc_ctype=WIN1251');
           Params.Add('page_size=4096');
           try
             CreateDatabase;
             MessageDlg (Format ('1', ['D:\12345\Base.ib']), mtInformation, [mbOk], 0);
           except
             on E: Exception do
             MessageDlg (Format ('0', [E.Message]), mtError, [mbOk], 0);
           end;
         end;

      
     end;
end;

Автор: Poseidon 10.11.2015, 09:10
Цитата(Ivan230884 @  10.11.2015,  08:10 Найти цитируемый пост)
компилятор пишет: "Project ***.exe raised exception class EIBInterBaseError with message 'unavailable database' 
Берешь словарик и переводишь сообщение "unavailable database". Окажется что это: "База данных недоступна". Отсюда можно сделать вывод:
  • Файл Base.ib не явлется файлом базы данных (не тот формат)
  •  Не верные логин/пароль

Автор: Ivan230884 10.11.2015, 09:23
Цитата(Poseidon @ 10.11.2015,  09:10)
Цитата(Ivan230884 @  10.11.2015,  08:10 Найти цитируемый пост)
компилятор пишет: "Project ***.exe raised exception class EIBInterBaseError with message 'unavailable database' 
Берешь словарик и переводишь сообщение "unavailable database". Окажется что это: "База данных недоступна". Отсюда можно сделать вывод:

  • Файл Base.ib не явлется файлом базы данных (не тот формат)
  •  Не верные логин/пароль

Видимо, я не полностью описал суть проблемы, в надежде на прозрачность кода.

1. Английский я и без словарика нормально шпрехую.
2. Такого файла не существует в принципе, т.к. именно этим кодом я пытаюсь его создать
3. Логин/пароль - по аналогии с п.2

Суть проблемы: мне надо создать базу данных программно из под дельфей, а не подключиться к созданной.

Автор: Poseidon 10.11.2015, 10:39
После более детального осмотра кода ошибка становися очевидна. Строчку "Connected:=False;" необходимо перенести после строчки CreateDatabase.

http://www.ibase.ru/devinfo/ibx.htm

Автор: Ivan230884 10.11.2015, 10:54
Цитата(Poseidon @ 10.11.2015,  10:39)
После более детального осмотра кода ошибка становися очевидна. Строчку "Connected:=False;" необходимо перенести после строчки CreateDatabase.

http://www.ibase.ru/devinfo/ibx.htm

Замечание принято, с налета выполнено - эффект не достигнут!!!

Но это скорее всего причина того, что надо просто по новой всё написать - было слишком много кривых попыток саморукоблудного  smile  разбирательства!!!

Отдельное и огромное спасибо за ссылку  smile

Добавлено через 1 минуту и 13 секунд
ОЧЕНЬ ЖАЛЬ, ЧТО У МЕНЯ СОВСЕМ МАЛО ПОСТОВ........



++++ и еще раз + Poseidon!!!!

Автор: Poseidon 10.11.2015, 11:07
Цитата(Ivan230884 @  10.11.2015,  10:54 Найти цитируемый пост)
Замечание принято, с налета выполнено - эффект не достигнут!!!
Возможно это из-за не такого формата Params. Попробуй сделать все так же как и по ссылке.

Автор: Ivan230884 10.11.2015, 11:10
Цитата(Poseidon @ 10.11.2015,  11:07)
Цитата(Ivan230884 @  10.11.2015,  10:54 Найти цитируемый пост)
Замечание принято, с налета выполнено - эффект не достигнут!!!
Возможно это из-за не такого формата Params. Попробуй сделать все так же как и по ссылке.

Да-да.... именно этим и занимаюсь!
Детально изучаю FAQ!

Короче все как и должно быть в России. Если что-то не получается собрать с десятого раза, то надо всё-таки почитать инструкцию по сборке smile !!!

Автор: DYUMON 11.11.2015, 05:42
может ему расширение файла не нравится?

Этот ответ добавлен с нового Винграда - http://ru.vingrad.com/Sozdaniye-bazy-dannykh-programmno-Pomogite-id56417ca2ae2015954e8b4567#findElement_E7045_5642ab07ae2015041d8b53e8_0

Автор: DYUMON 11.11.2015, 05:45
Кстати а сервер указывать не надо ?
Код

DatabaseName:='127.0.0.1:D:\12345\Base.ib';


Этот ответ добавлен с нового Винграда - http://ru.vingrad.com/Sozdaniye-bazy-dannykh-programmno-Pomogite-id56417ca2ae2015954e8b4567#findElement_E7045_5642abdeae2015d5098b677a_0

Автор: barmaley4ik 11.11.2015, 14:25
Какие компоненты используются? Файл "физически" создается, смотрели по пути?
Я бы не использовал компоненты сторонние, лучше юзать isql.exe  лежит в .\bin огнептицы

Этот ответ добавлен с нового Винграда - http://ru.vingrad.com/Sozdaniye-bazy-dannykh-programmno-Pomogite-id56417ca2ae2015954e8b4567#findElement_E7045_5643258fae201515068b4881_0

Автор: Poseidon 15.11.2015, 22:57
Цитата(barmaley4ik @  11.11.2015,  14:25 Найти цитируемый пост)
Я бы не использовал компоненты сторонние
Какие сторонние? Человек использует InterBase, которые идут в стандартной поставке.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)