Question

VB6.0连接access数据库 提示错误

VB6.0连接access数据库 提示错误

新手也是初学VB刚两天
百度找的代码看了一下
这里应该是调用了数据库文件
我的数据库名字是 Database1.accdb

我就是想做一个登陆系统
判断账号和密码是否存在于数据库的。。
如果有其他的方法说一下也行。。谢谢。。

Answer 1

唉，新手应该先看看VB的书和SQL的书先，数据库本地的一般是.MDB，这才是ACCESS创建的，不知道你的.accdb是什么软件创建的...
添加接ADO控件，添加方法请自己看书，或百度吧，这都是基础...

下面给你一个示例吧：
'连接代码
Adodc1.CommandType = adCmdText
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\XXX.mdb" '连接本地数据库 xxx.mdb是Access创建的数据库
Adodc1.RecordSource = "select * from b where name='" & text1 &"' and pass='" & text2 & "'" '打开表b( 记录了用户名和密码)，比较用户名和密码
Adodc1.Refresh
if Adodc1.recordcount=0 then '得到记录为0，即不存在
msgbox "用户不存在或密码错误",,"错误"
else
......'正常登陆处理...
end if

追问

我用的是access的报表的那种数据库吧
现在就是不知道怎么弄，百度找了一下午。。
就是，VB连接数据库
输入账号和密码 （账号和密码是存在数据库里的）
如果输入了数据库内容则登陆成功。。

或者你把你QQ给我也行我加你。。！！谢谢了。。

追答

对啊，我上面说的全是access创建的数据库啊，晕，我建议你还是找本VB入门来看吧。