Foxtable(狐表)用户栏目专家坐堂 → [求助]附加数据库


  共有2801人关注过本帖树形打印复制链接

主题:[求助]附加数据库

帅哥哟,离线,有人找我吗?
Hyphen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/11/27 10:26:00 [显示全部帖子]

1. 首先设置一个外部数据源指向SQL2005任意一个数据库

 

2. 附加

Dim cmd1 As New SQLCommand
cmd1.C
cmd1.CommandText = "use master;EXEC sp_attach_db @dbname ='测试',@filename1 ='"& ProjectPath & "ADMIN\测试.mdf',@filename2 = '" & ProjectPath & "ADMIN\测试_log.ldf'"
cmd1.ExecuteNonQuery()

 

3.卸载

Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "use master;EXEC sp_detach_db '测试','true'"
cmd.ExecuteNonQuery()

[此贴子已经被作者于2015/11/27 10:25:59编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/11/27 12:04:00 [显示全部帖子]

Dim cmd1 As New SQLCommand
cmd1.ConnectionNa me = "测试"
cmd1.CommandText = "sel ect count(*) from sys.databases where name = '测试'"
Dim val  = cmd1.ExecuteScalar()
If val = 1 Then

msgbox("'测试'数据库存在")

else

'附加数据库

end if


 回到顶部