復制代碼 代碼如下:

if exists (select * from sysobjects where id = object_id(N'[nf_ChangeObjectOwner]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure nf_ChangeObjectOwner
GO

Create PROCEDURE nf_ChangeObjectOwner 
    @current_Owner nvarchar(255),    
    @target_Owner nvarchar(255),
    @modify_Type int
/***********************************************************************************************

nf_ChangeObjectOwner

實現功能：    將Sql Server對象的當前擁有者更改成目標擁有者
**** 使用本代碼前請備份數據庫！
**** 所帶來的安全問題，與俺家的驢子無關！
**** 歡迎斧頭劈我，劈死偶有獎！
調用方法：    Exec nf_ChangeObjectOwner @current_Owner,@target_Owner,@modify_Type

輸入參數：    @current_Owner nvarchar(255)    --對象的當前擁有者
        @target_Owner nvarchar(255)    --對象的目標擁有者
        @modify_Type int        --0為默認，更改表的擁有者；1為視圖和存儲過程
輸出參數：    RETURN值        = -1        --操作對象為0，操作對象不存在
                = -2        --操作失敗，可能對象被鎖定
                = 0(默認值)    --操作成功，打印更改對象數目@object_Num
        @object_Num            --SQL 打印值，返回更改成功的對象數目

                            @Write by Net Fetch.    @At 2005/09/12
                            @Email: cnNetFetch*Gmail.Com    blog.ad0.cn

************************************************************************************************/
AS
    DECLARE @str_Tbl_Name nvarchar(255),@object_Num int,@current_Owner_uid smallint
    Set @object_Num = 0
    DECLARE @return_status int
    Set @return_status = -1
    Set @current_Owner_uid = (Select uid From sysusers Where [Name] = @current_Owner)
    If Not (Len(@current_Owner_uid)>0)  
        RETURN -1
        If (@modify_Type = 1)
            DECLARE ChangeObjectOwner_Cursor CURSOR FOR Select [Name] From sysobjects Where (type='U' or type='V' or type='P') and userstat=0 and [Name]<>'nf_ChangeObjectOwner' and status>-1 and uid = @current_Owner_uid
        Else
            DECLARE ChangeObjectOwner_Cursor CURSOR FOR Select [Name] From sysobjects Where (type='U' or type='V' or type='P') and userstat<>0 and [Name]<>'dtproperties' and uid = @current_Owner_uid
        OPEN ChangeObjectOwner_Cursor
    BEGIN TRANSACTION Change_ObjectOwner        
        FETCH NEXT FROM ChangeObjectOwner_Cursor INTO @str_Tbl_Name
        WHILE (@@FETCH_STATUS = 0)
            BEGIN    
                Set @str_Tbl_Name = @current_Owner + '.' + @str_Tbl_Name
                Print @str_Tbl_Name
                EXEC @return_status = sp_changeobjectowner @str_Tbl_Name, @target_Owner
                IF (@return_status <> 0)
                    BEGIN 
                        ROLLBACK TRANSACTION Change_ObjectOwner
                        RETURN -2
                    END
                Set @object_Num = @object_Num + 1
                FETCH NEXT FROM ChangeObjectOwner_Cursor INTO @str_Tbl_Name
            END
        Print @object_Num
    COMMIT TRANSACTION Change_ObjectOwner
    CLOSE ChangeObjectOwner_Cursor
    DEALLOCATE ChangeObjectOwner_Cursor

Go