Vista下可以用ADO读写Access数据库吗?到底怎么做啊?

来源:百度知道 编辑:UC知道 时间:2024/06/24 01:49:30

这个与操作系统没有什么太大的关系,关键与编程语言有些联系。
如VB6.0使用ADO操作ACCESS的代码
Private Sub Form_Load()
Dim RS As ADODB.Recordset
Dim tSQL As String
Dim I As Integer
Dim sNum As Integer
'初始化数据库
Set RS = New ADODB.Recordset
'设置数据库连接套接字
RS.ActiveConnection = "Driver={Microsoft Access Driver (*.mdb);DBQ=数据库路径;Uid=Admin;Pwd=用户密码}"
'查询语句
tSQL = "Select * From TableName Where ..."
RS.Open tSQL, , adOpenStatic, adLockOptimistic
'如果有记录则
sNum = RS.RecordCount
If sNum > 0 Then
ReDim A(sNum)
RS.MoveFirst
For I = 0 To sNum - 1
'取记录每字段的值
A(I) = RS.Fields(I).Value
Next I
End If
'关闭数据库
Set RS = Nothing
End Sub

老兄,实践出真知了,自己试试就知道嘛。