這裡只是個簡單不能再簡單的vb小程式例項，但它包含這幾個關鍵字：vb6.0、ado、access
環境：visual basic 6.0 企業版（非精簡版，不然會缺少必須的控制項）
資料庫：access資料庫，資料庫是xs.mbd，內建表為xj
結果：vb使用ado連線access資料庫，查詢xj表中的所有資料，然後把查詢到的結果迴圈輸出到視窗中。
**：private sub form_click()
d程式設計客棧im db as new adodb.connectiyfsxolon, rs as new adodb.recordset 'ado連線物件和記錄集
dim strsql as string 'sql字串
db.connectionstrin程式設計客棧g = "provider=microsoft.jet.oledb.4.0;data source =" & app.path & "/xs.mdb" '資料庫連線
db.open '開啟資料庫
strsql = "select * from xj" 'sql字串
rs.open strsql, db, 3, 1 '查詢資料表
do while no rs.eof '迴圈輸出查詢到的結果
print rs!姓名; rs!性別; rs!班級; rs!出生年月 '在視窗中列印輸出結果
rs.movenext '記錄下移
loop
r程式設計客棧s.close '關閉記錄集
set rs = nothing
end sub
本文標題: vb使用ado操作access資料庫
本文位址:
使用ADO訪問ACCESS
coding utf 8 file ado.py import win32com.client 匯入win32com.client adocon win32com.client.dispatch adodb.connection 建立連線物件 adocon.open podbc 連線到資料來源 ad...
ADO操作儲存過程（VB）
dim adoconnaction as new adodb.connaction dim adocommand as new adodb.command dim adorecordset as new adodb,recordset dim strconnaction as string 資料庫連...
VC6 0中使用ADO操作Access資料庫
由於我的程式只是簡單的儲存 和標題，access小而簡單，所以就選擇access作為本小軟體的資料庫，並採用ado訪問資料庫。以下資料庫內容摘自孫鑫老師的 vc20講第20課資料庫訪問的ppt 資料庫訪問技術 1.odbc open database connectivity 開放資料庫互連。odb...