快速删除DiscuzNT论坛数据表和存储过程

本来想一个一个删除的，打开数据库一看那么多的表和存储过程，就放弃这种笨办法了，于是决定用sql语句来搞定。代码如下：

复制代码

代码如下:

-----------------------------删除数据表---------------------DECLARE @au_lname VARCHAR(40),@SQLString NVARCHAR(500)DECLARE tb CURSOR FORSELECT name FROM sysobjects WHERE xtype='U' and name like 'dnt%'OPEN tb-- Perform the FIRST FETCH.FETCH NEXT FROM tb into @au_lname-- CHECK @@FETCH_STATUS TO see IF there ARE ANY more ROWS TO FETCH.WHILE @@FETCH_STATUS = 0BEGIN-- This IS executed AS long AS the previous FETCH succeeds.FETCH NEXT FROM tb INTO @au_lnameSET @SQLString='DROP TABLE '+ @au_lnameEXEC sp_executesql @SQLString--DROP TABLE @au_lnameENDCLOSE tbDEALLOCATE tbGO-----------------------------删除存储过程---------------------DECLARE @au_lname VARCHAR(40),@SQLString NVARCHAR(500)DECLARE tb CURSOR FORSELECT name FROM sysobjects WHERE xtype='p' and name like 'dnt%'OPEN tb-- Perform the FIRST FETCH.FETCH NEXT FROM tb INTO @au_lname-- CHECK @@FETCH_STATUS TO see IF there ARE ANY more ROWS TO FETCH.WHILE @@FETCH_STATUS = 0BEGIN-- This IS executed AS long AS the previous FETCH succeeds.FETCH NEXT FROM tb INTO @au_lnameSET @SQLString='DROP PROCEDURE '+ @au_lnameEXEC sp_executesql @SQLString--DROP TABLE @au_lnameENDCLOSE tbDEALLOCATE tbGO