vb如何调用access数据库

yiyongxiang 2003-03-31 09:08:52
请详细说明,谢谢!
...全文
135 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
starky 2003-04-01
  • 打赏
  • 举报
回复
dao? 强:)
tianaz 2003-04-01
  • 打赏
  • 举报
回复
'先引用dao350(access97),或者dao360(access2000)
option explicit
private MyData as dao.database,MyRs as dao.recordset '定义变量
Sub Form_load
set mydata=OpenDatabase(app.path & "\test.mdb") '打开数据库
set myrs=mydata.open("select * from t_test") '打开数据库中的表
msgbox myrs!testFields '得到数据表中的字段值
myrs.close '释放该数据表对象
mydata.close '关闭数据库对象
end sub
fendou13 2003-04-01
  • 打赏
  • 举报
回复
我也有同样的问题,请大家回答!!谢先了!
chenyu5188 2003-04-01
  • 打赏
  • 举报
回复
可以用ADO或DAO来做。
楼上都已给出了说明

不过在引用这些之前要先引用相应的对象库。

在“工程”--->“引用”--->"..........."

wxy001 2003-04-01
  • 打赏
  • 举报
回复
上面几位说的都不错,但不要忘了安装sp5先,要不就会出现问题
然后就如天行所说的那样就差不多
Dim cnt as adodb.connection
set cnt=new adodb.connection
cnt.open""
之类的
donglw 2003-04-01
  • 打赏
  • 举报
回复
'ADO的方法,先引用ado2.5
Dim cn As New Connection
Dim rs As New Recordset
cn.CursorLocation = adUseClient
cn.Provider = "Microsoft.Jet.OLEDB.4.0"
cn.ConnectionString = "c:\costume.mdb"
cn.Open

rs.Open "select * from table1", cn, 1, 1

Set DataGrid1.DataSource = rs

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