excel VBA连接到Teradata

h7appiyu  于 2022-11-18  发布在  其他
关注(0)|答案(1)|浏览(260)

我尝试使用以下代码通过VBA连接到Teradata:

Sub sql_query()

Dim Cn As ADODB.Connection
Dim Rc As ADODB.Recordset
Set Cn = New ADODB.Connection
On Error GoTo Invalid
Cn.Open "Driver={Teradata};DBCname=TDPREPE01;Uid=xxxx;Pwd=xxxxx!;"
Invalid:
MsgBox ("There was error number " & Err.Number & ". This is " & Err.Description & ".")

End Sub

当我运行它时,我得到以下错误:

我知道我用正确的凭据登录了,因为它与我登录mySQL时使用的凭据相同。
有人知道问题出在哪里吗?
这是我的活动连接的屏幕截图:

pdtvr36n

pdtvr36n1#

主要的一点是设置一个身份验证,否则将没有连接。
以下措施有效:

Sub sql_query()

Dim Cn As ADODB.Connection
Dim Rc As ADODB.Recordset
Set Cn = New ADODB.Connection
Cn.Open "Driver={Teradata};DBCname=TDPREP01;Uid=C121009;Pwd=Internet2022!; Authentication=LDAP;"

结束子组件

相关问题