怎麽確定數據庫中有無某張表的存在嗎???

Question

我用的是ACCESS數據庫!!!
在VB中怎麽確認所訪問的數據庫有無某一張表的存在呢???

Answer 1

ACCESS：使用下列 SQL 语句来获取你想要的得到窗体:
SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (MSysObjects.Type)=-32768 ORDER BY MSysObjects.Name; 得到表:
SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (Left$([Name],4) <> "Msys") AND (MSysObjects.Type)=1 ORDER BY MSysObjects.Name; 得到报表:
SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (MSysObjects.Type)= -32764 ORDER BY MSysObjects.Name; 得到模块:
SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (MSysObjects.Type)= -32761 ORDER BY MSysObjects.Name; 得到宏:
SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)<>"~") AND (MSysObjects.Type)= -32766 ORDER BY MSysObjects.Name;

Answer 2

try
select count(*) from tablename
catch

Answer 3

能不能給個例子啊??
我是初學者來咯!!比方說我想在A.mdb中確認是否在B這個表?

Answer 4

具体代码看这里
http://community.csdn.net/Expert/topic/4568/4568110.xml?temp=.9471094

Answer 5

在VB工程里引用 Microsoft ADO Ext. 2.8 for DDL and Security然后将如下函数声明于你的窗体中.
Private Function blnIsTableExist(strDbpath As String, strTableName As String) As Boolean
        Dim ObjCat As New ADOX.Catalog
        Dim intI As Integer
        
        blnIsTableExist = False
        
        ObjCat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDbpath & ";"
        For intI = 0 To ObjCat.Tables.Count - 1
            If UCase(strTableName) = UCase(ObjCat.Tables(intI).Name) Then
               blnIsTableExist = True
               Exit For
            End If
        Next intIEnd Function要判断某表是否存在时,直接调用就可以了,如果返回true则表明存在,返回false则表明不存在

Answer 6

这里也有 http://community.csdn.net/Expert/topic/4541/4541450.xml?temp=.5058252

Answer 7

利用  Microsoft ADO Ext. 2.8 for DDL and Security 检索表,创建表都很方便.应该了解了解.呵呵