西餐英文菜名:数据库的问题

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/05 01:25:22
vb与access如何建立连接,并如何掉用

给你个例子
使用ADO连接

Dim sql As String
Dim ADOCon As New ADODB.Connection
Dim ADORst As New ADODB.Recordset
Dim str

str = App.Path
If Right(str, 1) <> "\" Then
str = str + "\"
End If

str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data\data.mdb;Persist Security Info=False"
ADOCon.Open str '连接数据库

ADORst.Open "select * from jxc", ADOCon, adOpenKeyset, adLockPessimistic '查询数据库