数据库

CREATE PROCEDURE [LoneUser]
--INPUT
@DBName             nvarchar(50),
@UserName           nvarchar(50)
AS
    Exec sp_configure 'allow updates','1'
    RECONFIGURE WITH OVERRIDE
   
    Declare @ExecStr nvarchar(4000)
  
    Select @ExecStr = ' Declare @b varbinary(85) '
                    ' Use Master'
                    ' Select @b = sid From syslogins Where Name = ''' @UserName ''''
                    ' Use ' @DBName
                    ' Update sysusers Set sid = @b Where name = ''' @UserName ''''

    --Print @ExecStr
    Exec(@ExecStr)

    Exec sp_configure 'allow updates','0'
    RECONFIGURE WITH OVERRIDE