vbado連接資料庫
右鍵ado-屬性-通用-生成提供連接access選擇microsoft
jet
4.0或者3.51sql
server
選擇
microsoft
ole
db
provider
for
sql
server下一步
選擇你的資料庫就可以了。
Ⅱ ADO 用VB怎麼連Access資料庫
以下是用ADO對象連接ACCESS資料庫:
在使用ADO之前,在工程中引用,打開"工程"/"引用"命令,打開"引用"對話框.選擇"Microsoft
ActiveX
Data
Object
2.5
Library"選項,單擊"確定".<2.8以下可以選擇><向下兼容>.
Dim
cnn
As
New
ADODB.Connection
Dim
rs
As
New
ADODB.Recordset
___________________________________________
Private
sub
Form_Load()
cnn.Open
"driver={microsoft
access
driver
(*.mdb)};dbq="
&
App.Path
&"\資料庫名.mdb"<注意:此處第二個driver後面必須有空格>
rs.Open
"表名",cnn,
adOpenKeyset,adLockBatchOptimistic
......
......
end
sub
希望對你有所幫助.可能存在個別字元錯誤.請在程序中試用.
Ⅲ VB通過ADO連接SQL Server資料庫的問題
這要看你的程序需要;
如果你的程序很少用到資料庫，或者只需連接很少次數，比如:只是開始時做一個查詢，並把查詢結果返回給一個記錄集，後面的程序僅是對該記錄集的操作。那麼你可以在需要時創建連接，用完就關閉，這樣可以節省資料庫資源。
如果需要經常執行資料庫操作，特別是很多過程都需要調用查詢，那麼就用你後面那種做法。
Ⅳ vb的ADO控制項如何連接操作MYSQL資料庫啊
由於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
Ⅳ vb用ado控制項連接資料庫
正確添加了ADO控制項後,設置ADO控制項的Connectionstring屬性,它指出了ADO控制項和資料庫連接的字元串,打開這個屬性的屬性頁,可以通過三種方式設置連接方式,常設置為OLEDB方式:
Connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=你的資料庫路徑"
然後設置RecordSource屬性指出可以操作的資料庫的來源(即結果字元串,可以是SQL查詢產生的).
在設置好後,可以用文本框(textbox)等綁定數據表中的欄位進行顯示.
Ⅵ vb 中如何用ado連接dbf資料庫
最好用ado技術最簡單得是添加adodc控制項，設置adodc1.connectionstring連接dbf資料庫。具體操作是，添加完adodc控制項後，放到窗體中，看它得adodc屬性選擇生成你就可以選擇連接得數據源了！
Ⅶ VB怎麼用ADO控制項連接資料庫（用代碼連接）
先引用ADO：工程--引用--選擇MS ActiveX Data Objects代碼：Dim Access_Con As ConnectionSet Access_Con = New ConnectionAccess_Con.ConnectionString = "Provider=Microsoft.jet.oledb.4.0;data source=" & App_Path & "\FHL數據.mdb;"
Access_Con.Open Dim rs As RecordsetSet rs = New Recordsetrs.Open "select * from 用戶管理", Access_Con''''查詢結果將在rs中，可以把rs綁定在datagrid里查看數據等
Ⅷ VB用ADO鏈接資料庫 怎麼指定相對路徑
要想任意指定路徑可以將路徑字元串設置為變數。這樣就可以採用輸入或選定資料庫路徑來連接資料庫了。可參見如下：
dim
ljsjk
as
string
ljsjk=控制項或字元串
conn.ConnectionString
=
"Provider=Microsoft.Jet.OLEDB.4.0;Persist
Security
Info=False;Data
Source="
&
ljsjk
conn.Open