由於ADO對象不直接支持MySQL,所以必須先安裝MyODBC, 後者也是一個免費產品，在 www.mysql.org上有下載，安裝好了MyODBC, 就可以在ODBC數據源管理中配置一個數據源名稱，把它指向你想連接的MySQL資料庫。代碼如下：Sub connectMySQL() '通過MyODBC去連接MySQL資料庫，並將Microsoft SQL Server 7 '的數據轉進mysql中 Dim sConnect As String, sSql As String, i As Long Dim cnMSSQL As New ADODB.Connection Dim cnMySQL As New ADODB.Connection '聲明並創建對象 連接 Dim rs As New ADODB.Recordset '聲明並創建對象 記錄集 Dim cm As New ADODB.Command '聲明並創建對象 命令 sConnect = "dsn=mysql1" '指定MySQL的數據源名稱 cnMySQL.Open sConnect '連接到 mysql sConnect="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;pwd=123456;Initial Catalog=softdown;Data Source=ntserver" '連接到 ms sql server 7 cnMSSQL.Open sConnect 'sSql = "create table softinfo (softNum smallint,softname varchar(70),softdesc blob," & _ "softpath varchar(30),softleng varchar(10),softclass varchar(10),softsugest tinyint(1)," & _ "softdown smallint(4))" '創建新的MySQL數據表語句 sSql = "select * from softinfo order by softnum" rs.Open sSql, cnMSSQL, 1, 1 While Not rs.EOF sSql = "insert into softinfo values (" & Trim(rs(0).Value) & ",'" & Trim(rs(1).Value) & _ "','" & Trim(rs(2).Value) & "','" & Trim(rs(3).Value) & "','" & Trim(rs(4).Value) & _ "','" & Trim(rs(5).Value) & "'," & Trim(rs(6).Value) & "," & Trim(rs(7).Value) & ")" cm.ActiveConnection = cnMySQL cm.CommandType = adCmdText cm.CommandText = sSql cm.Execute rs.MoveNext Wend rs.Close Set rs = Nothing cnMySQL.Close Set cnMySQL = Nothing cnMSSQL.Close Set cnMSSQL = Nothing End Sub
2. vb用ado控制項連接資料庫
正確添加了ADO控制項後,設置ADO控制項的Connectionstring屬性,它指出了ADO控制項和資料庫連接的字元串,打開這個屬性的屬性頁,可以通過三種方式設置連接方式,常設置為OLEDB方式:
Connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=你的資料庫路徑"
然後設置RecordSource屬性指出可以操作的資料庫的來源(即結果字元串,可以是SQL查詢產生的).
在設置好後,可以用文本框(textbox)等綁定數據表中的欄位進行顯示.
3. vb中怎麼用ADO控制項連接遠程資料庫 啊
呵呵，正好在書上看到這方面的東西。希望對你有所幫助…………
Adodc 可以通過 ODBC連接遠程資料庫，具體操作（設Adodc 控制項名為Adodc1）
1，將ADO控制項加入窗體
2，生成連接字元串
連接字元是用於確定Adodc與數據源進行連接操作的字元組合，這個連接字元串有多個組成部分，如「provider=MSDASQL.1;DSN=職工情況；DBQ=E:\職工.mdb」即是一個正確的連接字元串，但連接字元串的組成比較復雜Adodc屬性頁中選擇使用連接字元串的生成選項，可以方便的生成字元串。
3，選擇數據提供者
在Adodc「數據連接屬性」對話框的OLE DB提供者的列表框中，選擇「Microsoft OLE DB Provider for ODBC Drivers」項
4，編譯連接字元串
5，選擇連接源
6，登陸設置
7，測試連接
向導選項
「ODBC 連接數據」
搜集連接一個遠程數據源所需要的信息。
DSN（數據源名稱）— 顯示一個當前在計算機上安裝完畢、可以連接的 DSN 的列表。為了安裝新的 DSN，應使用控制面板中的 32 位的 ODBC 圖標。如果選擇了驅動程序則此項無效。
UID（用戶ID） — 允許鍵入連接此數據源所要求的「用戶 ID」。如果該數據源不要求「用戶 ID」，可讓此項空白。如果選擇了驅動程序則此項無效。
PWD（口令） —允許鍵入連接該數據源所要求的口令。如果該數據源不要求口令，可讓此項空白。如果選擇了驅動程序則此項無效。
Database — 允許鍵入想要連接的資料庫名。如果選擇了驅動程序則此項無效。
Driver — 顯示當前計算機上可獲得的驅動程序的列表，此計算機可與遠程數據源相連接。如果選擇了一個 DSN 則此項無效。
Server — 允許鍵入資料庫所駐留的伺服器的名稱。如果選擇了一個 DSN 的「伺服器」則此項無效。
cn.Open"Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=資料庫名;DataSource=伺服器名或IP地址;uid=sa;pwd=sa;"Provider=SQLOLEDB.1------打開資料庫用oledb地方式連接IntegratedSecurity=SSPI--------採用地集成安全機制PersistSecurityInfo----能否保存安全信息UserID-------------------用戶名PassWord------------------密碼InitialCatalog-----------資料庫地名稱或許資料庫ip或許目錄DataSource---------------數據源
4. VB窗體怎麼用ADO控制項或者DATAGrid控制項連接Access資料庫
ADO控制項一般和DATAGRID同時使用比較合適和方便。能方便的操作數據記錄，
但如果不需要界面，僅需要實現連接資料庫,然後做些刪除，更新，添加的功能，則使用ADO對象較好。
使用 ADO Data 控制項
ADO Data 控制項使用 Microsoft ActiveX 數據對象(ADO) 來快速建立數據綁定的控制項和數據提供者之間的連接。數據綁定控制項是任何具有「數據源」屬性的控制項。數據提供者可以是任何符合 OLEDB 規范的數據源。使用 Visual Basic 的類模塊也可以很方便地創建子集的數據提供者。
盡管可以在應用程序中直接使用 ActiveX 數據對象，但 ADO Data 控制項有作為一個圖形控制項的優勢（具有「向前」和「向後」按鈕），以及一個易於使用的界面，使您可以用最少的代碼創建資料庫應用程序。
圖 7.4 ADO Data 控制項
在 Visual Basic 的「工具箱」中不少控制項都可以作為數據綁定的控制項，包括復選框、組合框、圖像、標簽、列表框、圖片框、以及文本框控制項等。此外，Visual Basic 還包括了若干種數據綁定的 ActiveX 控制項，諸如 DataGrid、DataCombo、Chart、以及 DataList 控制項等。用戶也可以創建自己的數據綁定的 ActiveX 控制項，或從其他開發商購買控制項。
Visual Basic以前的版本提供了內在的 Data 控制項和 Remote Data 控制項 (RDC) 來進行數據訪問。這兩種控制項仍包括在 Visual Basic 中，以提供向後兼容。不過，因為 ADO 的適應性更廣，因此建議用戶使用 ADO Data 控制項來創建新的資料庫應用程序。
詳細信息 關於數據綁定的控制項的完整列表位於「綁定到 ADO Data 控制項的控制項」中。要了解如何使用這些內在的Data 控制項或 Remote Data 控制項，請參閱「使用 Data 控制項」或「使用 Remote Data 控制項」。關於創建數據提供者的詳細信息，請參閱「創建數據識別類」。
可能的用法
連接一個本地資料庫或遠程資料庫。
打開一個指定的資料庫表，或定義一個基於結構化查詢語言 (SQL) 的查詢、或存儲過程、或該資料庫中的表的視圖的記錄集合。
將數據欄位的數值傳遞給數據綁定的控制項，可以在這些控制項中顯示或更改這些數值。
添加新的記錄，或根據對顯示在綁定的控制項中的數據的任何更改來更新一個資料庫。
要創建一個客戶、或前端資料庫應用程序，應在窗體中添加 ADO Data 控制項，以及其它所需要的任何 Visual Basic 控制項。可以根據您的需要在窗體中放置多個 ADO Data 控制項。不過，請注意，這種控制項是一種相當「昂貴」的創建連接的方法，應在第一個控制項至少有兩個連接，且以後的每個控制項至少多一個連接時使用。
用最少的代碼創建一個前端資料庫應用程序
通過在設計時設置一些屬性，可以用最少的代碼來創建一個資料庫應用程序。如果正在使用OLE DB 數據源，則相應的Microsoft 數據鏈接名稱（Data Link Name）(.MDL) 必須是在您的機器上創建的。請參閱「創建 Northwind 的OLE DB Data Link」，以獲得一個循序漸進的示例。
要創建一個簡單的前端資料庫應用程序
窗體上放置一個 ADO Data 控制項。（該圖標的工具提示為 "ADODC"。）
如果該控制項不在「工具箱」中，請按 CTRL+T 鍵，顯示「部件」對話框。在這個「部件」對話框中，單擊「Microsoft ADO Data Control」。
在「工具箱」中，單擊選定「ADO 數據控制項」。然後按 F4 鍵顯示「屬性」窗口。
在「屬性」窗口中，單擊「ConnectionString」顯示「ConnectionString」對話框。
如果您已經創建了一個 Microsoft 數據鏈接文件（Data Link file）(.UDL)，請選擇「使用 OLE DB 文件」並單擊「瀏覽」，以找到計算機上的文件。如果使用 DSN，則單擊「使用 ODBC 數據源名」，並從框中選擇一個 DSN，或單擊「新建」創建一個。如果想創建一個連接字元串，請選擇「使用 ConnectionString」，單擊「生成」，然後使用「數據鏈接屬性」對話框創建一個連接字元串。在創建連接字元串後，單擊「確定」。ConnectionString 屬性將使用一個類似於下面這一行的字元串來填充：
driver={SQL Server};server=bigsmile;uid=sa;pwd=pwd;database=pubs
在「屬性」窗口中，將「記錄源」屬性設置為一個 SQL 語句。例如：
SELECT * FROM Titles WHERE AuthorID = 72
在訪問一個表時，應始終包括一個 WHERE 子句。如果這樣做失敗，則會鎖定整個表，這樣對其他用戶將是一個嚴重的障礙。
在窗體上再放置一個「文本框」控制項，用來顯示資料庫信息。
在其「屬性」窗口中，將 Text1 的「數據源」屬性設為 ADO Data 控制項的名稱 (ADODC1)。這樣就將這個文本框和 ADO Data 控制項綁定在一起。
在其「屬性」窗口中，單擊「數據欄位」將下拉得到一個可用的欄位列表。單擊所要顯示的欄位的名稱。
對希望訪問的其它每個欄位重復第 6、7、8 步。
按 F5 鍵運行該應用程序。用戶可以在 ADO Data 控制項使用四個箭頭按鈕，從而允許用戶地到達數據的開始、記錄的末尾、或在數據內從記錄移動到另一個記錄。
在程序中設置 ConnectionString、Source、DataSource、以及 DataField
下面的代碼演示了如何在程序中設置這四個屬性。注意設置 DataSource 屬性要使用 Set 語句。
Private Sub Form_Load()
With ADODC1
.ConnectionString = "driver={SQL Server};" & _
"server=bigsmile;uid=sa;pwd=pwd;database=pubs"
. RecordSource = "Select * From Titles Where AuthorID = 7"
End With
Set Text1.DataSource = ADODC1
Text1.DataField = "Title"
End Sub
ADO Data 控制項的事件
ADO Data 控制項提供了若干個可以編程的事件。下表說明了這些事件及其何時產生，不過這個表不是一個關於這些事件何時發生的所有條件的完整列表。更完整的信息，請參閱各個事件的參考主題。
事件 產生條件
WillMove 當執行 Recordset.Open、Recordset.MoveNext、Recordset.Move、Recordset.MoveLast、Recordset.MoveFirst、Recordset.MovePrevious、Recordset.Bookmark、Recordset.AddNew、Recordset.Delete、Recordset.Requery、Recordset.Resync 方法時
MoveComplete 在 WillMove 事件之後
WillChangeField 在 Value 屬性更改之前
FieldChangeComplete 在 WillChangeField 事件之後
WillChangeRecord 當執行 Recordset.Update、Recordset.Delete、Recordset.CancelUpdate、Recordset.UpdateBatch、Recordset.CancelBatch 方法時
RecordChangeComplete 在 WillChangeRecord 事件之後
WillChangeRecordset 在執行 Recordset.Requery、Recordset.Resync、Recordset.Close、Recordset.Open、Recordset.Filter 方法時
RecordsetChangeComplete 在 WillChangeRecordset 事件之後
InfoMessage 當數據提供者返回一個結果時
詳細信息 如果試圖循序漸進地使用 ADO Data 控制項，請參閱「使用 DataGrid 和 ADO 數據控制項創建一個簡單的資料庫應用程序」，「 創建一個簡單的 DataCombo 應用程序」，以及「創建一個連接 DataList 控制項的 DataGrid」。
5. VB使用ADO控制項怎麼連接SQL資料庫
右鍵ado-屬性-通用-生成提供連接access選擇microsoft
jet
4.0或者3.51sql
server
選擇
microsoft
ole
db
provider
for
sql
server下一步
選擇你的資料庫就可以了。