Child Tree (HP Q&A BBS) [One Message View / 連続投稿防止部分のみソース]

■10522 / 7階層)

　連続投稿防止部分のみソース

□投稿者/ 南 -(2005/02/15(Tue) 14:52:38)

こんにちは、櫻様。
私の現在使用しているCGIの部分と見比べても違いが無かったので
別の所がまずいかもしれません。
ですので、こちらで改造した最終的な形のスクリプトを貼り付けておきます。
念のため、無改造で新品状態のVOTE COMを再度ダウンロードし、
それを改造するといいかも知れません。
何時の間にか、別な場所を弄ってしまっているかも知れませんしね。

※投票収集ログを生成する部分はややこしくなりそうなので消しています

#『無改造votec.cgiの412行目の　$addr = $ENV{'REMOTE_ADDR'};　の下に入れてください。』
#◆◇◆◇◆◇◆◇◆◇◆◇【改造場所】◆◇◆◇◆◇◆◇◆◇◆◇
open(IPI,"ip.log");
while (<IPI>){
chomp($_);#改行を取りのぞく
if($_ eq $addr){&er_("投票を既に行っています");}#IPがすでにある場合終わり
}
close(IPI);

#ログの初期化用TIMEログ作成
#記録用時間（秒）と投票時の時間（秒）を計算する

#「time」は時間を1970年から秒で数えた数値を自動的に取り出すperlの機能
#これで投票した時刻を取得する。
$time55 = time;

open(TMI,'<','cleartime.log');
$time66 = <TMI>;#ログファイルの時間情報を読み込み
close(TMI);

#現在の時間から記録された時間を引いて一日経っていたら実行、一日は86400秒
if($time55 - $time66 >= 86400){
open(TMO,">cleartime.log");#現在時間秒を記録（上書き）
print TMO $time55;
close(TMO);
open(IPO,">ip.log");#ログに（「>」は上書き指定）上書きでIP書き込み
print IPO $addr;
print IPO "\n";
close(IPO);
}else{#更新時間が記録された時間以下ならIPをログに追加
open(IPO,">>ip.log");#ログに（「>>」は追加指定）上書きでIP書き込み
print IPO $addr;
print IPO "\n";
close(IPO);
}

#◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇

あとは予想でしか物を言えないのですが、
改造時に追加した部分だけ漢字コードや改行コードが違ってエラーになる事があるかも
しれません…。
私の使っているテキストエディタはterapadと言うものです。
「http://www5f.biglobe.ne.jp/~t-susumu/」
漢字コードや改行コードを自動判別してくれる為便利です。

なにぶんCGIを勉強し始めたのがこの改造からだったりしますので
専門的な原因とか解らなくてすいません（汗

追伸：りゅういち様、長々とスクリプトの貼り付けなどして申し訳ないです。
No10416のような別のCGIからの引用や過去ログからの引用は別として
他の部分の改造はCGI文法などのサイトで勉強して書いたものなので多分オリジナルだと思います…。
そのオリジナル部分のスクリプトに関しては著作権を放棄します。
よろしければりゅういち様の投票フォームのバージョンアップ時などに
採用していただければ幸いです。

[メール受信/OFF] 削除キー/

上記関連ツリー
前の記事(元になった記事)	次の記事(この記事の返信)
←Re[6]: VOTE COMの同一IP連続投稿防止改�.. /櫻	→Re[8]: 連続投稿防止部分のみソース /櫻
VOTE COMの連続投稿防止改造について / 南 (05/01/12(Wed) 20:45) #10381
`└` Re[1]: VOTE COMの連続投稿防止改造につ�.. / りゅういち＠ (05/01/16(Sun) 04:56) #10390
`└` VOTE COMの同一IP連続投稿防止改造 / 南 (05/01/17(Mon) 23:53) #10406 解決済み!
`└` VOTE COMの同一IP連続投稿防止改造時間設.. / 南 (05/01/19(Wed) 21:33) #10415 解決済み!
`└` Re[4]: VOTE COMの同一IP連続投稿防止改�.. / 南 (05/01/19(Wed) 22:09) #10416 解決済み!
`└` VOTE COMの同一IP連続投稿防止改造時間設.. / 南 (05/01/21(Fri) 23:43) #10428 解決済み!
`└` Re[6]: VOTE COMの同一IP連続投稿防止改�.. / 櫻 (05/02/07(Mon) 20:42) #10496
`└` 連続投稿防止部分のみソース / 南 (05/02/15(Tue) 14:52) #10522 ←Now
`└` Re[8]: 連続投稿防止部分のみソース / 櫻 (05/02/26(Sat) 18:42) #10552 解決済み!
上記ツリーを一括表示 / 上記ツリーをトピック表示
上記の記事へ返信

入力内容にタグは利用できません。

