删除数据库中所有存储过程和函数的sql语句

-删除数据库中所有存储过程和函数的sql语句

USE [TmpDb]

SELECT  IDENTITY( INT,1,1 ) flag ,

        [name] NAMES,xtype

INTO    #tmp

FROM    sysobjects

WHERE   xtype = 'tf'

        OR xtype = 'fn'

        OR xtype = 'p'

        

DECLARE @tb VARCHAR(1000) ,

        @type NVARCHAR(2),

    @a INT ,

    @b INT ,

    @sql VARCHAR(8000)

SELECT  @a = MIN(flag) ,

        @b = MAX(flag)

FROM    #tmp

WHILE @a <= @b 

    BEGIN

        SELECT  @tb = NAMES,@type=xtype

        FROM    #tmp

        WHERE   flag = @a

        IF @type='p'

        BEGIN

          SET @sql = 'drop Procedure  ' + @tb

        END

        ELSE

        BEGIN

          SET @sql = 'drop FUNCTION  ' + @tb

        END        

        PRINT @sql

        EXEC(@sql)

        SET @a = @a + 1

    END

DROP TABLE #tmp