Что нового

Firebird получить список таблиц

DyadyaGenya

Знающий
Сообщения
270
Репутация
5
Доброго времени суток. Пробую разобраться с Firebird. Нужно для начала получить список всех таблиц. Вроде получается подключится с помощью драйвера ODBC, но на запрос по таблицам выдает какое-то непонятное сообщение (при других запросах выдается аналогичные сообщения, иногда с другими цифрами, иногда с какими-то сообщениями):
Код:
Func FB()
    Local $obdc_drv2 = "Firebird/InterBase(r) driver"
Local $key = "HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\ODBC Drivers", $val = RegRead($key, $obdc_drv2)
    If @error or $val = "" Then
            MsgBox(64,"Внимание","Вероятно не установлен"& @CR & $obdc_drv2)
            Exit

    EndIf
; Подключаемся к Серверу
Global $adoCon = ObjCreate("ADODB.Connection")
$adoCon.Open("DRIVER={Firebird/InterBase(r) driver};UID=Название;PWD=Пароль; DBNAME=Путь БД;")

$fb = $adoCon.Execute("select * from rdb$relations")
    MsgBox(16,"",$fb.Fields(0).Value)
; как вариант     MsgBox(16,"",$fb)
    ConsoleWrite($fb)

$adoCon.Close

EndFunc

FB()

И не понятно, нужно ли закрывать соединение и как это правильно сделать. У меня это по идее строка $adoCon.Close
 

Вложения

  • Сообщение автоита.jpg
    Сообщение автоита.jpg
    9.3 КБ · Просмотры: 1
Последнее редактирование:
Верх