他人を中傷する記事は管理者の判断で予告無く削除されます。
半角カナは使用しないでください。文字化けの原因になります。
名前、コメントは必須記入項目です。記入漏れはエラーになります。
入力内容の一部は、次回投稿時の手間を省くためブラウザに記録されます。
削除キーを覚えておくと、自分の記事の編集・削除ができます。
URLは自動的にリンクされます。
記事中に No*** のように書くとその記事にリンクされます(No は半角英字/*** は半角数字)。
- No123 → 記事No123の記事リンクになります(指定表示)。
- No123,130,134 → 記事No123/130/134 の記事リンクになります(複数表示)。
- No123-130 → 記事No123～130 の記事リンクになります(連続表示)。
質問に関連するURLはなるべく記入してください。
テスト投稿は禁止です!
解決したら人間の基本「ありがとう」を言いましょう!
FAQを別ウィンドウで開く/ぷっちCGIを別ウィンドウで開く

Name	/
E-Mail	/
└> 関連するレス記事をメールで受信しますか? / アドレス
Title	/
URL	/
Comment/ 通常モード->　図表モード-> (適当に改行して下さい) ■No10522に返信(南さんの記事) > こんにちは、櫻様。 > 私の現在使用しているCGIの部分と見比べても違いが無かったので > 別の所がまずいかもしれません。 > ですので、こちらで改造した最終的な形のスクリプトを貼り付けておきます。 > 念のため、無改造で新品状態のVOTE COMを再度ダウンロードし、 > それを改造するといいかも知れません。 > 何時の間にか、別な場所を弄ってしまっているかも知れませんしね。 > > ※投票収集ログを生成する部分はややこしくなりそうなので消しています > > > #『無改造votec.cgiの412行目の　$addr = $ENV{'REMOTE_ADDR'};　の下に入れてください。』 > #◆◇◆◇◆◇◆◇◆◇◆◇【改造場所】◆◇◆◇◆◇◆◇◆◇◆◇ > open(IPI,"ip.log"); > while (<IPI>){ > chomp($_);#改行を取りのぞく > if($_ eq $addr){&er_("投票を既に行っています");}#IPがすでにある場合終わり > } > close(IPI); > > #ログの初期化用TIMEログ作成 > #記録用時間（秒）と投票時の時間（秒）を計算する > > #「time」は時間を1970年から秒で数えた数値を自動的に取り出すperlの機能 > #これで投票した時刻を取得する。 > $time55 = time; > > open(TMI,'<','cleartime.log'); > $time66 = <TMI>;#ログファイルの時間情報を読み込み > close(TMI); > > #現在の時間から記録された時間を引いて一日経っていたら実行、一日は86400秒 > if($time55 - $time66 >= 86400){ > open(TMO,">cleartime.log");#現在時間秒を記録（上書き） > print TMO $time55; > close(TMO); > open(IPO,">ip.log");#ログに（「>」は上書き指定）上書きでIP書き込み > print IPO $addr; > print IPO "\n"; > close(IPO); > }else{#更新時間が記録された時間以下ならIPをログに追加 > open(IPO,">>ip.log");#ログに（「>>」は追加指定）上書きでIP書き込み > print IPO $addr; > print IPO "\n"; > close(IPO); > } > > #◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇ > > あとは予想でしか物を言えないのですが、 > 改造時に追加した部分だけ漢字コードや改行コードが違ってエラーになる事があるかも > しれません…。 > 私の使っているテキストエディタはterapadと言うものです。 > 「http://www5f.biglobe.ne.jp/~t-susumu/」 > 漢字コードや改行コードを自動判別してくれる為便利です。 > > なにぶんCGIを勉強し始めたのがこの改造からだったりしますので > 専門的な原因とか解らなくてすいません（汗 > > 追伸：りゅういち様、長々とスクリプトの貼り付けなどして申し訳ないです。 > No10416のような別のCGIからの引用や過去ログからの引用は別として > 他の部分の改造はCGI文法などのサイトで勉強して書いたものなので多分オリジナルだと思います…。 > そのオリジナル部分のスクリプトに関しては著作権を放棄します。 > よろしければりゅういち様の投票フォームのバージョンアップ時などに > 採用していただければ幸いです。
削除キー	/ (半角8文字以内)
解決済み! BOX/ 解決したらチェックしてください! <script Language="javascript" Src="http://ad.jp.ap.valuecommerce.com/servlet/jsbanner?sid=6905&pid=869954588"></script><noscript><a Href="http://ck.jp.ap.valuecommerce.com/servlet/referral?sid=6905&pid=869954588" target="_blank" ><img Src="http://ad.jp.ap.valuecommerce.com/servlet/gifbanner?sid=6905&pid=869954588" height=18 width=130 Border=0></a></noscript>
プレビュー/

HOME HELP 新着記事ツリー表示スレッド表示トピック表示検索過去ログ

- Child Tree -