VB实现读取部分数据(求助)

来源：百度知道 编辑：UC知道 时间：2024/05/27 17:41:46
我建了个data.mdb的数据库 里面有个表qq1
字段 数据类型
ID1 自动编号
QQ_id 文本
QQ 文本
passwrd 文本
pay 是/否
我想在一窗口的列表栏(listbox)里显示出来。中间那个passwrd不显示出来
但是该数据库还有个问题就是有密码，如果用VB实现后台登陆密码后显示数据？？？
AC2000的数据库,知道的人告诉我,我已经加悬赏了!

假设你已经掌握vb联结数据库的方法
conn.Open "provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb;psw='数据库密码'"
rs.open "select * form qq1",conn,1,1
if not rs.eof then
for i=1 to rs.recordcount
listbox.additem rs("ID1")&rs("qq_id")&rs("qq")&rs("pay")
rs.movenext
next
rs.close
set rs=nothing