将MySQL连接到PostgreSQL

kx5bkwkv 于 5个月前发布在 PostgreSQL

关注(0)|答案(1)|浏览(58)

我正在尝试通过Autodesk Inventor中的VBA连接到表。
我得到如下所示的错误。在Excel中的相同代码的作品。
我检查了我的项目引用，它们匹配。搜索该错误会出现一些与权限相关的问题。它们似乎链接到Excel。我正在使用的方法是Excel专用的吗？

的数据

Sub PostGresTest()

Dim oConn As New ADODB.Connection
Dim cmd As New ADODB.Command
' Connection Parameters
Dim strUsername As String
Dim strPassword As String
Dim strServerAddress As String
Dim strDatabase As String
' User:
strUsername = "TEST"
' Password:
strPassword = "password"
' Server Address:
strServerAddress = "localhost"
' Database
strDatabase = "postgres"

oConn.Open "DSN=PostgreSQL35W;" & _
  "Database=" & strDatabase & ";" & _
  "Uid=" & strUsername & ";" & _
  "Pwd=" & strPassword
.......

字符串
我省略了其余的代码，因为错误发生在oConn.Open行。

postgresql

来源：https://stackoverflow.com/questions/74527641/connect-vba-to-postgresql

1条答案

按热度按时间

svujldwt1#

我做了一些更改的代码和我的DSN设置，然后我的电脑重新启动一夜的Windows更新.今天早上，一切正常.我建议这可能是重新启动，因为它没有工作之前重新启动，但也许我的设置是错误的反正.
我发现一个堆栈问题，建议DSN应该设置在“系统DSN”下，而不是“用户DSN”-（对不起-我失去了链接）-所以我也做了改变。
下面是最终代码：

Function PostGresTest(Optional StrSQL As String = "")

Dim oConn As New ADODB.Connection
Dim cmd As New ADODB.Command
' Connection Parameters
Dim strUsername As String
Dim strPassword As String
Dim strServerAddress As String
Dim strDatabase As String
' User:
strUsername = "TEST"
' Password:
strPassword = "password"
' Server Address:
strServerAddress = "localhost"
' Database
strDatabase = "postgres"
   
Set oConn = CreateObject("ADODB.Connection")
oConn.Open "Driver={PostgreSQL UNICODE};" & _
         "DSN=PostgreSQL35W;" & _
         "Database=" & strDatabase & ";" & _
         "SERVER=" & strServerAddress & ";" & _
         "Uid=" & strUsername & ";" & _
         "Pwd=" & strPassword
 .....

字符串

赞(0）回复(0）举报 5个月前

我来回答

将MySQL连接到PostgreSQL

1条答案

相关问题

热门标签

最新问答