首页 > 数据库> 文章详细

vb6.0连接postgresql 13

2021-04-15 21:00:15 阅读：267 来源： 互联网

标签：13 postgresql adoConn odbc adoRs DataGrid1 vb6.0 ADODB 连接

遇到的问题记录一下。

1.首先是安装pgssql，我安装的是13版本的。
2.安装完成之后，安装navicat工具，便于查询，数据库到这边就装完了，
3.还原之前的数据库。。。
4.下载odbc驱动 https://www.postgresql.org/ftp/odbc/versions/msi/
直接安装即可。
在这里插入图片描述
5.打开 控制面板–>管理工具–>ODBC数据源（64位）–>添加–>输入账号密码 可以进行测试test

6.你可能在这边数据的ip地址连接失败。只能用localhost连接，这时候需要修改pgsql文件 pg_hba.conf
添加一行代码
在这里插入图片描述
7.此时再来测试连接，发现就成功了，然后save。
8.配置好odbc之后来到vb界面，我这边直接把vb的方法放出来
其中Driver后面的字符串，必须是上面驱动中的名称

Public adoConn As New ADODB.Connection
Public adoRs As New ADODB.Recordset
Private Sub Form_Load()

Set adoConn = New ADODB.Connection
'adoConn.Open "provider=SQLOLEDB;password=11;PersistSecurity Info=true;User ID=uto;Initial Catalog=UTODB;Data Source=127.0.0.1"      '连接mssql数据库
adoConn.Open "Driver=PostgreSQL Unicode;Server=127.0.0.1;Port=5432;Database=gqw;Uid=postgres;Pwd=123;"    '连接pgsql数据库

Set adoRs = New ADODB.Recordset '新建一个实例

adoRs.Open "SELECT KHGL_KHBM,KHGL_KHMC,KHGL_KHJC from khgl WHERE 1=1 AND KHGL_GSID='2000' ORDER BY khgl_khbm", adoConn, 1, 3  '后面的3是确定读写权限的
 Set DataGrid1.DataSource = adoRs
 
 DataGrid1.Columns(0).Caption = "编号"
 DataGrid1.Columns(1).Caption = "客户名称"
  DataGrid1.Columns(2).Caption = "客户简称"
 
    'adoRs.Close
End Sub

在这里插入图片描述
9.到这一步其实正常是可以完工了，但是我遇到了数据库架构不同的问题，这个数据表不在默认架构public下，还得继续调整。

找到一个连接字符串工具
https://www.connectionstrings.com/postgresql-odbc-driver-psqlodbc/

10.百度找了个解决办法，但是不管用
在这里插入图片描述
11.最后只能修改用户的默认架构了
ALTER USER postgres SET search_path to 'gqw_db’

12.收工！

标签：13,postgresql,adoConn,odbc,adoRs,DataGrid1,vb6.0,ADODB,连接
来源： https://blog.csdn.net/qq_37935177/article/details/115738037

本站声明： 1. iCode9 技术分享网（下文简称本站）提供的所有内容，仅供技术学习、探讨和分享；
2. 关于本站的所有留言、评论、转载及引用，纯属内容发起人的个人观点，与本站观点和立场无关；
3. 关于本站的所有言论和文字，纯属内容发起人的个人观点，与本站观点和立场无关；
4. 本站文章均是网友提供，不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属；如您发现该文章侵犯了您的权益，可联系我们第一时间进行删除；
5. 本站为非盈利性的个人网站，所有内容不会用来进行牟利，也不会利用任何形式的广告来间接获益，纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。

ICode9

vb6.0连接postgresql 13