--create table emp_large as select * from emp ; ---先複製一張emp表
declare
--宣告變數
v_loop number
; v_num
number
; too_large exception;
begin
--開始執行
for v_loop in
1 .. 100 loop --
emp開始是14條,14*2^100應該是很大的數了吧
select
count(*) into v_num from
emp_large;
ifv_num
<=
1000000
---輸入你喜歡的行數
then
insert
into
emp_large
(empno, ename, job, mgr, hiredate, sal, comm, deptno)
select
empno, ename, job, mgr, hiredate, sal, comm, deptno
from
emp_large;
endif;
endloop;
commit;
--如果大於指定數量,則刪除多餘的(排序不嚴謹,隨機刪除)
if v_num >
1000000
then raise too_large; --
拋異常endif;
exception
---異常處理
when too_large --
異常名稱
then
--刪除多餘的
delete
from emp_large where rowid in(
select rd from (select rownum rn,rowid rd from emp_large) where
rn>
1000000
) ;
commit
;
select
count(*) into v_num from emp_large; --
-重新輸入數量顯示
dbms_output.put_line('
執行成功,表emp_large的行數為:'||
v_num);
when
others
then
dbms_output.put_line(
'執行失敗');
end;
建立乙個鍊錶
不知道為什麼總是忘了對鍊錶的操作,主要就是平時用的少,希望自己通過寫這編文章能加深對鍊錶操作的印象 目錄1.首先得要有兩個基本的標頭檔案 2.再然後得要有個結構體 3.這部分是函式前置宣告 4.鍊錶初始化 5.插入節點 6.列印整個鍊錶 7.釋放整個鍊錶的記憶體 8.整個程式示例 9.列印結果 in...
建立乙個actor name表
題目鏈結 對於如下表actor,其對應的資料為 actor id first name last name last update 1penelope guiness 2006 02 15 12 34 33 2nick wahlberg 2006 02 15 12 34 33 建立乙個actor n...
delphi2007 很大的乙個bug
delphi2007 很大的乙個bug 2010 05 19 22 08 剛才用delphi2007做三層的系統,在伺服器端已經編譯並執行了remote data module 但是客戶端的servername地方怎麼也不出來我剛才編譯的那個遠端伺服器的名字,點解?後來想起這個以前已經解決過這個問題...