数据库可以正常连接,请问如何判断数据库表已存在,因为在添加删除表之前需要有个判断,可如何返回这个逻辑条件没找到头绪,望老师帮助解答下哈。
dim adoConn,strSqlcre1,strSqlcre2
Set adoConn=CreateObject("Adodb.Connection")
'连接数据库
dim report1,strSqlalt1,strSqlalt2
adoConn.Open"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=d:\test.mdb"
Set Report1=MarketData.GetReportData("if00","zj")
'创建表if00
'插入字段
'{----------这里想加个判断--------------}
IF IF00表=FALSE THEN
'添加表
strSqlalt1="alter table if00 add stockdate double"
strSqlalt2="alter table if00 add vclose double"
adoConn.Execute(strSqlalt1)
adoConn.Execute(strSqlalt2)
ELSE
MSGBOX "表已存在"
END IF
好像没办法查表,只有select insert支持这几个命令
查所有表的命令show database不能使用