查询数据库是否存在SQL怎么写
如查询D盘根目录下是否存在mydata.mdb
如果存在,打开该数据库,
如果不存在在D盘根目录下建立数据库mydata.mdb
试试用文件对象,以磁盘文件名方式查找
能具体点呢。我不是专业计算机的哦。谢谢啦。
dim fso,strFile
strFile = "d:\12.txt"
set fso=createobject("scripting.filesystemobject")
if fso.FileExists(strFile) then
msgbox "发现文件:"&strFile
else
msgbox "没有发现文件:"&strFile
end if
查询数据库是否存在SQL怎么写
如查询D盘根目录下是否存在mydata.mdb
如果存在,打开该数据库,
-----------------以上解决了------------------
如果不存在在D盘根目录下建立数据库mydata.mdb
没有这个数据库,创建一个怎么弄。本来想像下面一样写的,但测试说关闭时不能操作,我想也是哦,没有开打怎么操作呢。但都不存在谈何打开呢。请教高手。
cresql="CREATE DATABASE mydata.mdb"
adoConn.Execute(cresql)
adoConn.Open "Provider=MicroSoft.Jet.OLEDB.4.0;Data Source=e:\mydata.mdb"
数据库是否存在可以通过程序在系统表sysdatabases中查找.