KENT-WEB サポートコーナー 過去ログ [ 0252 ]


記事No: 7799
投稿日: 2010/08/04(Wed) 10:18:02
タイトルホスト規制について
ID情報: sk8lover
投稿者: ハク
URLhttp://hpcgi3.nifty.com/tarutaruto/aska.cgi

light bordを使用させて頂いております。
初歩的な質問で恐縮なのですがd57.NGNosakaFL3.vectant.ne.jp
のような5区?の規制をするにはどうすればいいでしょうか。
init.cgiの設定で '*.vectant.ne.jp'; とやってみましたが投稿されます。
それとも '*.*.vectant.ne.jp'; が正解でしょうか?

このスレッドが目障りなようでしたら削除して頂いても構いません。宜しくお願いします。


記事No: 7800
投稿日: 2010/08/04(Wed) 19:36:36
タイトルRe: ホスト規制について
ID情報: Fuyuki
投稿者: BAL
URLhttp://f43.aaa.livedoor.jp/~sumure/

> light bordを使用させて頂いております。
> 初歩的な質問で恐縮なのですがd57.NGNosakaFL3.vectant.ne.jp
> のような5区?の規制をするにはどうすればいいでしょうか。
> init.cgiの設定で '*.vectant.ne.jp'; とやってみましたが投稿されます。
> それとも '*.*.vectant.ne.jp'; が正解でしょうか?
>
> このスレッドが目障りなようでしたら削除して頂いても構いません。宜しくお願いします。


niftyはホスト名が取得できないのでIPアドレスで制限してください。
プログラムによるスパム投稿の場合は投稿キーをテキスト表示に変更すれば解決するかもしれません。

●aska.cgi
#-------------------------------------------------
# 記事表示
#-------------------------------------------------
-- 省略 --

# 投稿キー
if ($regist_key) {
require $regkeypl;
my ($str_plain, $str_crypt) = &pcp_makekey;

print qq|<tr><td nowrap><b>投稿キー</b></td>|;
print qq|<td><input type="text" name="regikey" size="6" style="ime-mode:inactive" value="">\n|;
#print qq|(投稿時 <img src="$registkeycgi?$str_crypt" align="absmiddle" alt="投稿キー"> を入力してください)</td></tr>\n|; ## ★コメントアウト
print qq|(投稿時 <font color="$moji_col"><b>$code2</b></font> を入力してください)</td></tr>\n|; ## ★追加


●registkey.pl
#-------------------------------------------------
# 投稿キー
#-------------------------------------------------
sub pcp_makekey {
local($str_plain, $str_crypt, @number);

# 任意の数字4文字を生成
@number = (0 .. 9);
srand;
foreach (1 .. 4) {
$str_plain .= $number[int(rand(@number))];
}
$code2 = $str_plain; ## ★追加
# 時間を付加


記事No: 7801
投稿日: 2010/08/05(Thu) 22:08:17
タイトルRe^2: ホスト規制について
ID情報: sk8lover
投稿者: ハク
URLhttp://hpcgi3.nifty.com/tarutaruto/aska.cgi

BALさん返信ありがとうございます。
ご指摘があったとおり修正してみました。
すこし様子を見てみようと思います。
ニフティなので地道にIPアドレスを指定していこうと思います。
ありがとうございました^^


[検索ページ]