Dim sqlConn as New sqlConnection("server=myServer;User ID=sa;Password=;database=myOldDatabse;Connection Reset=ture;")
sqlConn.Open()
'输出老的数据库名
Console.WriteLine(sqlConn.Database)
Dim sqlConn as New sqlConnection("server=myServer;User ID=sa;Password=;database=myOldDatabse;Connection Reset=ture;")
sqlConn.Open()
'输出老的数据库名
Console.WriteLine(sqlConn.Database)
sqlConn.ChangeDataBase("master")
Dim myCmd as new sqlCommand
with myCmd
.Connection=sqlConn
.CommandText="sp_renamedb"
.CommantType=CommandType.StoreProcedure
End With
Dim sqlConn as New sqlConnection("server=myServer;User ID=sa;Password=;database=myOldDatabse;Connection Reset=ture;")
sqlConn.Open()
'输出老的数据库名
Console.WriteLine(sqlConn.Database)
sqlConn.ChangeDataBase("master")
Dim myCmd as new sqlCommand
with myCmd
.Connection=sqlConn
.CommandText="sp_renamedb"
.CommantType=CommandType.StoreProcedure
End With
Dim prmSql as sqlClient.SqlParameter
........................
use master
go
create proc killspid (@dbname varchar(20))
as
begin
declare @sql nvarchar(500),@temp varchar(1000)
declare @spid int
set @sql='declare getspid cursor for
select spid from sysprocesses where dbid=db_id('''+@dbname+''')'
exec (@sql)
open getspid
fetch next from getspid into @spid
while @@fetch_status =0
begin
set @temp='kill '+rtrim(@spid)
exec(@temp)
fetch next from getspid into @spid
end
close getspid
deallocate getspid
end