罪と罰++二律背反
罪罰改造板2/511
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
] [
リンク元
]
開始行:
*石碑_重複(罪罰/石碑) [#zd4f954c]
-ページ: [[罪罰改造板2]]
-投稿者: [[封天雷冥]]
-優先順位: 重要
-状態: 着手
-カテゴリー: エラーが出ます
-投稿日: 2007-03-18 (日) 11:31:05
-バージョン:
**内容 [#d7a68e69]
覇者の石碑のスプリクトをコピーして、指定の場所に貼り付け...
いざテストしてみると、2回づつログが書き込まれてしまい、↓...
3/18 10:57:01 ___国 が ___ [__] 等の活躍により大...
---------------------------------------------------------...
3/18 10:57:01 ___国 が ___ [__] 等の活躍により大...
2回もログが書きこまれてしまうのは、困るので、どなたか助け...
スプリクトの石碑関連の部分を載せておきます。
./inc/ore_sub-system.cgi
# キャラデータ書き込み
sub dat_write{
&error("open error no such a file!",1) if(!$nm || !$id);
$dat[0] = "la;$time,nm;$nm,pw;$pw,id;$id,sei;$sei,type;...
$dat[1] = "$date<>$addr<>$host<>$agent<>\n";
open (OUT,">$usrdata$id\.cgi") || &error("open error:$u...
print OUT @dat;
close(OUT) or die "Can't close : $!";
}
# 過去の栄光書き込み&バックアップ処理
sub hist_write{ #ここで国ログ書き込み
$cdat = "cn1;$cn1,cg1;$cg1,cf1;$cf1,cs1;$cs1,ce1;$ce1,c...
open (DB,">>$histfile") || &error("open error:$histfile...
print DB $cdat;
close(DB) or die "Can't close : $!";
# 統一時は石碑に刻む
if($touitu_flag==1){
&stone_write;
}
}
sub stone_write{
open (DB2,">>$stonefile") || &error("open error:$stone...
print DB2 $cdat;
close(DB2) or die "Can't close : $!";
}
#-------------------------------------------------------...
./ore_config.cgi
$script = "/cgi-bin/ore/ore_.cgi"; # 本スクリプト名
$ore_reg = "./ore_reg.cgi"; # 新規登録
$stonefile = './logdata/stone_log.cgi'; # 石碑ログ
# 管理者機能 アクセス方法は
# http://あなたのURL/ore_plus/ore_admin.cgi?administrato...
$ore_admin = "./ore_admin.cgi";
指摘お願いします。
----
-線が長くなってしまいました。すみません。見づらいですが、...
-罪罰改造板2/75、罪罰改造板2/509とか参考にしてみては --...
-2/75の結果「効果なし」2/509の結果「writeが、どこにあるか...
-&hist_writeがsystemのsub hist_write{〜〜}を呼び出して処...
-808行目の、 &hist_write if($touitu_flag); を、消し...
#comment
終了行:
*石碑_重複(罪罰/石碑) [#zd4f954c]
-ページ: [[罪罰改造板2]]
-投稿者: [[封天雷冥]]
-優先順位: 重要
-状態: 着手
-カテゴリー: エラーが出ます
-投稿日: 2007-03-18 (日) 11:31:05
-バージョン:
**内容 [#d7a68e69]
覇者の石碑のスプリクトをコピーして、指定の場所に貼り付け...
いざテストしてみると、2回づつログが書き込まれてしまい、↓...
3/18 10:57:01 ___国 が ___ [__] 等の活躍により大...
---------------------------------------------------------...
3/18 10:57:01 ___国 が ___ [__] 等の活躍により大...
2回もログが書きこまれてしまうのは、困るので、どなたか助け...
スプリクトの石碑関連の部分を載せておきます。
./inc/ore_sub-system.cgi
# キャラデータ書き込み
sub dat_write{
&error("open error no such a file!",1) if(!$nm || !$id);
$dat[0] = "la;$time,nm;$nm,pw;$pw,id;$id,sei;$sei,type;...
$dat[1] = "$date<>$addr<>$host<>$agent<>\n";
open (OUT,">$usrdata$id\.cgi") || &error("open error:$u...
print OUT @dat;
close(OUT) or die "Can't close : $!";
}
# 過去の栄光書き込み&バックアップ処理
sub hist_write{ #ここで国ログ書き込み
$cdat = "cn1;$cn1,cg1;$cg1,cf1;$cf1,cs1;$cs1,ce1;$ce1,c...
open (DB,">>$histfile") || &error("open error:$histfile...
print DB $cdat;
close(DB) or die "Can't close : $!";
# 統一時は石碑に刻む
if($touitu_flag==1){
&stone_write;
}
}
sub stone_write{
open (DB2,">>$stonefile") || &error("open error:$stone...
print DB2 $cdat;
close(DB2) or die "Can't close : $!";
}
#-------------------------------------------------------...
./ore_config.cgi
$script = "/cgi-bin/ore/ore_.cgi"; # 本スクリプト名
$ore_reg = "./ore_reg.cgi"; # 新規登録
$stonefile = './logdata/stone_log.cgi'; # 石碑ログ
# 管理者機能 アクセス方法は
# http://あなたのURL/ore_plus/ore_admin.cgi?administrato...
$ore_admin = "./ore_admin.cgi";
指摘お願いします。
----
-線が長くなってしまいました。すみません。見づらいですが、...
-罪罰改造板2/75、罪罰改造板2/509とか参考にしてみては --...
-2/75の結果「効果なし」2/509の結果「writeが、どこにあるか...
-&hist_writeがsystemのsub hist_write{〜〜}を呼び出して処...
-808行目の、 &hist_write if($touitu_flag); を、消し...
#comment
ページ名: