--自定义一个字符串数组类型STRINGARRAY
TYPE STRINGARRAY IS TABLE OF VARCHAR2(50);
tempCount number;
tempTableName VARCHAR2(50);
tempDeleteSql VARCHAR2(50); 
tableNames STRINGARRAY := STRINGARRAY(

'TABLE1',

'TABLE2');

FOR i IN 1 .. tableNames.COUNT LOOP 
     

--获得表名

tempTableName := tableNames(i);

     

---查询要创建的表是否存在

select count(*) into tempCount from user_tables where table_name = tempTableName;

---如果有则删除

if tempCount > 0 then

DBMS_OUTPUT.put_line('表 ' || tempTableName || ' 存在。');

tempDeleteSql := 'drop table ' || tempTableName;

---执行删除表命令

execute immediate tempDeleteSql;

DBMS_OUTPUT.put_line('删除表 ' || tempTableName || ' 成功!');

end if;           

end loop;
  
EXCEPTION

WHEN others THEN

DBMS_OUTPUT.put_line('执行删除数据表 ' || tempTableName || ' 出现异常!');