FireBird 数据库连接

来源：岁月联盟编辑：exp 时间：2012-07-11

一、因由

象过河V6.0.188 中使用了FireBird数据库

一同学数据可能需要从“超旺百货增强版”导致象过河中。因象过河支持USB转接线单独开钱箱，而超旺用了转接线得打小票才能开钱箱。

二、FireBird数据库的前景不错，或许自己下次就会用到它。

三、条件（不一定都需要具备，但我是用以下方式通过连接的）

1、象过河已经自动装了FireBirdV2.0。

2、我又装了“Firebird_ODBC_2.0.0-Win32.exe”，并设置。

3、firebird数据库中的bin文件夹下的fdclient.dll文件，改名复制到SYSTEM32为“GDS32.DLL”。

4、在VB 6.0中源码

[vb]
Private Sub Command1_Click()
    connStr = "DRIVER=Firebird/interBase(r) driver;UID=SYSDBA;PWD=masterkey;DBNAME=C:/Documents and Settings/Administrator/桌面/Demo.ydb;"
    Set objcon = New ADODB.Connection
    objcon.ConnectionTimeout = 60
    objcon.CommandTimeout = 60
    objcon.CursorLocation = 3
     objcon.Open connStr

    Set rs = objcon.OpenSchema(20)
    While Not rs.EOF
        If rs("TABLE_TYPE") = "TABLE" Then Debug.Print rs("TABLE_NAME")
        rs.MoveNext
    Wend

End Sub
四、结果

测试通过。
jiaguoxinzhi，备查。2012-07-11，代父往阿东那购烫伤药粉。

参考：第2步：

Firebird中的ODBC设置

第一步、安装firebird2.0。

第二步、安装firebird ODBC驱动程序。

第三步、设置firebird ODBC Setup。

首先打开windows下的控制面板->管理工具。双击数据源 (ODBC)，选择系统DNS，如下图所示：

点击添加按钮，出现下面的对话框：

选中Firebird/InterBase(r) driver，然后点击完成按钮将出现下一个对话框：

对其进行设置

◆DSN是你想取的数据源名字（任意）

◆Driver是默认的不用选