SQL Server和VBA之间的连通性

| 我无法在SQL Server和VBA表单之间建立连接。引发以下错误 编译器错误: 用户定义类型未定义 这是包含服务器详细信息的代码:
Private Sub CommandButton1_Click()
  Dim cnn As ADODB.Connection
  Dim cnn As ADODB.Command
  Set cnn = New ADODB.Connection
  Set cnn = New ADODB.Command
  cnn.Open \"Provider=sqloledb;\" & _
           \"Data Source=<IP>;\" & _
           \"Initial Catalog=<DB>;\" & _
           \"User Id=<USER>;\" & _
           \"Password=<PASS>\"
  MsgBox \"connection successful\"
  cnn.Close

End Sub
    
已邀请:
您需要添加对“ 1”的引用,其中X.X是ADO版本。 然后,您将在第二行出现错误,因为您试图重新声明
cnn
变量。     

要回复问题请先登录注册