| dim appaccess, db, atable set appaccess=createobject("access.application") set db=appaccess.dbengine.opendatabase(server.mappath("northwind.mdb")) for each atable in db.tabledefs if instr(atable.name,"Sys")=0 then response.write atable.name + "<br>" end if next db.close appaccess.quit set db=nothing set appaccess=nothing 现存问题： 需要服务器安装access，而且每次都要启动access，这样肯定不行。 怎么能完全通过ado列举mdb中的table？ 注意：联系我时，请一定说明是从【S】看到的信息，谢谢。 |
 联系电话： 联系 QQ： 打电话给我、或者加QQ好友时，请一定说明来自（三亚上门维修电脑）谢谢您！ 三亚上门维修电脑 |