如何将 PostgreSQL 与 VB.NET 应用程序连接

Question

我想将我的 VB.NET Windows 应用程序与 PostgreSQL 9.3 连接 Beibg 是一个初学者，我无法通过 ODBC 和 Npgsql 来完成此操作

Dim mDAKap As New Odbc.OdbcDataAdapter
Dim mCon As New Odbc.OdbcConnection
mCon.ConnectionString = "Dsn=PostgreSQL30;database=public;server=127.0.0.1;port=5432;uid=root;pwd=root"
mCon.Open()

我在 mCon.OPen() 上遇到错误

请帮忙看看我的参数是否正确？

Answer 1

从另一个来源得到我的答案，写在这里是为了像我这样的其他初学者，以节省他们的时间：

首先安装 ODBC 驱动程序（在此处获取 http://www.postgresql.org/ftp/odbc/versions/msi/） 安装 32 位驱动程序后::

Dim MyCon As New Odbc.OdbcConnection
MyCon.ConnectionString = "Driver={PostgreSQL ANSI};database=database_name;server=127.0.0.1;port=5432;uid=postgres;sslmode=disable;readonly=0;protocol=7.4;User ID=postgres;password=password;"

MyCon.Open()
        If mCon.State = ConnectionState.Open Then
            MsgBox("Connected To PostGres", MsgBoxStyle.MsgBoxSetForeground)
        End If

Answer 2

使用

PostgresQL 16.2

和

Microsoft Visual Studio Community 2022

（64 位）我使用以下行打开数据库并获取数据库的版本

    Public cn As NpgsqlConnection

    Private Sub OpenDataBase()
        Dim cs As String 'ConnectionString

        cs = "Server=127.0.0.1:5434;Database=extraits;Userid=postgres;Password='********'"

        cn = New NpgsqlConnection(cs)
        Try
            cn.Open()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

        Dim sSQL = "SELECT version()"
        Dim cmd As New NpgsqlCommand(sSQL, cn)
        Dim dr As NpgsqlDataReader
        dr = cmd.ExecuteReader()
        dr.Read()
        Dim sVersion As String = dr.Item(0)
        Console.WriteLine("PostgreSQL VERSION: " & sVersion)
        dr.Close()
    End Sub