如何知道access数据库中所有的表的数目及名字?

hellen 2000-07-19 08:48:00

我想做一个通用过程，清除数据库中的所有表的内容，请问有什么函数查找表名?

...全文

61 1 打赏收藏转发到动态举报

写回复

用AI写文章

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

liyang 2000-07-19

打赏
举报

你用的是什么？
dao,ado?
如果是dao:
dim dbTemp as Database
dim tdfTemp as TableDef

set dbtemp=opendatabase(...)
for each tdfTemp in dbTemp.Tabledefs
dbTemp.execute "delete from " & tdfTemp.Name
next
dbTemp.close

如果是Ado,你要用ADOX (ADO Extended )
dim catTemp as adox.catalog
dim acnTemp as adodb.connection
dim I as integer

acnTemp.open ...
set catTemp.activeconnection=acnTemp
for i=0 to catTemp.tables.count-1
acnTemp.execute "delete from " & catTemp.Tables(i).name
next i
set catTemp=nothing
acnTemp.close

　用JAVA开发的一个小型的目录监视系统，系统会每5秒自动扫描一次需要监视的目录，可以用来监视目录中文件大小及文件增减数目的变化。 Java日期选择控件完整源代码 14个目标文件内容索引:JAVA源码,系统相关,日历,...