sql - 关于dsn字符串的查询

Question

下面是在 VBA 应用程序中填充列表框的代码:

Private Sub Form_Open(Cancel As Integer)

  ''#Populate list box control.
  Dim cnn As ADODB.Connection
  Dim strSQL As String
  Dim rst As ADODB.Recordset
  Dim strList As String

  On Error GoTo ErrHandler

  ''#Use DSN to Northwind. 
  ''#Modify connection and connection string as needed.

  Set cnn = New ADODB.Connection
  cnn.Open "DSN=NorthwindExample"
  strSQL = "SELECT * FROM Shippers"
  Set rst = New ADODB.Recordset
  rst.Open strSQL, cnn
  strList = rst.GetString(adClipString, , ";", ",")

  Debug.Print strList

  Me.lstShippers.RowSource = strList
  rst.Close
  cnn.Close
  Set rst = Nothing
  Set cnn = Nothing

  Exit Sub

ErrHandler:
  MsgBox Err.No & ": " & Err.Description, vbOKOnly, "Error"
  Set rst = Nothing
  Set cnn = Nothing
End Sub

我需要知道我需要将什么作为 DSN 字符串？我从哪里可以获得信息？

此代码中的 adClipString 是什么？

由于我从同一 Access 表中获取值，是否有任何选项可以在不使用 DSN 连接对象的情况下填充列表控件？

Answer 1

以下链接包含 Access 的不同连接字符串: http://www.connectionstrings.com/access

类似这样的内容应该有效:Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;User Id=admin;Password=;

我不确定 adClipString 是什么，它可能是未声明的变量或数据库列？

马特