读取数据库

求学者 · 发表于 2004-9-11 11:26:00

在CAD中，如何用VBA读取ACCESS数据库的一条记录。最好有一段源码。

o_o · 发表于 2004-9-11 11:58:00

Dim Db As DAO.Database
Dim Re As Recordset
'打开链轮数据库
Set Db = OpenDatabase(AcadApplication.Path & "\自动绘图\ACAD.mdb")'打开数据库
Set Re = Db.OpenRecordset("传动用短节距精密滚子链", dbOpenDynaset)'打开数据库中的表或查询

读取数据库

发表回复

精选推荐