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


記事No: 5410
投稿日: 2009/02/06(Fri) 10:28:21
タイトルWeb Enquete(投票)禁止ワードについて
ID情報: angel567
投稿者: ANGEL
URLhttp://www.angel-press.com/cgi/enq/enq.cgi

どなたか教えてください?【Web Enquete】のアンケート投票にユーザーでも項目を追加できるように設定しました。その項目の書き込み欄に禁止ワードを設定する方法を教えてもらえないでしょうか?よろしくお願いします。

KENT WEBのcgiの場所↓
http://www.kent-web.com/data/enq.html


記事No: 5413
投稿日: 2009/02/06(Fri) 13:03:38
タイトルRe: Web Enquete(投票)禁止ワードについて
ID情報: pachira
投稿者: pachira
URLhttp://www5e.biglobe.ne.jp/~pachira/

> どなたか教えてください?【Web Enquete】のアンケート投票にユーザーでも項目を追加できるように設定しました。その項目の書き込み欄に禁止ワードを設定する方法を教えてもらえないでしょうか?よろしくお願いします。
>
> KENT WEBのcgiの場所↓
> http://www.kent-web.com/data/enq.html

禁止ワード機能の付いたプログラムや過去のFAQが参考になると思います。
http://www.kent-web.com/support/search/namazu.cgi?key=%8B%D6%8E%7E%83%8F%81%5B%83h&whence=0&max=20&result=normal&sort=score

他のプログラムから移植するのが簡単でしょうね。
その際、項目のname値はitemになります。


記事No: 5426
投稿日: 2009/02/09(Mon) 10:18:01
タイトルWeb Enquete(投票)禁止ワードについて
ID情報: angel567
投稿者: ANGEL
URLhttp://www.angel-press.com/cgi/enq/enq.cgi

どなたか教えてください?【Web Enquete】のアンケート投票にユーザーでも項目を追加できるように設定しました。その項目の書き込み欄に禁止ワードを設定して、過去の禁止ワードも参考にはしてみたのですが動作しませんでした。項目のname値はitemになるというのは、どうすればよろしいでしょうか?分かる方いらしたらお願いします。

KENT WEBのcgiの場所↓
http://www.kent-web.com/data/enq.html


記事No: 5444
投稿日: 2009/02/13(Fri) 12:20:57
タイトルRe: Web Enquete(投票)禁止ワードについて
ID情報: pachira
投稿者: pachira
URLhttp://www5e.biglobe.ne.jp/~pachira/

> どなたか教えてください?【Web Enquete】のアンケート投票にユーザーでも項目を追加できるように設定しました。その項目の書き込み欄に禁止ワードを設定して、過去の禁止ワードも参考にはしてみたのですが動作しませんでした。項目のname値はitemになるというのは、どうすればよろしいでしょうか?分かる方いらしたらお願いします。
>
> KENT WEBのcgiの場所↓
> http://www.kent-web.com/data/enq.html

どこを、どう、弄ったのか具体的に書かないからレスが付かないのだと思いますよ。
以下はJoyfulNoteからの移植例。


1.設定部分に追加
# 禁止ワード
# → 投稿時禁止するワードをコンマで区切る
$no_wd = '';



2.以下を挿入
#-------------------------------------------------
# 項目追加
#-------------------------------------------------
sub make_item {
# フォームチェック
if ($in{'item'} eq "") { &error("項目名に入力がありません"); }

# ホスト名チェック
local($addr, $host) = &get_host;
↓↓↓
#-------------------------------------------------
# 項目追加
#-------------------------------------------------
sub make_item {
# フォームチェック
if ($in{'item'} eq "") { &error("項目名に入力がありません"); }

# 禁止ワードチェック
if ($no_wd) { &no_wd; }

# ホスト名チェック
local($addr, $host) = &get_host;



3.適当な部分に追加
#-------------------------------------------------
# 禁止ワードチェック
#-------------------------------------------------
sub no_wd {
local($flg);
foreach ( split(/,/, $no_wd) ) {
if (index("$in{'item'} ",$_) >= 0) {
$flg = 1; last;
}
}
if ($flg) { &error("禁止ワードが含まれています"); }
}


[検索ページ]