有時候,用戶需要經常更換數據源獲取數據,那麼我們做的固定的連接字符串就不能滿足需要,這時候,可以讓用戶自行選擇所需要的數據源,程序可根據用戶所選擇的數據源生成連接字符串,這樣就能實現用戶所需的自定義數據源.
以下步驟設置 VB.Net 示例演示如何使用 DataLinks 對象來編輯連接字符串屬性的 ADO 連接對象:
1. VisualBasic 中新建一個新的標準 EXE 項目。 默認情況下創建 Form 1。
2. 在 項目 菜單, 設置對 Microsoft ActiveX Data Objects 2 和 OLE OLEDB 服務組件 1.0 類型庫 引用。
3. 分別拖放一個Label、TextBox和Button到界面上,分別命名爲lblConn、txtConn和btnConn。
4.雙擊btnConn,在Click事件中加入如下代碼:
Dim MSDASCObj As MSDASC.DataLinks
MSDASCObj = New MSDASC.DataLinks
Dim cn = New ADODB.Connection
MSDASCObj.PromptEdit(cn)
Try
cn.Open()
txtConn.Text = cn.ConnectionString
Catch ex As Exception
MsgBox("打開連接失敗!")
Finally
If cn.State = ConnectionState.Open Then
cn.Close()
End If
End Try
5.保存項目並運行