敗家貓

喵的~~~

別來我的blog一直做商業回應，來一次我砍一次

真是氣死我了

因為oracle沒有指令可直接更改現有的sequence值，所謂山不轉路轉，就用了下想的方法處理了
...繼續閱讀

Total System Global Area  281018368 bytes
Fixed Size                  1248552 bytes
Variable Size              96469720 bytes
Database Buffers          180355072 bytes
Redo Buffers                2945024 bytes
資料庫已掛載.
ORA-16038: 無法存檔日誌 2 序號 60
ORA-19809: 超過復原檔案限制
ORA-00312: 線上日誌 2 繫線 1: 'D:\ORACLE\PRODUCT\10.2.0\BINHU\REDO02.LOG'


SQL> select group#,sequence#,archived,status from v$log;

    GROUP#  SEQUENCE# ARCHIV STATUS
---------- ---------- ------ --------------------------------
         1         62 NO     CURRENT
         3         61 NO     INACTIVE
         2         60 NO     INACTIVE

SQL> alter database clear unarchived logfile group 2;(沒有歸檔語法)
(alter database clear logfile group 2;有歸檔語法)
已更改資料庫.

SQL> alter database open;

已更改資料庫.

SQL>
...繼續閱讀

#!C:\Perl\bin

($sec,$min,$hour,$day,$mon,$year)=localtime(time);

# 月比實際少一, 所以加 1
$mon++;

# 判斷是否為個位數, 若是則在前面補 0
if (length ($mon) == 1) {$mon = '0'.$mon;}
if (length ($day) == 1) {$day = '0'.$day;}
if (length ($hour) == 1) {$hour = '0'.$hour;}
if (length ($min) == 1) {$min = '0'.$min;}
if (length ($sec) == 1) {$sec = '0'.$sec;}

# 年比實際西元年少 1900, 所以加上 1900
$year+=1900;

# 組合成完整的時間
$alltime="$year/$mon/$day,$hour:$min:$sec";

print $alltime, "\n\n";

system("dir");
...繼續閱讀