_SQL SERVER数据库_黑客防线网安服务器维护基地--Powered by WWW.RONGSEN.COM.CN

如何用SQL语句来判断已知表是否存在

作者:黑客防线网安SQL维护基地 来源:黑客防线网安SQL维护基地 浏览次数:0

本篇关键词:是否存在判断语句

  如何判断库中已知表是否存在今日受人之托帮他解决这个问题代码为通常的引用Dao做的一模块:

Function fExistTable(strTableName As String) As Integer
Dim db As Database
Dim i As Integer  
  Set db = DBEngine.Workspaces(0).Databases(0)  
  fExistTable = False
  db.TableDefs.Refresh
  For i = 0 To db.TableDefs.Count - 1
    If strTableName = db.TableDefs(i).Name Then
      'Table Exists
      fExistTable = True
      Exit For
    End If
  Next i
  Set db = Nothing
End Function
Private Sub 命令0_Click()
fExistTable
End Sub

  用该事件出现‘参数不可选’的错误仔细研究,发现fExistTable缺少参数,即已知表名没有在代码中反应

  修改为:

Private Sub 命令0_Click()
fExistTable(”需判断的已知表名”)
End Sub

  End Sub不再报错。仔细分析,其实是用 ”已知表名” 通过Dao判断数据库中是否存在,如果fExistTable的值为True就是存在,否则就是不存在。

  解决问题之余,想起Access数据库也有系统表,存放有对象名,可否做一查询来判定?

  经验证:

SELECT Count(*) AS Qty
FROM MSysObjects
WHERE (((MSysObjects.Name) Like "需判断的已知表名"));

  可以实现需求。如果Qty>0,就表示表已存在,否则就不存在。


    希望这篇如何用SQL语句来判断已知表是否存在的文章能够对您有所帮助,如果您觉得这篇网站维护教程有用的话,别忘了推荐给您的朋友哦!如果您有好的经验方法,不妨拿出来和大家一起分享:假如每个人都拿出一个经验,那么我们都将额外的获取一堆他人的经验。
请记住本站永久域名:(黑客防线网安服务器维护方案维护基地)Www.Rongsen.Com.Cn
    黑客防线网安服务器维护方案本篇连接:http://shop.rongsen.com.cn/show-10214-1.html
网站维护教程更新时间:2012-03-21 02:30:58  【打印此页】  【关闭
0
顶一下
0
踩一下
我要申请本站N点 | 黑客防线官网 |  
专业服务器维护及网站维护手工安全搭建环境,网站安全加固服务。黑客防线网安服务器维护基地招商进行中!QQ:29769479

footer  footer  footer  footer