当前位置: 代码迷 >> VB >> 懂VB操作MYSQL的大侠,怎么判断表是否存在?20分不多,帮忙吧
  详细解决方案

懂VB操作MYSQL的大侠,怎么判断表是否存在?20分不多,帮忙吧

热度:4490   发布时间:2013-02-26 00:00:00.0
懂VB操作MYSQL的大侠,如何判断表是否存在?急,20分不多,帮忙吧
懂VB操作MYSQL的大侠,如何判断数据表是否存在?我用了很多SQL语句都行不通,大侠给段代码吧!万分感激!一定是MYSQL的啊

------解决方案--------------------------------------------------------
只能查询在你的数据库中存在不存在你要建的表,而不是所有数据库中
MYsql = "DRIVER={MySQL ODBC 3.51 Driver};server=" & Trim(txtSQL) & ";
user id=" & Trim(txtUser) & ";password=" & Trim(txtPW) & ";
database=" & Trim(txtDBName)
        myconn.Open MYsql
        myrecord.Open "select table_name from information_schema.tables 
where table_name ='mytable1' and table_schema='"+Trim(txtDBName)+"'", myconn, adOpenStatic, adLockReadOnly
        If myrecord.EOF Then
            MYsql = "CREATE TABLE mytable1(mydata1 integer (50))" 
            myconn.Execute MYsql
             MsgBox "成功建立", vbInformation
        Else
            MsgBox "建表失败,表已经存在!"
        End If
  相关解决方案