記事No | : 7799 |
投稿日 | : 2010/08/04(Wed) 10:18:02 |
タイトル | : ホスト規制について |
ID情報 | : sk8lover |
投稿者 | : ハク |
URL | : http://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 |
URL | : http://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 |
投稿者 | : ハク |
URL | : http://hpcgi3.nifty.com/tarutaruto/aska.cgi |
BALさん返信ありがとうございます。
ご指摘があったとおり修正してみました。
すこし様子を見てみようと思います。
ニフティなので地道にIPアドレスを指定していこうと思います。
ありがとうございました^^