VB6连接PostgreSQL数据库

最新推荐文章于 2024-08-28 14:02:01 发布

原创最新推荐文章于 2024-08-28 14:02:01 发布 · 5.2k 阅读

6 ·

CC 4.0 BY-SA版权

文章标签：

#postgresql #vb #datagrid #database #command #windows

PostgreSQL 同时被 2 个专栏收录

10 篇文章

订阅专栏

5 篇文章

订阅专栏

本文介绍了一种使用ODBC在Windows环境下连接PostgreSQL的方法。通过设置数据源并指定必要的连接参数，如Driver、Server、Port等，实现了与PostgreSQL数据库的有效连接。文中还提供了一个VBScript示例，演示了如何通过编写代码来打开连接并查询数据。

http://www.connectionstrings.com/?carrier=postgresql 这是很好的资源。

我采用ODBC的连接方式，即：Driver={PostgreSQL};Server=IP address;Port=5432;Database=myDataBase;Uid=myUsername;Pwd=myPassword;
Windows上建立数据源的步骤：控制面板--管理工具--数据源（ODBC）--文件DNS--追加，选择PostgreSQL Unicode，下一步，起个文件名，完成即可。
值得注意的是，程序中的Driver也得是PostgreSQL Unicode。

我在http://www.postgresql.org/download/也下了ODBC Driver和OLE-DB Driver，dll文件在system32和PostgreSQL/8.2/lib里都放了，不知没有它们会怎样，pgsql安装后是否自带了。。

例子：
Private Sub Command1_Click()
    Dim con As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    con.Open "Driver=PostgreSQL Unicode;Server=127.0.0.1;Port=5432;Database=databasename;Uid=username;Pwd=password;"
    rs.Open "select * from tablename", con, 3, 1
    Set DataGrid1.DataSource = rs
End Sub