用游标删除符合条件的表 可以清空该数据库下所有表

删除所有表
　　以用户test为例

　　for example:

　　declare

　　cursor cur1 is select table_name from dba_tables where owner='TEST';

　　begin

　　for cur2 in cur1 loop

　　execute immediate 'drop table test.'||cur2.table_name;

　　end loop;

　　end;

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

在工作中，我遇到这样的一种事情，一个系统做完了，我想用原来的框架重新做另外的一个项目，这就涉及到删除除系统管理外的基他表，我的系统管理前缀是T_Sys,我就把查出要删除的表拼接成删除表字符串，然后用游标去一条条执行这些语句。

--定义游标

declare test_Cursor CURSOR for

select 'drop table '+ [name]+' ' as name from [sysobjects] where [type] = 'u' and name not like 'T_Sys%' order by [name]

--定义一个临时变量

declare @name varchar(80)

--打开游标

open test_Cursor

print 'Start'

--循环执行语句

while @@FETCH_STATUS=0

begin

--把下一条数据 取出来放到@name中

fetch next from test_Cursor into @name

--执行这条语句

EXECUTE( @name)

end

--关悼游标

close test_Cursor

--释放游标

DEALLOCATE test_Cursor

print 'End