FireBird 数据库VB6连接与部署

FireBird数据库的前景不错，或许你下次就会用到它，我是用以下方式通过连接的）1、已经自动装了FireBird。2、我又装了“Firebird_ODBC_2.0.0-Win32.exe”，并设置。3、firebird数据库中的bin文件夹下的fdclient.dll文件，改名复制到SYSTEM32 (64位：SysWOW64)系统文件夹下，更名为“GDS32.DLL”。4、在VB 6.0中源码[vb] 
Private Sub Command1_Click() 
connStr = "DRIVER=Firebird/interBase(r) driver;UID=SYSDBA;PWD=masterkey;DBNAME=C:\MyPrgoram\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 
四、结果测试通过。

参考： Firebird中的ODBC设置第一步、安装firebird2.0。第二步、安装firebird ODBC驱动程序。第三步、设置firebird ODBC Setup。首先打开windows下的控制面板->管理工具。双击数据源 (ODBC)，选择系统DNS，如下图所示：
点击添加按钮，出现下面的对话框，选中Firebird/InterBase(r) driver，然后点击完成按钮将出现下一个对话框：
对其进行设置◆DSN是你想取的数据源名字（任意）◆Driver是默认的不用选◆描述字段可以不填◆数据库是你用firebird来创建的任意数据库中的路径，例如：C:\Program Files\Firebird\Firebird_1_5\security.fdb◆客户字段是你安装firebird数据库中的bin文件夹下的client.dll文件，将其包含进去。◆数据库账户和密码分别是：SYSDBA和masterkey◆角色可以不填 ◆其他的字段采用默认设置然后点击ok按钮就行了