如题 如果有实例就更好了 感激不尽
就想做一个简单的帮助查询 有分类表示的
还有录入功能的 主要是不会连接上mdb数据库求高手帮忙 赶紧不尽

用ADO连接
Dim Conn As New ADODB.Connection, Rs As New ADODB.Recordset
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=123;Data Source=C:\AA.mdb;Persist Security Info=False"    '连接数据库
Rs.CursorLocation = adUseClient    '设置游标属性
StrSQL = "Select * from AA"
Rs.open StrSQL,Conn,1,1    '查询记录

谢谢 我试试看

说无效的外部过程
有qq详细教一下么 我就需要连接上 需要调用跟录入 谢谢了。。。

工程->引用 ，添加下


另外，如果数据库没有密码，则在连接时取消密码
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=;Data Source=C:\AA.mdb;Persist Security Info=False"

[ 本帖最后由 owenlu1981 于 2014-4-11 22:25 编辑 ]

好的谢谢我再试试

Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=123;Data Source=C:\AA.mdb;Persist Security Info=False,版主这样写，access数据库文件是固定的，应该变成app.path,放在应用程序文件夹里。