如何检查MySql db中是否存在表?

时间:2015-04-28 18:34:48

标签: mysql database vb6 odbc ado

我有一个VB6应用程序,我想检查phpmyadmin上的MySQL数据库中是否存在表。实际上,该表实际上是一个视图,但它应该完全像它自己的表一样。

我目前的代码经常返回false?

我认为我的问题可能与变量cnDataStoreToVerify有关,因为当我尝试打印其内容时,它只包含: "提供商= MSDASQL.1;" ?

非常感谢帮助!

Public Function TableExists(cnDataStoreToVerify As ADODB.Connection, strTableName as String) As Boolean

 Dim recTemp As ADODB.Recordset
 Set recTemp = cnDataStoreToVerify.OpenSchema(adSchemaTables, Array(Empty, Empty, StrTableName, Empty)) 

 If Not recTemp.EOF Then
   TableExists = True 
 End If

 Exit_TableExists: 
 m_oADOUtils.CloseRecordsetADO recTemp

End Function 

0 个答案:

没有答案