7,763
社区成员
发帖
与我相关
我的任务
分享用什么查询语句或函数可以知道是否存在一个数据库？如我在程序里用Create Database创建了一个数据库，为了避免才次创建同一个数据库，请
用什么查询语句或函数可以知道是否存在一个数据库？如我在程序里用Create Database创建了一个数据库，为了避免才次创建同一个数据库，请问有什么方法可以检测到一个数据库是否已经存在？检测一个表是否存在可以用SELECT Table_name
FROM information_schema.tables
WHERE table = 'MyTable'
那么数据库呢？谢谢
FROM information_schema.tables
WHERE table = 'MyTable'
那么数据库呢？谢谢
...全文
请发表友善的回复…
发表回复
wrongt 2004-09-17
- 打赏
- 举报
IF (SELECT COUNT(*) FROM sysdatabases WHERE [name] = 'mydbtest') =0
create database Mydbtest
on (name = mydbTest_data,
filename='f:\vbprogram\database\mydbtest.mdf',
size = 1,
filegrowth = 10%)
log on(name = mydbtest_log,
filename='f:\vbprogram\database\mydbtest.ldf',
size = 1,
filegrowth = 10%)
create database Mydbtest
on (name = mydbTest_data,
filename='f:\vbprogram\database\mydbtest.mdf',
size = 1,
filegrowth = 10%)
log on(name = mydbtest_log,
filename='f:\vbprogram\database\mydbtest.ldf',
size = 1,
filegrowth = 10%)
zcm123 2004-09-17
- 打赏
- 举报
If Dir("c:\test.mdb") <> "" Then
'创建数据库
Else
MSGBOX "文件已经存在"
End If
leolan 2004-09-17
- 打赏
- 举报
IF (SELECT COUNT(*) FROM sysdatabases WHERE [name] = 'YourTableName') <> 0
PRINT '已存在!'
PRINT '已存在!'
leolan 2004-09-17
- 打赏
- 举报
Sorry,看錯了,當我沒說:)
leolan 2004-09-17
- 打赏
- 举报
IF NOT OBJECT_ID('Master..YourTableName') IS NULL
PRINT 'Table is exists!'
ELSE
CREATE TABLE YourTableName (...)
PRINT 'Table is exists!'
ELSE
CREATE TABLE YourTableName (...)
tztz520 2004-09-17
- 打赏
- 举报
用DIR呀.
If Dir("f:\test.mdb") <> "" Then
'创建数据库
Else
MSGBOX "文件已经存在"
End If
If Dir("f:\test.mdb") <> "" Then
'创建数据库
Else
MSGBOX "文件已经存在"
End If
northwolves 2004-09-17
- 打赏
- 举报
Sub creatmdb() '创建数据库
If Dir("e:\new.mdb") <> "" Then Kill "e:\new.mdb"
Dim mycat As New ADOX.Catalog
mycat.Create "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=e:\new.mdb"
MsgBox "创建数据库 e:\new.mdb 成功！"
End Sub
If Dir("e:\new.mdb") <> "" Then Kill "e:\new.mdb"
Dim mycat As New ADOX.Catalog
mycat.Create "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=e:\new.mdb"
MsgBox "创建数据库 e:\new.mdb 成功！"
End Sub
