VB6连接PostgreSQL数据库

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