<<< 返回 access911.net 编程静态资料库索引页

如何判定一个表是否存在?

 

作者:cg1  摘自:access911.net  录入:cg1  时间:2003-8-8  浏览人次:3691


专题地址:http://access911.net/fixhtm/77FABE1E1ADC.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:如何判定一个表是否存在?《VBA》

 


问题:

如何判定一个表是否存在?

 


方法一:


很多人问如何判定一个表是否存在于某个数据库,有人会回答,用msysobjects这个表来判定啊,这是个Access高级技巧。但是默认情况下admin对系统表没有读取权限,你需要手动设定,这该怎么办哪?要么你去设定一下权限(相关方法在本站另有动画以及文章介绍,这里不再阐述)
现在说两种方法来解决判定问题

以下这种方法就是使用陷阱,造成一个错误,通过系统错误来判定某个表是否存在
这是个少有人介绍,但是很实用的技巧。
Function test()
    MsgBox TableIsIn("表2")
End Function
Function TableIsIn(TableName As String)
    TableIsIn = True
    On Error Resume Next
    Dim strSQL As String
    strSQL = "select * from " & TableName
    CurrentDb.Execute strSQL
    If Err.N.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/77FABE1E1ADC.htm

 


上一篇:如何查询与指定日期同属一周内的数据?

下一篇:新手来看:如何实现文字的sum?

2017年2月22日生成静态资料