Oracle 如何删除掉一个用户下的所有对象

张兴康

1. create or replace procedure drop_all as
   
2. 
   
3.   cursor cur_obj is
   
4. 
   
5.     select uo.OBJECT_NAME, uo.OBJECT_TYPE
   
6. 
   
7.       from user_objects uo
   
8. 
   
9.      where uo.OBJECT_NAME not in ('DROP_ALL')
   
10. 
    
11.        and uo.OBJECT_TYPE not in ('LOB');
    
12. 
    
13. 
    
14. 
    
15. /*  cursor cur_tablespace is
    
16. 
    
17.     select ut.TABLESPACE_NAME
    
18. 
    
19.       from user_tablespaces ut
    
20. 
    
21.      where ut.TABLESPACE_NAME not in
    
22. 
    
23.            ('SYSTEM', 'SYSAUX', 'UNDOTBS1', 'TEMP', 'USERS');*/
    
24. 
    
25. 
    
26. 
    
27.   v_obj_name         user_objects.OBJECT_NAME%type;
    
28. 
    
29.   v_obj_type         user_objects.OBJECT_TYPE%type;
    
30. 
    
31. /*  v_tablespaces_name user_tablespaces.TABLESPACE_NAME%type;*/
    
32. 
    
33.   sql_str1           varchar2(2000);
    
34. 
    
35. /*  sql_str2           varchar2(2000);*/
    
36. 
    
37. begin
    
38. 
    
39.   open cur_obj;
    
40. 
    
41.   loop
    
42. 
    
43.     fetch cur_obj
    
44. 
    
45.       into v_obj_name, v_obj_type;
    
46. 
    
47.     exit when cur_obj%notfound;
    
48. 
    
49.     sql_str1 := 'drop ' || v_obj_type || ' ' || v_obj_name;
    
50. 
    
51.     execute immediate sql_str1;
    
52. 
    
53.   end loop;
    
54. 
    
55.   close cur_obj;
    
56. 
    
57. /*  open cur_tablespace;
    
58. 
    
59.   loop
    
60. 
    
61.     fetch cur_tablespace
    
62. 
    
63.       into v_tablespaces_name;
    
64. 
    
65.     exit when cur_tablespace%notfound;
    
66. 
    
67.     sql_str2 := 'drop tablespace ' || v_tablespaces_name ||
    
68. 
    
69.                 ' including contents';
    
70. 
    
71.     execute immediate sql_str2;
    
72. 
    
73.   end loop;
    
74. 
    
75.   close cur_tablespace;*/
    
76. 
    
77. end drop_all;
    
78. 
    
79. 
    
80. 　　这个存储过程可以一把删掉用户下几乎所有的对象。注释里的东西释放出来就能删除表空间了。这个过程不能回滚，绝对不要在生产环境或者有用的环境上使用。我不对这个过程执行的结果负任何责任。
    
81. 
    
82.       这个脚本适合在那种删除用户不是很方便的时候使用。
    
83. 
    
84.       更简单的办法就是删掉用户再重建用户。

复制代码

张兴康

caixuqad

张兴康

caixuqad

caixuqad

caixuqad

caixuqad

caixuqad