top.location.href = "http://lthung.org"; // 轉到的網址
試改為
top.location.href = "javascript:history.back()"; // 轉到的網址
或
top.location.href = "javascript:history.go(-1)"; // 轉到的網址
參考其它 CGI 程式
$time_diff = 8; #與標準時間的時差
($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = gmtime(time + $time_diff * 3600); #取得系統時間
$week = ('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat') [$wday];
$today = sprintf("%d/%02d/%02d(%s) %02d:%02d", $year + 1900, $mon + 1, $mday, $week, $hour, $min);
sub get_time {
$ENV{'TZ'} = "CST-8";
local($time) = time;
local($min,$hour,$mday,$mon,$year) = (localtime($time))[1..5];
local($date) = sprintf("%04d/%02d/%02d %02d:%02d",
$year+1900,$mon+1,$mday,$hour,$min);
return ($time, $date);
}
$timezon = 8; #與標準時間的時差
sub time {
($sec,$min,$hour,$mday,$mon,$year)=localtime(time()+$timezone*60*60);
$mon=$mon+1;
if ($sec <10) {$sec ="0$sec";}
if ($min <10) {$min ="0$min";}
if ($mon <10) {$mon ="0$mon";}
if ($hour<10) {$hour="0$hour";}
if ($mday<10) {$mday="0$mday";}
$year=$year+1900;
$time = "$year年$mon月$mday日 $hour點$min分$sec秒";
$timea = "$year$mon$mday$hour$min$sec";
}