06/10/23 02:38:52 oT4S3DMg
【. CGI名 .】 PatiPati - Version 3.0 -
【配布先URL】 URLﾘﾝｸ(www.gnbnet.com)
【. 置き場所 .】 URLﾘﾝｸ(www.gnbnet.com)
【ヘルプ内容】
URLﾘﾝｸ(www.gnbnet.com)
↑の人と同じことを思ったので質問させて下さい。
________________________________________________
拍手ボタンを押す→最初の画面が出る→後の画面はランダムに表示
という表示は可能でしょうか？
一番最初の画面だけ固定して、その後の画面をランダムにしたいのですが…
宜しくお願いします。
________________________________________________
の書き込みに、制作者は
________________________________________________
申し訳ありませんが、こういった要望に対応しているとキリがなくなりますので、
ご自分で改造などして対処してくださるようお願いします。
________________________________________________
と言っているのですが、どう改造すれば良いのかわかりません。
どうぞ宜しくお願いします。
117:nobodyさん
06/10/23 08:51:22
>>116
自分で改造する気が無いのなら丸投げへ
118:nobodyさん
06/10/24 04:33:25
<?php
echo "Hello World";
?>
これをWeb2.0風に改造してください。
119:nobodyさん
06/10/24 07:03:03
一個前のレスも読めない君の亀田級の脳味噌には佐賀県庁の職員一同も心底がっかりだ。
120:nobodyさん
06/10/24 14:21:29
私の力量では改造ができませんでした。ご助言 よろしくお願いします。
【. CGI名 .】 Revision 1.80 （perlのBBS）
【配布先URL】 URLﾘﾝｸ(revision.s22.xrea.com)
【. 置き場所 .】 URLﾘﾝｸ(revision.s22.xrea.com)
【ヘルプ内容】 一定数以上の投稿があると、古いログから削除されていくところを、
別のファイルに書き出して保存できるようにしたい。（過去ログ機能の実装）
以上、よろしくお願いします。
121:nobodyさん
06/10/24 14:56:57
何をどうやったらどう駄目だったのかを書いてアドバイスをもらうのがこのスレ。
それも理解できない丸投げ野郎はもう死んでいいよ。スレ違いを指摘するのもかったるい。
122:aoki
06/10/24 17:44:33 QIrlktk5
>>121さん、本当に申し訳ございませんでした。ご指摘頂き、ありがとうございます。
>>112の追記です。
自分なりにWindyより、見よう見まねでYY-CHATと引っ付けた、という感じとなってしまいました。このままでは無理だとは思いますが、どのように変更して良いかがわかりません。
基本設定以降が
URLﾘﾝｸ(www.geocities.jp)
です。
YY-CHATをWindyのように、ノーフレーム版（アイコン有り）で表示したいのです。
「Script Error」と表示されてしまいますので、宜しければご存知の方、ご指摘の程、お願いいたします。
123:nobodyさん
06/10/24 20:07:51
エラーメッセージは？
124:aoki
06/10/24 23:35:55 QIrlktk5
早速のお返事ありがとうございます。今転送しなおしてみた所、著作権部分の「KENT」と出てくるだけとなっておりました。
URLﾘﾝｸ(www.geocities.jp)
この状態です。本体や入り口が表示されずに、著作権部分だけ表示されました。
125:nobodyさん
06/10/24 23:44:49
>>124
つかWindyにアイコン表示つけたほうが速くないか？
yychatをノンフレームに改造するのは相当大変だぞ
126:nobodyさん
06/10/24 23:53:42
>>124
それは分かったからとっととエラーメッセージの詳細を出せやコラ。
まさかろくに動きもしない駄目スクリプトをローカルでチェックもせずにアップしてるのか？
127:aoki
06/10/25 00:23:46 SpiYIrSU
>>125さん>>126さん
早速のお返事ありがとうございました。
メイン処理部分の部分を一部変更して転送し直したところ、エラーメッセージは出ずに著作権部分しか表示されなくなっていました。
やはりWindyの方につけた方が良いのですね。助言ありがとうございました。
自分の知識不足ですので、また出直してまいります。
レス下さった方、本当にありがとうございました。
128:118
06/10/25 00:26:03
すいませんでした。向こうで聞いてきます。
129:nobodyさん
06/11/03 18:19:09
【CGI】URL Geter
【配布先】URLﾘﾝｸ(www.cp-2icro.com)
【内容】
このCGIが気に入っているのでアクセス解析として使いたいのですが
リンク元に「その他・ブックマークなど」の項目を追加することはできないでしょうか？
130:nobodyさん
06/11/03 18:31:35
てきるできないで言うならそりゃできる。
131:nobodyさん
06/11/03 21:29:16
【. CGI名 .】 cmcboard.zip v0.23
【配布先URL】 URLﾘﾝｸ(cgi-lounge.eek.jp)
【ヘルプ内容】
先月未明からi-パラダイス（URLﾘﾝｸ(www.i-paradise.nu)）に設置してある、
サイト内コンテンツの一つであるアップローダーの記事投稿が不可能な状態です
PostModeでの記事投稿前の認証を試みますが、
パスワードを入力し認証ボタンを押した次の瞬間空白のページに（ソースを見たところ無記述）移動してしまい、
ファイルのアップロード自体が出来ず、
PostMode以外での投稿はファイルがアップロードされる直前に先述したページが表示され、
ファイルのアップロードが無効になってしまうという状態です
Check Modeでのcgiの動作確認も試しましたが、各種パーミッション設定・各種パス等には異常は見受けられませんでした
また、この事象と併発するかのように、以前は見られなかった携帯閲覧時の502エラーも見受けられます
試しに他のレンタルサーバーのアカウントを取得し、上記cgiの設置・動作確認を試みてみたところ、
特に問題なくPostModeでのログイン・ファイルのアップロード、通常のファイルアップロードが出来ました
132:131
06/11/03 21:30:51
続きです
管理元にその旨問い合わせを行ったところ、
＞おそらく記事投稿前の認証時の不都合は広告挿入が邪魔をしていると
＞思われますので、その処理の部分に<!--banner-->を挿入して
＞広告の位置を変更してください。
＞<!--banner-->はHTMLの部分に記述しなければ有効になりませんので、
＞CGIの処理の流れを見て頂く必要が御座います。
＞目安として該当の認証を押した後の<BODY>が記述される直後か、
＞更にいくつか下に設定されると良いと思います。
とのことでした
＞その処理の部分に<!--banner-->を挿入 の部分の処理の手順が分からなく、今回質問を書き込んだ次第です
お願いします
133:nobodyさん
06/11/04 01:02:40
まずサポートBBSで聞くべきではないかね？
134:nobodyさん
06/11/07 16:18:05
【. CGI名 .】Multiple Enquete 投票式アンケート
【配布先URL】URLﾘﾝｸ(popup.tok2.com)
【ヘルプ内容】コメント欄の書き込みへの禁止ワードを設定したい。
配布先の更新がなく、公式のサポート掲示板
URLﾘﾝｸ(popup.tok2.com)
が死んでしまっているようなので、よろしくお願いいたします。
135:nobodyさん
06/11/07 17:15:31 5wPSAWJ0
【. CGI名 .】 Web Patio
【配布先URL】 URLﾘﾝｸ(www.kent-web.com)
【. 置き場所 .】 URLﾘﾝｸ(www.kent-web.com)
【ヘルプ内容】 アイコン機能を付けたい。
わがままを言えば昇進機能も付けたい。
どうか宜しくお願いします<(_ _)>
136:po ◆iwvS1vwsFQ
06/11/07 23:34:29
>>134
バージョンがいくつかあるんだけどどれ？
>>135
無理
137:po ◆iwvS1vwsFQ
06/11/07 23:36:48
>>134
つーかそもそも落とせなかったよ。古いし、他の探したほうがいいかも。
138:nobodyさん
06/11/08 13:01:27
>>136
無理では無い気もするが
まぁとりあえず俺にはできない
139:nobodyさん
06/11/10 03:57:38 l5C4yy5g
【CGI名】 LQアクセス制限ライブラリー
【配布先URL】 URLﾘﾝｸ(www2s.biglobe.ne.jp)
【設置サーバ】 独自ドメイン
【 質問内容 】 ググったら丸投げや>>451を見つけました。
だが、書かれてるやり方ではCGIごとではなくサイト丸々全部を管理は出来るが、
自分のログを除外出来ないようです。
自分を除外するにはどこをいじればいいのでしょうか？
140:nobodyさん
06/11/10 04:11:11 +7tgrk2T
age
141:nobodyさん
06/11/13 20:51:31
age
142:nobodyさん
06/11/14 20:12:31 Zhg0+JNh
【. CGI名 .】 切って出し日記
【配布先URL】 URLﾘﾝｸ(wws.cside.com)
【. 置き場所 .】 URLﾘﾝｸ(wws.cside.com)
【ヘルプ内容】
最新の2件を切って出してJSファイルにするとき、
JSファイルの中身を以下のように出力できるようにしたい。
---JS中身---
document.write('11/13 日記開始<br>');
document.write('11/14 更新<br>');
--ここまで
今は上の行と下の行が逆に出力されている。
143:nobodyさん
06/11/14 20:16:50
最初は、日記のログに書き込む時に、頭に追記じゃなくて尻に追記する
ように考えてみたのだが・・・ログがぐちゃぐちゃになった。
次にJSへ出力する時に順を変えてみようとしたのだが・・・
「JSファイルに書き込みを～回まで繰り返す」という処理になっていたので
出力する段階の配列をソートってわけに行かなかった。
144:142
06/11/14 20:17:46
>>143=>>142です。sageたらIDも消えるんだった（・・・）
145:nobodyさん
06/11/14 20:40:37
>>142
置き場所つーのは『お前が』置いた場所だと何度言えばもうね。
…で、あんまちゃんと見てないけど、
外部JavaScriptへの出力ってkd_diary.cgiの800行目くらいからある部分のことかな。
だとしたら852行目の
print JS "document.write(\'$w_line\');\n";
で直接書き出す代わりに適当な配列に格納して、855行目の
close(JS);
の手前でまとめて吐き出せば良いんじゃないかな。
配列に格納する時に先頭にねじ込めば順番は逆になると思うが。
146:nobodyさん
06/11/14 23:12:23
>>145
半分わかったような気がする。がんがってみる。ありがとん。
147:nobodyさん
06/11/14 23:17:33
おう頑張りな。
148:142
06/11/15 00:31:18
できました。ありがとうございました（＞＜）
149:nobodyさん
06/11/25 22:53:31 ocCKf8uF
【 CGI名 】 簡易データベース
【配布先URL】 URLﾘﾝｸ(www.rescue.ne.jp)
【ヘルプ内容】 検索ワードのログを保存したいです（例：log.txt）
どのようにすればよいのかアドバイスお願いします。
150:nobodyさん
06/11/26 12:42:51 Y4Eo2nyo
【. CGI名 .】 I-BOARD/2001 v2.4 （必須）
【配布先URL】 URLﾘﾝｸ(www.cj-c.com) （必須）
【. 置き場所 .】 URLﾘﾝｸ(www.cj-c.com) （任意）
【ヘルプ内容】
・連続投稿規制をつけたいのですが
どのようにすればいいかわかりません。アドバイスお願いします。
・トピック表示のときにレスしたあとに飛ぶページが掲示板のトップページなので
レスしたあと飛ぶページをレスしたスレッドのページに飛ぶようにしたいのです。
アドバイスお願いします。
151:nobodyさん
06/11/26 18:47:16
>>150
ひとつめ
投稿のたびにＩＰを記録して同じＩＰなら規制すればいい
ふたつめ
Location
152:150
06/11/26 19:19:57 tkb0DDKs
>>150ですが
説明不足でした。>>151さんすいません。
秒数で連続投稿規制をつけたいのです。
一回投稿したら、10秒は投稿できないようなものです。
よろしくお願いします。
153:nobodyさん
06/11/26 21:17:21
KENTのBBSからその部分パクればええやん
154:150
06/11/26 21:53:46 tkb0DDKs
>>153
それってなにか違反になったりしませんよね？
155:nobodyさん
06/11/27 08:02:30
再配布とかしない限りはな
156:150
06/11/27 16:00:15 kaXmljFh
連続投稿規制をつけるほうほうがのってるサイトがあったら教えてください
157:nobodyさん
06/11/27 16:14:05
そんなピンポイントな方法は需要から考えてもそのものずばりが見つかるとは思えんし
大人しく自分で処理を考えるべきだと思うよ。死ぬほど簡単だし。
実際に動作するサンプルだってそこら中にあるでしょ。
158:150
06/11/27 16:19:00 kaXmljFh
わかりました。
どうもありがとうございます。
159:nobodyさん
06/11/28 16:35:21
連投規制の処理がKENTの著作だとは知らなかったｗｗｗ
160:1/2
06/11/29 22:10:10
PatiPati URLﾘﾝｸ(www.gnbnet.com)
メッセージを送るためのフォームです。
これによって出力されるHTMLを改造したいのですが、
どのようにいじればよいものかと悩んでいます。
メッセージの送信ページでは2つの項目を用意していて、
<input type="text" name="com">
このようなinputで名前を送信し、
<textarea name="sub1">
このようなtextareaでメッセージを送信するしくみにしています。
デフォルトの設定では"com"の内容のみ送信され、
"sub1"はユーザがオプションで設置するようにマニュアルで書かれています。
メッセージを送信すると、
送信された内容が以下のように出力されるようになってほしいのですが、
<dl>
<dt>（ここに、<input type="text" name="com">で送ったメッセージが入る）</dt>
<dd>（ここに、<textarea name="sub1">で送ったメッセージが入る）</dd>
</dl>
161:2/2
06/11/29 22:10:46
現状では以下のように出力されてしまいます。
<dl>
<dt>（ここに、<input type="text" name="com">で送ったメッセージが入る）
<dd>（ここに、<textarea name="sub1">で送ったメッセージが入る）</dd></dt>
</dl>
index.cgiを改造すれば解決できそうだということは予想がついていて、
70～80行目あたりの「$QUERY{'com'}」や、
「$msg」あたりをいじれば解決できるだろうと思うのですが…。
なお、現在はそのへんを以下のように書いています。
$QUERY{'com'} .= "\n<dd>$QUERY{$wk}<\/dd>";
$msg = "<dl>\n<dt>$QUERY{'com'}<\/dt>\n<\/dl>";
CGIの知識はまったくないので、このへんをどのようにすればよいのかわかりません。
あと一歩でなんとかなりそうなので、
どなたかお力を貸していただけるとうれしいです。
162:nobodyさん
06/11/29 22:23:36
バージョンを書き忘れました。すみません。
2006/11/18 Ver3.2 です。
ついでに書いておきますと、
メッセージの送信ページのフォームは以下のように書いています。
<dl>
<dt>名前</dt>
<dd><input type="text" name="com" value="名前" size="40"></dd>
<dt>メッセージ</dt>
<dd><textarea name="sub2" cols="20" rows="4">メッセージ</textarea></dd>
<dt>返信不要ならばチェックしてください。</dt>
<dd><input type="checkbox" name="sub1" value="返信不要">返信不要</dd>
<dt>送信ボタン</dt>
<dd><input type="submit" name="submit" value="送る"></dd>
</dl>
163:nobodyさん
06/11/29 22:57:56
そこまで分かればもう一歩だったのにな。
$QUERY{'com'} .= "\n<dd>$QUERY{$wk}<\/dd>";
$msg = "<dl>\n<dt>$QUERY{'com'}<\/dt>\n<\/dl>";
を
$QUERY{'com'} .= "<\/dt>\n<dd>$QUERY{$wk}<\/dd>";
$msg = "<dl>\n<dt>$QUERY{'com'}\n<\/dl>";
にしてみそ。
164:160
06/11/29 23:43:59
>163
どうもありがとうございます。
最初に謝らなければなりません。
>161でname="com"とname="sub1"についてのことを書きましたが、
>162で書いた通り、「返信不要」のオプション（name="sub2"）をつけております。
$QUERY{'com'} .= と $msg = を>161のように設定しているときは
name="sub1"とname="sub2"の送信内容に問題がなかったので、
以下のように例文を端折って書いたのですが…。
<dl>
<dt>（ここに、<input type="text" name="com">で送ったメッセージが入る）</dt>
<dd>（ここに、<textarea name="sub1">で送ったメッセージが入る）</dd>
</dl>
>163さんの設定だと
<dl>
<dt>（ここに、<input type="text" name="com">で送ったメッセージが入る）</dt>
<dd>（「返信不要」にチェックを入れた場合のみこの行が入る）</dd></dt>
<dd>（ここに、<textarea name="sub1">で送ったメッセージが入る）</dd>
</dl>
このように「</dt>」が余計になってしまいました。
なお、name="sub2"にチェックしなかったときは希望通りになりました。
せっかく考えていただいてたいへん申し訳ないのですが、
必要な情報をすべて書かなかった私の失敗です。申し訳ございません。
165:160
06/11/29 23:53:49
「返信不要」の項目とメッセージを同時に送信しても
「</dt>」が入らなければよいのですが、そのような方法はありますか？
name="com"の内容を「○○」、name="sub1"の内容を「○○」などと、
各nameごとにHTMLのタグを書ければ都合がよいのですが、
元のソースがそういう仕様ではないようなので惜しいです。
もし不可能であれば、「返信不要」のチェックを使用することはあきらめて、
>163さんが書いてくださったものをそのまま使用したいと思います。
あと、>164で『、「返信不要」のオプション（name="sub2"）』と書いてしまいましたが、
正しくは、「返信不要」がname="sub1"で、メッセージがname="sub2"でした。
CGIの仕様で、もともとはメッセージをname="com"として送信するしくみになっているので、
そのへんの順番をいじったため、まぎらわしい文章になってしまいました。
166:nobodyさん
06/11/30 00:38:52
ループの前に
$QUERY{'com'} .= "<dt>$QUERY{'com'}<\/dt>\n";
でループの中に
$QUERY{'com'} .= "<dd>$QUERY{$wk}<\/dd>\n";
でループの後に
$msg = "<dl>\n$QUERY{'com'}\n<\/dl>";
でどうよ。
167:160
06/11/30 01:25:36
オリジナルのソースと照らし合わせてみたところ、
現在のソースもオリジナルと行番号が同じになっているので、
オリジナル版のソースの行番号を合わせて書きます。
>166
どうもありがとうございます。
「ループの前」というのは、
if($QUERY{$wk} ne ""){}（line69～）の外側という意味ですよね？
「while($i <= $sub_su){」（line67）と「if($QUERY{$wk} ne ""){」の間に
$QUERY{'com'} .= "<dt>$QUERY{'com'}<\/dt>\n";（>166）を書いてみましたが、
<dt>～</dt>が何度も出力されてしまいます。
$QUERY{'com'} .= "<dd>$QUERY{$wk}<\/dd>\n";（>166）はline73のそれに置き換え、
$msg = "<dl>\n$QUERY{'com'}\n<\/dl>";（>166）もline79のそれに置き換えてみましたが、
<dd>も同様に、何度も出力されてしまいました。
168:nobodyさん
06/11/30 01:48:17
何でifがループなんだよ。
ループはそこのwhileだっての。
169:160
06/12/01 13:53:05
>168
どうもありがとうございます。助かりました。
Proxomitronでグローバル変数の使い方を習っていたので、
それを応用することでとりあえず解決しました。
if($bk_ck == 0){（line65）の中に
$QUERY{'total'} .= "<dt>$QUERY{'com'}<\/dt>"; を挿入し、
その後の$QUERY{'com'}をすべて$QUERY{'total'}に書き換えることで解決しました。
これで問題なければよいのですが…。
170:150
06/12/03 14:24:33 MG/kBdop
【. CGI名 .】 I-BOARD/2001 v2.4 （必須）
【配布先URL】 URLﾘﾝｸ(www.cj-c.com) （必須）
【. 置き場所 .】 URLﾘﾝｸ(www.cj-c.com) （任意）
【ヘルプ内容】 連続投稿15秒規制機能をつけたいのですが
if(現在の時間 - 最終投稿時間 < 10秒)er{エラー10秒待ってください}
if ($date - $Date{$_} < 15){&er_("<br>連続投稿は禁止です。");}
このようにしたのですが
無理のようです。
わかるかたいたらアドバイスお願いします。
171:nobodyさん
06/12/03 15:16:25
それそもそも動いてるのか？
あとエラー出てるならエラー文書けや
172:170
06/12/03 18:22:28 Ga649VF2
>>170
それはぼくにいってるんですかね？
10秒規制を付けたいんですが
いつ投稿しても「連続投稿は禁止です。」とでます。
173:nobodyさん
06/12/03 18:33:18
>>170
そんな部分的な変更点（しかも文法がおかしい）だけ見せられてもな
おまえ自身よくわかってなさそうだし、現時点でのソースどこかにupして晒せ
174:170
06/12/03 19:23:11 Ga649VF2
URLﾘﾝｸ(sakuratan.ddo.jp)
こんな感じです。
175:nobodyさん
06/12/03 19:54:33
最近のガキは計算の順序も知らんのか？
176:170
06/12/03 20:20:18 Ga649VF2
KENTを参考にしてみたんだが
177:nobodyさん
06/12/03 21:31:55
ヘタレだな。
178:nobodyさん
06/12/09 20:08:53
【. CGI名 .】 切って出し日記 Ver2.5
【. 置き場所 .】 URLﾘﾝｸ(wws.cside.com)
【ヘルプ内容】
改造するのはkd_diary.cgiです。
1ページの表示と過去ログへの移行を、設定した件数ごとではなく
月ごとにしたい。
しかし・・・私の改造では、翌月の投稿をしても動作しませんでした。
※ちょうど年も変わりますしね。
やってみたのは、このCGI内の
##########################################
# ログデータ書きこみ
##########################################
の部分。
179:178
06/12/09 20:10:20
以下の部分を・・・
if($LOGDATA >= $pagemax) {
$log_data = pop(@LOGDATA);
if($logmax >= 0) {
($l_date,$l_comment,$l_face,$l_weather,$l_color_1,$l_color_2,$l_title,$l_time,$l_min) = split(/<>/,$log_data);
$log_name = $logdir .'/'. substr($l_date,0,4) . substr($l_date,4,2) . '.log';
open(OLD,"$log_name");
@oldLOG = <OLD>;
close(OLD);
unshift(@oldLOG,"$log_data\n");
sort sorter1 @oldLOG;
open(OLD,">> $log_name")|| &error('過去ログファイル/ディレクトリ異常');
print OLD @oldLOG;
close(OLD);
}
}
if($logmax > 0) {
opendir(DIR,"$logdir") || &error('過去ログ格納ディレクトリがありません');
@dirent = grep(/[0-9]+\.log/,readdir(DIR));
@dirent_s = sort(@dirent);
@dirent = reverse(@dirent_s);
closedir(DIR) ;
if($dirent >= $logmax) {
unlink ("$logdir\/$dirent[$dirent]")|| &error("過去ログ($logdir\/$dirent[$dirent])が削除できませんでした");
}
}
180:178
06/12/09 20:45:46
$log_data = pop(@LOGDATA);
($l_date,$l_comment,$l_face,$l_weather,$l_color_1,$l_color_2,$l_title,$l_time,$l_min) = split(/<>/,$log_data);
#新規投稿データ↓
($n_date,$n_comment,$n_face,$n_weather,$n_color_1,$n_color_2,$n_title,$n_time,$n_min) = split(/<>/,$line);
#現在のログの月を取得
$olddate = substr($l_date,4,2);
#新規投稿データから月を取得
$newdate = substr($n_date,4,2);
#現在の月より、ログの方が大きかったら・・・。
if($olddate < $newdate){
$log_name = $logdir .'/'. substr($l_date,0,4) . substr($l_date,4,2) . '.log';
open(OLD,"$log_name");
@oldLOG = <OLD>;
close(OLD);
unshift(@oldLOG,"$log_data\n");
sort sorter1 @oldLOG;
open(OLD,">> $log_name")|| &error('過去ログファイル/ディレクトリ異常');
print OLD @oldLOG;
close(OLD);
}elsif($olddate eq '12' && $newdate eq '1'){
181:178
06/12/09 20:46:16
#もし投稿されたのが1月で、直前の月が1月なら。
$log_name = $logdir .'/'. substr($l_date,0,4) . substr($l_date,4,2) . '.log';
open(OLD,"$log_name");
@oldLOG = <OLD>;
close(OLD);
unshift(@oldLOG,"$log_data\n");
sort sorter1 @oldLOG;
open(OLD,">> $log_name")|| &error('過去ログファイル/ディレクトリ異常');
print OLD @oldLOG;
close(OLD);
}
#ここまで
182:178
06/12/09 20:49:38
あ・・・ミスったorz
>>180＋>>181に変えた、ということです。
エラーなどはないのですが、
月が変わったことによる現行ページの更新ができないまま
それまでのログにそのまま追加されてる感じです。
183:nobodyさん
06/12/24 04:13:24 9TMcOB7X
【. CGI名 .】 レス付き画像掲示板 imgboard
【. 置き場所 .】 URLﾘﾝｸ(www.big.or.jp)
【ヘルプ内容】 掲示板への投稿が一定数以上なければ、閲覧することが
できない制限をつけたいのですが、わかりません。
（来訪者の割りに投稿者が少なく、ＤＯＭを減らしたいため）
Perlコーディング初心者質問スレ Part 53 ⇒改造スレへ誘導されました。
184:183
06/12/24 04:14:08 9TMcOB7X
↓こんなのを考えてみましたが、どのあたりに置いたら良いのかわかりません。
（書込みルーチンが長すぎて）
##### 投稿数をcookieに保存する #####
&read_cookie# cookie読込(imgboardルーチン）
$post_count = $COOKIE{'imgboard_post'}
$new_post_count = $post_count++;#投稿数を1つ加算する
# 有効期限を30日間に指定
($sec, $min, $hour, $mday, $mon, $year, $wday) = gmtime(time + 60*60*24*30);
@mons = ('Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');
$date = sprintf("%s, %02d\-%s\-%04d %02d:%02d:%02d GMT",
$week[$wday], $mday, $mons[$mon], $year+1900, $hour, $min, $sec);
print "Content-type: text/html\n";
print "Set-Cookie: imgboard_post =$new_post_count; expires=$date; \n";
-----------------------------------------------------------
##### 2回以上投稿があれば、掲示板の中身を表示する #####
&read_cookie# cookie読込(imgboardルーチン）
$post_count = $COOKIE{'imgboard_post'}
if ($post_count > 1) {# 2回以上投稿あるとき、
&top_html;# ヘッダ表示(imgboardルーチン）
&output_form_html;# 投稿画面を表示(imgboardルーチン）
&output_html("$file");# 掲示板を表示(imgboardルーチン）
} else {
&top_html;# ヘッダ表示(imgboardルーチン）
&output_form_html;# 投稿画面のみ表示(imgboardルーチン）
}
185:183
06/12/26 15:44:50 p3+/o574
自己解決、完成しました。
186:nobodyさん
06/12/28 17:03:53 6RqsItPR
【. CGI名 .】 Web Board Professional URLﾘﾝｸ(www.web-liberty.net)
（ただし、Ver.2.27です。最新はVer.3.15）
【ヘルプ内容】 転送アドレスを利用した上でクッキーを有効にしたい。
無料の転送アドレスを取得し、本来のアドレスを隠していますが、
そうするとクッキーが利かなくなってしまいます。
クッキーがリファラを記憶し、照合しているため、転送アドと不一致となり、無効となっているようです。
以下がクッキー関連の処理部分です。
どうかお知恵をお貸しください。
sub get_cookie {
local($cookie_id) = @_;
local %all_cookies = ();
foreach (split(/; /, $ENV{'HTTP_COOKIE'})) {
local($key, $value) = split(/=/);
$all_cookies{"$key"} = $value;
}
foreach (split(/&/, $all_cookies{"$cookie_id"})) {
local ($key, $value) = split(/:/);
$value =~ s/&/&/g;
$value =~ s/</</g;
$value =~ s/>/>/g;
$value =~ s/"/"/g;
$cookie{&unescape($key)} = &unescape($value);
}
return %cookie;
}
187:186
06/12/28 17:05:58 6RqsItPR
続きです
sub set_cookie {
local(*cookie, $cookie_id, $hold_days) = @_;
if (time() > $cookie{'refresh'} + 60 * 60 * 24 * 30) {
$cookie{'refresh'} = time();
}
local @pairs = ();
foreach (sort keys %cookie) {
push(@pairs, &escape($_) . ':' . &escape($cookie{"$_"}));
}
local $new_cookie = join('&', @pairs);
local $date = &gmt_date(time + 60 * 60 * 24 * $hold_days);
if ($new_cookie ne $all_cookies{"$cookie_id"}) {
print "Set-Cookie: $cookie_id=$new_cookie; expires=$date\n";
}
return;
}
188:nobodyさん
06/12/29 13:59:16
>>186
クッキーは異なるドメインは参照できない。
それに本来のアドレスを隠すといっているが、ばればれ。
とくにフレーム転送とか。
189:186
06/12/29 17:41:09
>>188
根本的にダメなんですね。ありがとうございました。
190:nobodyさん
07/01/03 10:54:46 O8K3holw
:
191:nobodyさん
07/01/05 12:33:37
【. CGI名 .】 Ans.Q Customize Version（クッキー対応版）
【配布先URL】 URLﾘﾝｸ(www.non-policy.com)
元々の配布先 URLﾘﾝｸ(www7.big.or.jp)
【ヘルプ内容】 Ans.Qの1.40をつかっていたのですが、
書き込みの時間を入れたくて、上記改造版を設置してみたのですが、
コメントがついてもその記事が一番上に移動しません。
どこをどうすればわからなくてこちらに来てしまいました。
元のサイトで配布されていたいた1.4バージョンは自動で移動していました。
よろしくお願いします。
192:nobodyさん
07/01/06 02:34:41 5JmlMvQ+
【. CGI名 .】 MSUBoard v0.15[PHP]
【配布先URL】 URLﾘﾝｸ(cgi-lounge.eek.jp)
【ヘルプ内容】 このスクリプト自体がauだけにしか対応していないので、3キャリア
もしくはDoCoMoだけには対応してほしいです。よろしくお願いします。
193:nobodyさん
07/01/06 03:38:24 WO53R+Nq
【. CGI名 .】 PHP JoyfulNote
【配布先URL】 URLﾘﾝｸ(script.s16.xrea.com)
【ヘルプ内容】 画像掲示板なのですが、名前とコメントだけでも投稿できるため、
海外からの定期的なスパム投稿で困ってます。
新規投稿には画像添付が必須になるようにお願いします。
194:nobodyさん
07/01/06 22:49:45 lBOtCkKI
【. CGI名 .】 askabbs
【配布先URL】 URLﾘﾝｸ(www.kent-web.com)
【. 置き場所 .】 URLﾘﾝｸ(www.kent-web.com)
【ヘルプ内容】
・投稿する本文に半角カタカナがあったらエラーメッセージを出したい。
・しかし「･」など、カタカナ以外はエラーにならないようにしたい。
本文を一旦EUCにして半角カタカナの有無を判定させるのはググればコードがあったので
以下のように書いてOKでした。
が、「・」が半角の場合までエラーになってしまいます。
カタカナ以外を半角カタカナと認識させないというのは、できないものでしょうか？
&jcode'convert(*message, "euc");
if ($message =~ /\x8E/) {&error("ERROR<br>半角カタカナが含まれています");}
&jcode'convert(*message, "sjis");
195:nobodyさん
07/01/06 22:55:55
>>193
海外からのスパム投稿なら、日本語を含まない投稿を遮断したら？
196:nobodyさん
07/01/08 19:16:50 RAFN8Ic4
【. CGI名 .】テキストカウンタDX
【配布先URL】URLﾘﾝｸ(apps.cside.com)
【. 置き場所 .】URLﾘﾝｸ(apps.cside.com)
【ヘルプ内容】設定画面で直前のIPアドレスのカウント拒否はできるんですが、
直前ですので、リーロードがあるとまたカウントされたりしてしまいます。
できれば２４時間以内に同一ＩＰはカウントをしないなど改造できないでしょうか。
自分では非力でできませんした。
どうかよろしくお願いします。
197:nobodyさん
07/01/09 21:22:59 kjLanKuN
>>193
ここでスパム対策版を配布してる。
URLﾘﾝｸ(swanbay-web.hp.infoseek.co.jp)
198:nobodyさん
07/01/10 05:55:31
【. CGI名 .】HiddenCounter Model4(隠しカウンタ/ダウンロードカウンタスクリプト)
【配布先URL】URLﾘﾝｸ(www.chitta.com)
【. 置き場所 .】URLﾘﾝｸ(up.spawn.jp)
【ヘルプ内容】
<a href="hcnt4.cgi?カウンタ名@ファイルURL">ダウンロード</a>
のように呼び出してカウントさせるダウンロードカウンタです。
ログの閲覧(hcnt4.cgi?パスワード)ページには、カウンタ名とヒット数だけが載ります。
そのログの閲覧ページで、ファイルURLをカウンタ名にリンクさせる形で表示したいのですが、方法が分かりません。
カウンタ名は「$name」、ファイルURLは「$Url」、ヒット数は「$value」になっているみたいなので、単純に
<a href="$Url">$name</a>
としたのですが、設置ディレクトリがリンクされるだけで、ファイルURLをリンクさせる事ができませんでした。
どうすればファイルURLをリンクさせる事ができるのか、アドバイスを頂けないでしょうか。宜しくお願い致します。
※テスト環境ではパスワード($Password)は「1234」としています。
199:nobodyさん
07/01/10 06:40:46 ALgB1HLh
保守
200:196
07/01/12 15:49:54 Sg/zwaZY
保守
201:nobodyさん
07/01/15 00:23:08 ho2dYuVd
【. CGI名 .】Online Server Status v 1.4 English Version
【配布先URL】URLﾘﾝｸ(www.schwebdesigns.com)
【. 置き場所 .】URLﾘﾝｸ(cowboy.jf.land.to)
【ヘルプ内容】
サーバーの状態確認PHPなのですが、現在サイトのトップページに使用しています。
このスクリプトを最終訪問者から10分後に来た訪問者が実行するようにしたいのです。
最終訪問者の時間記録＞次の訪問者＞時間確認＞10分以内ならサーバーに問い合わせず、画像そのまま。
という形に出来ませんでしょうか？
いざ改造しようにも手も足も出ず書き込んだ次第です。宜しくお願いいたします。
202:nobodyさん
07/01/15 15:33:53
マルチはクタバレ。
203:201
07/01/15 18:14:43
重複申し訳有りません。
丸投げスレに依頼しましたのでそちらの方でお願い致します。
204:198
07/01/19 22:25:32
宜しくお願いします
205:nobodyさん
07/01/20 23:53:45
>>198
hcnt4.datの中身見れば分かると思うけど、
そのスクリプトはカウンタ名とダウンロード回数しか記録していない。
集計モードではファイルの置き場所が分からないのでそれを表示なんて無理。
どうしてもこのカウンタにこだわるのなら
ダウンロード回数をカウントする際にダウンロード先のURLも合わせて記録するようにすれば
一応おまいのやりたかったことも実現できるけど、
おまいの腕なら改造するよりそういう機能を持った別のCGIを探した方が早いだろう。
206:198
07/01/21 02:04:43
>>205
レスありがとうございます。
＞ダウンロード回数をカウントする際にダウンロード先のURLも合わせて記録する
にチャレンジしていたのですが、自力では無理そうです。
私はこのCGIを気に入っていたのですが、変に改造して不具合が出ても困りますし、(今更ですが)別のものを探した方が早いと思うので、諦めて他に乗り換えます。
アドバイスありがとうございました。
207:nobodyさん
07/01/23 19:05:41
どなたかお願い致します。
【. CGI名 .】 Web Patio 3.06
【配布先URL】 URLﾘﾝｸ(www.kent-web.com)
【ヘルプ内容】
投稿フォームにプルダウン式の項目を追加し、その項目をスレッドタイトル横に表示させたいのですが
どのように改造すれば良いのでしょうか…
配布元のサポートの過去ログに「ラジオボタンで項目追加したい」と言う物があり、（URLﾘﾝｸ(www.kent-web.com)）
それを参考に見よう見真似でプルダウンに置き換えてみたのですが、
初心者な上に、バージョンも違うので何をどこに追加挿入していいかわからなくなってしまいます…
どなたかお力添えお願い致します。
208:nobodyさん
07/01/23 19:40:59
当然ここで聞く前にKENTのサポート板でも聞いたよね？
そこでは何と言われたのかな？
209:207
07/01/23 22:01:06
>>207で記述した過去ログを参考にしてみろと言われましたが、
やっぱり上手く行かなかったのでこちらに質問に来ました…
210:nobodyさん
07/01/23 22:15:16
KENTのサポート板でちゃんと「言われた通りに過去ログを参考にしてみたけど
やっぱり分かりませんでした」と言ったんだよね？
211:207
07/01/23 22:24:47
そこまではしませんでした…！
また新にスレッドを作成して聞いてみたいと思います＞＜
厳しいご対応ありがとうございました。
ご迷惑お掛けしてしまい申し訳ございませんでした。
212:nobodyさん
07/01/23 23:14:12
新しいスレッドじゃなく今のスレッドに続けてレスで書いた方がいいんじゃないかと思うんだが・・・
質問の内容は続いてるのに、いちいちスレッド立てられたら禿しくウザイよ。
KENTのサポート板覗いたことないからどういう構造になってんのか知らんけどさ。
213:nobodyさん
07/01/26 08:18:44 FhPFkwLT
【. CGI名 .】 SS(C-BOARD)
【配布先URL】 URLﾘﾝｸ(www.skullysoft.com)
【ヘルプ内容】 携帯の固体識別番号を取得し、その取得の際通知を拒否した者をはじきたいのですがどうしたら良いでしょうか？ご伝授ください。
214:nobodyさん
07/01/26 10:47:43
自己解決しました。アクセル解析してif文で振り分けますね。
215:nobodyさん
07/01/26 14:08:16
ｳﾞｩｫｵｵﾝ！！ｳﾞｩｫｵｫｵｵﾝ！！！
216:196
07/01/27 09:14:27 0yEfcEBm
誰かお願いします；；
217:nobodyさん
07/01/27 15:15:20
自分でやる気がないものをここで聞くな。
218:196
07/02/02 12:58:55 tLR7xhcU
自分でできました！
やる気だせばタグを追加すればいいだけで簡単でした。
死ね糞ども。
219:nobodyさん
07/02/03 11:40:42
kent webにあるWEB PATIOの掲示板でスレッドの返信数を多くしたいので
すが（1000くらい）。
普通に返信数の設定を1000に変えるだけで問題はありませんか？
それともSQLとかデータベースを使ったほうがいいですか？
220:nobodyさん
07/02/03 11:46:44
知らんがな。サーバ運営に聞けよ。
まあマジレスするとたかだか1000件程度ならデータベースはいらんと思うけどな。
221:nobodyさん
07/02/12 19:46:19
アイコンを1つだけ選択して表示するためのルーチンを改造し
複数選択して表示できるようにしたいのですが
アドバイスいただけますでしょうか。
ラジオボタン式からチェックボックス式に変えてみましたが、
当然というか、それだけでは複数表示できませんでしたorz
以下、そのルーチン部分です。
sub icon_select {
unshift(@icon_image,"");
if($icon eq ""){ $icon = $icon_image[0]; }
$sel = "";
foreach $ico (@icon_image) {
if($ico ne ""){ $ico_img = "<img src=\"$icon_dir$ico\" align=\"absmiddle\">"; }else{ $ico_img = "なし"; }
if($ico eq $icon){ $sel .= "| <input type=\"radio\" name=\"icon\" value=\"$ico\" checked>$ico_img \n";}
else{ $sel .= "| <input type=\"radio\" name=\"icon\" value=\"$ico\">$ico_img \n";}
}
$sel .= " |\n";
return $sel;
}
222:nobodyさん
07/02/12 20:52:26
>>221
同じnameで複数の値を送信する用に改造したい場合、
・値を受け取るところで、値を変数に入れている部分を複数の値を配列に入れる改造が必要である。
・ｱｲｺﾝを表示する部分では配列に入った分だけ表示されるように改造する必要がある。
223:221
07/02/13 02:12:51
>>222
アドバイスありがとうございます。
教えていただいた事を参考に改めて挑戦してみます。
224:nobodyさん
07/02/21 14:01:46
【. CGI名 .】 アイコンTeaChatV2
【配布先URL】 URLﾘﾝｸ(blog.tirno.net)
【.動作サンプル .】 URLﾘﾝｸ(www.tirno.net)
【ヘルプ内容】
TEACHATにpup.cgiを追加したユーザーアップロード形式のアイコンチャットなのですが、
このアイコンが基本的に登録した順にセレクトボックス内に並ぶので、一人で複数とか登録すると
だんだんと探したり入室中に変えたりが遣りづらくなってしまいます。
また、登録時にパスを設けた専用アイコンは、また別に並ぶので、
「登録アイコン」「専用アイコン」それぞれを名前昇順で自動的にソートするようにしたいです。
225:nobodyさん
07/02/21 14:05:25
長くなってしまったので続きます。
関係部分はこんな感じです。(html.plの590～672行あたり）
if(@iconu1){
$facemark = $facemark."<optgroup label=\"～登録アイコン～\">";
}
foreach (0 .. $#iconu1){
$icon_value = $icon_url . "\/" . $iconu1[$_];
if (!$icon) { $icon = $icon_value; }
if ($icon eq $icon_value) {
$iconch = " selected";
} else {
$iconch = "";
}
$facemark = $facemark."<option value=\"$icon_value\"$iconch>$iconv1[$_]\n";
}
if(@iconu1){
$facemark = $facemark."</optgroup>\n";
自分でも色々遣ってみたのですが配列が二重だからか、
ソート関数の使い方が今ひとつ要領を得なかったので此方で質問させていただきました。
宜しければどなたかご教授願えませんでしょうか？
226:nobodyさん
07/03/02 01:24:23
URLﾘﾝｸ(www.42ch.net)
このスクリプトで、ログファイルへのデータ追加時に
現在の年日時を取得して
2007/2/18 20:09
のような形式で行の末端に自動的に書き込むようにしたいのですが、
どの部分にどのような処理を加えれば良いでしょうか？
227:nobodyさん
07/03/04 21:22:44
とりあえず自分でどう書いてどう動かないのか言ってみ？
228:nobodyさん
07/03/10 17:08:20
sendmailについてお聞きしたいのですが
open(DATA,'| /usr/sbin/sendmail -t "xxxxxx@xxx.xxx"');
これなら通るのですが
$mlto="xxxxxx@xxx.xxx";
open(DATA , '| /usr/sbin/sendmail -t $mlto');
これだと通らないで困っています。
目的はログイン制CGI内部でメンバの特定人物指定によるメッセージ機能で
メッセージが入るとｍｓｎメッセンジャーや携帯メールにお知らせするためのものです
サーバーは個人運営してるところでお借りしているのですがそちらに問い合わせる
前にこちらで相談してからと思いました。基礎を知らないものですみません。
アドバイスがあればよろしくお願いいたします。
229:nobodyさん
07/03/10 18:29:56
シングルクォート内では変数は展開されない
230:228
07/03/10 22:32:41
>>229
そうでした。忘れてました。ご指摘ありがとうざいます。
ダブルクォートで試してみましたがダメでした。
open(DATA , "|$mailer -t $mlto");も検索して見つけた次行
open(DATA , "|$mailer -t '$mlto'");もダメでした。
open(DATA , "|$mailer -t");print･･･; print DATA "To :$mlto";もダメでした。
一応一通り試してみたのですが自分では解決できそうにありません。
なにかアドバイスがあればよろしくお願いいたします。
231:nobodyさん
07/03/10 23:18:11
>>228で>>229と言われて>>230に走るようでは
それ以上火傷しない内にもう止めろと言いたくなる。
232:228
07/03/11 00:10:26
>>231
言われる前に一通り試したのですがダメだったので相談しにきたのですが
止めろと言われるなら素直に借りてるサーバの管理者に相談します。
ありがとうございました。
233:nobodyさん
07/03/12 19:01:30 D70wnXmo
【. CGI名 .】 2chブラウザ対応掲示板 (PATH_INFO対応) - Perl版 -
【配布先URL】 URLﾘﾝｸ(perl.toshinari.net)
【ヘルプ内容】 PC版の場合、アドレスがURLﾘﾝｸ(homepage)（URLﾘﾝｸ(homepage)）となるんですが
携帯のアドレスはURLﾘﾝｸ(homepage)でしかアクセスできません
URLﾘﾝｸ(homepage)でアクセスできる様にしたいのでお願いします
234:nobodyさん
07/03/12 21:45:30
【. CGI名 .】KENT SUN BOARD(HTMLボード) Ver: 3.9
【配布先URL】URLﾘﾝｸ(www.kent-web.com)
【ヘルプ内容】携帯には対応してはいませんが、文字サイズを小さくしたりして
一応携帯からも表示できるようにしました。
そこで、携帯から書き込みをした時に機種名を表示させたいのですが、
とりあえず時間取得の変数に混ぜて表示させてました。
日時のあとに DoCoMo/2.0 N903i(c100;TB;W24H12) このように表示されるのですが、
このN903iの部分だけ表示させるにはどうしたらよいでしょうか？
改造した部分も書いたほうがいいでしょうか？
235:nobodyさん
07/03/13 09:00:16
>>234
そこまでできたならperl板行った方が…
正規表現で
^DoCoMo.* (.*)\(.+$
で\\1をとればいいんじゃないかな。
236:nobodyさん
07/03/13 13:23:35
【. CGI名 .】 nicky.cgi
【配布先URL】 URLﾘﾝｸ(www.din.or.jp)
【ヘルプ内容】
同日に記事を二つ以上作成すると、デフォルトでは後に作成したほうが上に来ます。
それを後に作成したほうを前に作成した記事の下に来るようにしたいです。
よろしくお願いします。
237:nobodyさん
07/03/13 17:28:48
>>235
ありがとうございます。
web製作板から誘導されてきたもので。
箇所を書きます。できればここにその形で修正を施してくれればありがたいです。
238:nobodyさん
07/03/13 17:29:36
#-------------------------------------------------
# 時間取得
#-------------------------------------------------
sub get_time {
local($date,@week);
$ENV{'TZ'} = "JST-9";
local($min,$hour,$mday,$mon,$year,$wday) = (localtime(time))[1..6];
@week = ('Sun','Mon','Tue','Wed','Thu','Fri','Sat');
# 日時のフォーマット
if ($whatsnew) {
$date = sprintf("%04d-%02d-%02d (%s)",
$year+1900,$mon+1,$mday,$week[$wday]);
} else {
$date = sprintf("%04d/%02d/%02d(%s) %02d:%02d",
$year+1900,$mon+1,$mday,$week[$wday],$hour,$min);
# UA記録
my $ua = $ENV{'HTTP_USER_AGENT'};
if ($ua =~ /^L-mode/) {
$ua = 'L-mode';
} elsif ($ua =~ /^Mozilla/){
$ua = 'PC';
}
$date .= " $ua";
# UA記録終了
}
$date;}
239:nobodyさん
07/03/13 17:31:08
こんなかんじで後は$dateをログ生成の適当なところに書き加えてました。
正直今までプログラミングやったことがないので、何度もコピペしたりテストしたりして
と、まるっきり初心者です。
何度も携帯機種表示は試したのですがまるっきり。
もしあれならばperl板に誘導していただければ。
240:nobodyさん
07/03/14 09:16:53
>>239
if ($ua =~ /^L-mode/) {
$ua = 'L-mode';
} elsif ($ua =~ /^Mozilla/){
$ua = 'PC';
} elsif ($ua =~ /^DoCoMo.* (.*)\(.+$/) {
$ua = $1;
}
241:nobodyさん
07/03/14 20:29:06
>>240
ありがとうございます。
できました。
242:236
07/03/16 04:59:07
すみません、自己解決しました。
243:nobodyさん
07/03/21 15:25:47
jewel掲示板
URLﾘﾝｸ(www.groo-web.com)
この掲示板に禁止ワード設定を組み込みたいんですが、
jewel(改)
URLﾘﾝｸ(xxxw007.s12.xrea.com)
を見て、CGI本体の中に入れてもどうしてもエラーになってします。
あちこちの掲示板CGIを落として見て、jewelCGI本体の中に入れてもエラー。
どうカスタマイズしたら禁止ワード設定を組み込めるでしょうか？
初心者ですが、jeweはなんとか設置できました。.htaccecsもできた。
あーとーはー禁止ワードだーけー・・・orz
なんとか、教えて下さい。お願いします。
244:243
07/03/21 16:25:13 TD8dcTEz
# 禁止ワード（いくつでも追加可能）
#例 ('死ね','淫乱','援助交際','docomo')
#新規登録時の名前 タイトル メッセージ ホストに適用。
@input_deny = ('死ね','','');
##--禁止ワードチェック--##
foreach (@input_deny) {
if ($in{'name'} =~ /$_/i) { &error("名前に禁止ワードが含まれています。"); }
if ($in{'title'} =~ /$_/i) { &error("タイトルに禁止ワードが含まれています。"); }
if ($in{'comment'} =~ /$_/i) { &error("メッセージに禁止ワードが含まれています。"); }
}
これを追加するとエラーになってしまうのです。
何か足りないのでしょうか？
245:243
07/03/21 16:30:54 TD8dcTEz
#■投稿禁止ワード ""で囲って記入 複数設定する場合は『,』で区切ってください
# 設定した文字列が名前かメッセージに含まれる場合、投稿できません
# 必要ない場合は()
@deny_words = ("アダルト","エロ");
foreach $d_words (@deny_words) {if ($title =~ /$d_words/i) {&error("名前に投稿できない言葉が含まれています");} }
foreach $d_words (@deny_words) {if ($message =~ /$d_words/i) {&error("メッセージに投稿できない言葉が含まれています");} }
これは違うスクリプトですが、
これだけでもできますか？？
246:nobodyさん
07/03/21 17:32:36
>243
マルチポストしてんじゃねーよ
市ねよクズ
ｽﾚﾘﾝｸ(hp板:455番)
ｽﾚﾘﾝｸ(php板:403番)
247:243
07/03/21 17:38:39 TD8dcTEz
他のあとにココ見つけたのですよ。ですから他には１つだけです。以下続き。
#####イタズラ投稿防止設定
# リモートホスト（またはIPアドレス）での投稿拒否
#ppp123.abc.or.jp などの場合は、数字の部分がアクセスのたびに異なるので
#数字の部分を .* （ピリオド＋アスタリスク）に置き換えます。
#@deny = ('ppp.*.abc.or.jp','web.net'); #などと設定します。
@deny = ();
# 投稿記事内容にふさわしくない語句の禁止
# @word = ('セックス','エッチ','スカトロ','test', 'あああ','馬鹿');#などと設定。
@word = ();
#投稿拒否
sub deny {
foreach (@deny) {
if ( $host =~/$_/ ){ &error(1,"あなたの投稿は許可されてません。"); }
}
}
#禁止ワードチェック
sub wordcheck {
local($string) = $_[0];local($line);
foreach $line(@word) {
if (index($string,$line) >= 0) {
&error(1,"$line<BR>使用禁止の文字が使われているようです。");
}
}
これでは？
248:243
07/03/21 18:30:09 TD8dcTEz
うー、ページがエラーにならず書き込みができたのは以下だけですが、
禁止設定が働かない。何が足りないのでしょうか？？
#■投稿禁止ワード ""で囲って記入 複数設定する場合は『,』で区切ってください
# 設定した文字列が名前かメッセージに含まれる場合、投稿できません
# 必要ない場合は()
@deny_words = ("アダルト","エロ");
foreach $d_words (@deny_words) {if ($title =~ /$d_words/i) {&error("タイトル名前に投稿できない言葉が含まれています");} }
foreach $d_words (@deny_words) {if ($comment =~ /$d_words/i) {&error("メッセージに投稿できない言葉が含まれています");} }
もう寸前まで出来てる気がする・・・
249:nobodyさん
07/03/21 18:57:27
>>243
>>5嫁
250:243
07/03/21 19:30:00 TD8dcTEz
エラーは毎回Internal Server Errorと出ます。
鯖のログには何も。。掲示板のエラーログはありません。
やはり無理なのかな・・・orz
ランキング２つ、掲示板１つをムーバブル・タイプの中に設置、
ベーシック認証も設置できたのに、このカスタマイズで初挫折。
やはりカスタマイズは難しいですね。
ちなみに、CGIも巡り会って１週間の初心者です。
251:nobodyさん
07/03/21 20:24:05
ローカルにサーバも立てられない餓鬼にCGIなんてまだ早い。
>>243には絶対無理なので受精卵からやり直すように。
252:nobodyさん
07/03/22 17:29:14 ZUn5Ffec
なんだよ。結局誰も答えられないのかよ。
糞スレ終了だなwww
253:nobodyさん
07/03/22 21:27:27
マルチポストしてなけりゃ、ヒントくらいは教えてやってもいいかと思ったんだけどねえ
3回も同じものを読まされたらそんな気は失せる
254:nobodyさん
07/03/22 21:50:49 ZUn5Ffec
オマエもただのカスだなwwwwww
255:nobodyさん
07/03/22 22:03:46 8uBdXhS9
何で教えてもらう側の態度ってのが出来ないのかねぇ
わけのわからん売り言葉見てると折角のモノも書く気も起きん
256:nobodyさん
07/03/26 04:28:29
【 CGI名 】 Anthologys
【 配布先URL 】 URLﾘﾝｸ(www2s.biglobe.ne.jp)
【 利用規約（改造OK確認）】URLﾘﾝｸ(www2s.biglobe.ne.jp)
【 依頼内容 】 投稿するときの名前のクッキー保存をKENTさんとこと同じようにしてほしい。
名前を保存すると、文字化けするからです。
よろしくお願いします。
257:nobodyさん
07/03/27 10:58:52
ソースコピペなり何なりで同じようにすればいいわけだが
どこでつかえてるんだ？
258:２５６
07/03/27 11:43:48
Linuxの自宅サーバー（apache）とレンタルサーバーならば問題なく使用できるのですが、
Windowsの自宅サーバー（apache）だとどうしても、投稿の際の名前の欄が、
二度目から文字化けをしてしまいます。
Windowsの設定だとはじめは思いましたが、KENTさんの掲示板の場合
Windowsでも問題なく使用できているため、以前、セキュリティーなどの問題を指摘されましたが
結局Linuxを使用することになっていたので放置してました。
しかし、今回どうしてもWindowsで使用したいために質問させていただきました。
もし、よろしかったら、何行目をどのように訂正すれば良いのかご教授願えたら幸いです。
259:nobodyさん
07/03/27 11:48:18
それは本当にCGI側の問題なのか…？
260:２５６
07/03/27 12:14:21
１００％とは言えないです。
ただ、すばらしいCGIなのでどうにかWindowsで
使用したいです。
一応↓が結果です。
『Anthologys』
○ 自宅サーバーLinuxアパッチ
○ レンタルサーバー
× 自宅サーバーWindowsアパッチ
『KENTさんのCGI』
○ 自宅サーバーLinuxアパッチ
○ レンタルサーバー
○ 自宅サーバーWindowsアパッチ
それから、なぜCGI側に問題があるかというと、
以前質問して指摘されたことがありました。
他に、CGIのことはあまりくわしくありませんが、
他のCGIが、Windowsで使用できる場合、
設定でどうにかなるのではないかと思ったからです。
261:nobodyさん
07/03/27 15:04:23
>>256
Windows+Apache2ならそうなるので、
・クッキーをエンコード・デコードする。
・Apache1系を使う。
のどちらか。
262:nobodyさん
07/03/27 15:38:55 tZOgiuH5
CGI上で、
男性の画像をotoko.gif、女性の画像をonna.jifとした場合、
それぞれのページにあった画面を表示させる方法を教えてもらますか？
実際の処理のところに<img src="otoko.gif">を挿入すると、
女性の方にも表示されてしまいます。
263:２５６
07/03/27 15:46:53
【 CGI名 】 Anthologys
【 配布先URL 】 URLﾘﾝｸ(www2s.biglobe.ne.jp)
【 利用規約（改造OK確認）】URLﾘﾝｸ(www2s.biglobe.ne.jp)
【 依頼内容 】 ↑の掲示板（Anthology）に投稿するときの
名前のクッキー保存をKENTさんとこと同じようにしてほしい。
理由は自宅サーバーWindowsのApache2での掲示板に名前を保存すると、
文字化けするからです。尚、自宅サーバーLinux、レンタルサーバー、
自宅サーバーWindowsでのApache１系ならば正常にクッキー保存されます。
（Windows１系は確認しておりませんが、>>261 さんを参考にさせていただきました。）
>>261 さんの言われたように、
記事を投稿するさいの名前のクッキーをエンコード・デコード出来るように、
CGIスクリプトの
何行目をどのように変更したらよいかよろしくお願いします。
264:nobodyさん
07/03/27 16:04:39
お前は丸投げ行け
265:262
07/03/27 16:34:12 tZOgiuH5
これを応用できませんか？
男性は0、女性は1となっています。
if ($in{'sex'} eq "0" && $color eq "defwruto") { $color = "$boy_color"; }
elsif ($in{'sex'} eq "0" && $color eq "") { $color = "$boy_color"; }
if ($in{'sex'} eq "1" && $color eq "defwruto") { $color = "$girl_color"; }
elsif ($in{'sex'} eq "1" && $color eq "") { $color = "$girl_color"; }
上の書き込みの画像を表示させる位置に・・・うーん、、お願いしまつ
266:nobodyさん
07/03/27 16:44:46
>>262
if ($in{'sex'} eq "0") {
$src = 'otoko.gif';
} elsif ($in{'sex'} eq "1") {
$src = 'onna.gif';
} else {
$src = 'okama.gif';
}
267:262
07/03/27 16:59:22 tZOgiuH5
独自でできたよ。
###+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
## SUB >>> ユーザー出力処理
###+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
sub member_view {
if ($in{'sex'} eq "0") { $word_color = "$boy_color"; }
elsif ($in{'sex'} eq "1") { $word_color = "$girl_color"; }
↑この部分を見て男女のページの色を区別してるんだから、
これに画像を当てはめれば良いんだと分かった。
下の方に→$word_colorがあったから。
んで、こうやって
if ($in{'sex'} eq "0") { $image = "image/otoko.gif"; }
elsif ($in{'sex'} eq "1") { $image = "image/onna.gif"; }
実際に画像を表示させる場所に、
<img src="$image" align="left">を入れたらできた！
俺って天才だ！
268:262
07/03/27 17:01:00
あ、
>>266さん教えてくれたんですね。
わざわざ有難う。でもできたよ。^^)/
269:nobodyさん
07/03/27 17:14:48
【 CGI名 】 Anthologys
【 配布先URL 】 URLﾘﾝｸ(www2s.biglobe.ne.jp)
【 利用規約（改造OK確認）】URLﾘﾝｸ(www2s.biglobe.ne.jp)
【 依頼内容 】 ↑の掲示板（Anthology）に投稿するときの
名前のクッキー保存をKENTさんとこと同じようにしてほしい。
理由は自宅サーバーWindowsのApache2での掲示板に名前を保存すると、
文字化けするからです。尚、自宅サーバーLinux、レンタルサーバー、
自宅サーバーWindowsでのApache１系ならば正常にクッキー保存されます。
（Windows１系は確認しておりませんが、>>261 さんを参考にさせていただきました。）
>>261 さんの言われたように、
記事を投稿するさいの名前のクッキーをエンコード・デコード出来るように、
CGIスクリプトの
何行目をどのように変更したらよいかよろしくお願いします。
270:nobodyさん
07/03/27 17:24:48
うざ
271:nobodyさん
07/03/27 17:31:25
>>268
それ$in{'sex'}が0でも1でもない場合を想定できてないぞ
272:nobodyさん
07/03/27 19:03:25
>256,263,269
何度も同じコピペを繰り返すような迷惑なクズの依頼は断わる！
273:262
07/03/27 19:24:24 tZOgiuH5
>>268
オカマを選択させる余地はありませぬ！w
自作掲示板完成まであと少しです。
最後に、
NGワードを外部ファイルで呼び出してチェックさせる秘儀を伝授して下さいマセ、殿！
274:262
07/03/27 19:26:02
レス間違え失礼
>>266
>>271
オカマを選択させる余地はありませぬ！w
自作掲示板完成まであと少しです。
最後に、
NGワードを外部ファイルで呼び出してチェックさせる秘儀を伝授して下さいマセ、殿！
275:nobodyさん
07/03/27 21:40:24
>>274
問題をはき違えてるな。
読解力の無い奴にゃ教える気もおきねーや。
276:nobodyさん
07/03/31 14:46:34
【 CGI名 】 Anthologys
【 配布先URL 】 URLﾘﾝｸ(www2s.biglobe.ne.jp)
【 利用規約（改造OK確認）】URLﾘﾝｸ(www2s.biglobe.ne.jp)
【 依頼内容 】 ↑の掲示板（Anthology）に投稿するときの
名前のクッキー保存をKENTさんとこと同じようにしてほしい。
あるいは、文字化けしないように設定してほしい。
理由は自宅サーバーWindowsのApache2での掲示板に名前を保存すると、
文字化けするからです。尚、自宅サーバーLinux、レンタルサーバー、
自宅サーバーWindowsでのApache１系ならば正常にクッキー保存されます。
（Windows１系は確認しておりませんが、>>261 さんを参考にさせていただきました。）
>>261 さんの言われたように、
記事を投稿するさいの名前のクッキーをエンコード・デコード出来るように、
CGIスクリプト↓
URLﾘﾝｸ(umikaze.mydns.to)
の （１９３０行目あたりだと思われます。。）
何行目をどのように変更したらよいかよろしくお願いします。
277:nobodyさん
07/03/31 15:39:19
>>256 >>260
>>263 >>269 >>276
278:２７６
07/03/31 16:30:59
一応↓も参考にしたのですが、
URLﾘﾝｸ(www.aimix.jp)
じぇんじぇんわかりません。
先輩各々方
よろしくお願いいたします。
279:nobodyさん
07/04/01 18:15:14
【. CGI名 .】 Mobile Access
【配布先URL】 URLﾘﾝｸ(download.torworld.com)
【ヘルプ内容】
ソフトバンク機種もちゃんと振り分け・解析が出来るようにしたいのですが
どう書き換えたらいいかよくわかりません
あと、PC表示ページでフレームを使っているのですが
動作確認してみたところカウンターが表示されません
フレームを使う場合は設定や書き換えなどが必要なのでしょうか？
よろしくお願いします
280:nobodyさん
07/04/19 22:04:34 Nm6vIpzI
【. CGI名 .】 アルバムPHP
【配布先URL】 URLﾘﾝｸ(golbed.main.jp)
URLﾘﾝｸ(golbed.main.jp) （サンプル）
【ヘルプ内容】
・画像ごとに異なるコメントを出したい
・画像へのリンクを任意の文字列にしたい
・トップに画像とコメントを表示したい
自力で改造しようと頑張ってみたんですがやはり無理でした。
よろしくお願いします。
281:280
07/04/19 22:45:12
すみません、複数のフォルダを指定する方法もお願いします。
282:nobodyさん
07/04/21 19:53:28 vsUwQ1K4
>>280さん
まだ見てるか知らんけど・・・
↓こんなんでいいのかな？
URLﾘﾝｸ(sv1.jp)
> 画像ごとに異なるコメントを出したい
「画像のファイル名.txt」のファイルを置いておくと、
コメントとして表示するようにしてみますた。
> 画像へのリンクを任意の文字列にしたい
意味がわかりませんですた。
> トップに画像とコメントを表示したい
トップとかの概念が無いような気もするけど、設定できるようにしてみますた。
コメントは同じく「画像のファイル名.txt」で表示されます。
> 複数のフォルダを指定する方法もお願いします。
index.phpの設定んとこで対象フォルダを指定できるようにしてみますた。
↓ソース
URLﾘﾝｸ(sv1.jp)
注意点
・設定のとこいくつか増えてるんで確認してください。
・複数フォルダのせいで、ファイル名でソートが曖昧です。
フォルダ名も含めてソートしてるかも。
・あんま確認してないんで、おかしいとこあったらごめんちゃい。
283:nobodyさん
07/04/21 19:55:56
久しぶりに書き込んだらageてもたorz
ごめんちゃいorz
284:nobodyさん
07/05/04 19:01:19
丸投げのほうで反応無かったのでこちらで
【CGI名】 Sn Uploader Candy Type1
【配布先URL】 URLﾘﾝｸ(www.candy-cgi.com)
【ヘルプ内容】 パスなしでUpしてもパスありと同じようにファイルを保存するようにしてほしい
パスなしだとhttp://～/src/file0001.zipなどのようになりますが
それを、パスありのときと同じようにhttp://～/src/file0001.zip_f0FMk3CGphyD2AQNBBtN/file0001.zip
といった感じにしたいです。
おねがいします。
285:nobodyさん
07/05/05 01:07:15
で、どこまでやってどこで躓いてる？
言っておくがここは丸投げできるスレじゃないぞ
286:nobodyさん
07/05/05 10:54:34
とりあえず、189行目から323行目と1061行目から最後までをいじれば良いと思うのですが
それ以上はあんまり解りません
287:nobodyさん
07/05/05 13:32:02
じゃ丸投げで延々と待つしかないな
288:LSZmZkpEmkCJhgN
07/07/19 17:39:33
GMazvB name is Kostya.My nick is Zold . I want to find friends .ICQ 324600825
289:nobodyさん
07/08/13 23:36:28
丸投げが無い。。。
一から勉強しよ(´・ω・｀)
290:nobodyさん
07/10/31 00:01:43
ICQってまだあんの？
291:nobodyさん
07/10/31 13:42:14
>>289
【 スクリプト改造依頼スレ 】(丸投げ) part6
ｽﾚﾘﾝｸ(php板)
292:nobodyさん
08/02/16 15:55:54 7IBR1+e+
【. CGI名 .】Variable Board Ver.1.06
【配布先URL】URLﾘﾝｸ(dream.lib.net)
【ヘルプ内容】携帯端末の書き換えについて
CGI自体は携帯端末対応なのですが、端末情報が少し古いようで現在での対応が一部できません。
variable.cgiの255行目「端末チェック」部分、
「ASTEL」の項は「KDDI」に変えてauへの対応はできたのですが、
Softbankが現在「J-PHONE」「Vodafone」「SoftBank」の三つがUAとしてあり、
そのうちJ-PHONEにしか端末チェックがなされてません。
「Vodafone」と「SoftBank」がSoftBank端末アクセスの８割を占めているので
両方も端末チェックに加えたいのですが、安易に項目を増やしてみたところ
やはりというか何というかUA偽装でチェックしてみても無理でした。
VodafoneがUAの場合、KDDI同様「UP.Browser」がありましたのでそれで出来るかと思ったんですが、
「UP\.Browser」と入れてみても対応はできませんでした。
もし良い方法がありましたら教えてください。
293:nobodyさん
08/03/03 16:17:11 g0NPU4km
>>292
検索して調べれば判る事は自分で調べなさい！ｱﾎ
263行目を
$user_agent =~ /^J-PHONE|^Vodafone|^SoftBank/
に変更すれば判別出切る筈です。
294:nobodyさん
08/03/03 17:45:27 ztXniNQN
色々なサイトを見て簡単な更新履歴のcgiを作ったんですが
記事ナンバーをつける事が出来なくて困っています・・・。
ソース
URLﾘﾝｸ(www.uploda.org)
どうやったら記事ナンバーが追加できるか教えて下さい・・・。
お願いします。
295:nobodyさん
08/03/03 18:15:10
記事ナンバーって何？
296:nobodyさん
08/03/03 18:25:38 ztXniNQN
>>295
掲示板とかについてる記事の番号です。
一つの記事ごとに番号を付けたいんです。
297:nobodyさん
08/03/03 18:28:58
それ本当に自分で作ったの？
298:nobodyさん
08/03/03 21:58:38 ztXniNQN
>>297
色んなサイトを参考にして作りました。
299:nobodyさん
08/03/04 23:01:12 8AwOHZTZ
【 CGI&PHP名 】 簡易コメント ver1.0
【 配布先URL 】 URLﾘﾝｸ(nurupo.biz)
【 依頼期限 】 １週間以内
【 依頼内容 】
>>1みたいにアンカー機能を付けて頂きたいです
75行目 my $max = @DATA;
76行目 my $res_no = undef;
96行目と97行目の間に追加 $res_no = $max - $i + 1;
97行目 print "[$date] $res_no. $text\n";
を追加でレス番号が付くのはわかったんですけど
正規表現が分からないので、調べられません(ToT)
300:nobodyさん
08/03/04 23:10:44
正規表現のどの辺が分からんって？
301:nobodyさん
08/03/05 06:31:08
>>294
日本語で失礼。
投稿内容をログファイルに書く前に、直前のログを取り出す。
そのログにある数字を取り出して、+１したものを最新記事のナンバーとする
そのナンバー+投稿内容としてログファイルに追記
ただの更新履歴ならコレで問題ない・・・・と思う
コードはあなた以上の初心者なので勘弁。
302:nobodyさん
08/03/05 20:35:19 Wm0WO3jS
>>300
アンカーの構造から分かりません(∋_∈)
303:nobodyさん
08/03/05 22:26:38
どこまでは考えた？
304:nobodyさん
08/03/06 00:39:31 UOTbbi+N
えっと、全然発想すら分からないので
>>数字
@DATA[数字]
それでｻﾌﾞﾙｰﾁﾝで取り出して表記する？という事だけです･･･
305:292
08/03/10 06:53:01
>>293
お礼が遅くなってしまいすみません。
方法がさっぱりだったのでぐだぐだになってしまってました。
お答えくださりありがとうございました。
306:nobodyさん
08/03/16 17:23:34
URLﾘﾝｸ(ari-sin3.hp.infoseek.co.jp)
このアップローダを以下の様に改造したいのですがサイト等を参考にしてもよくわからなかったので
ここで質問させてもらいます。
・一日にアップロード可能な容量を制限したい。
・日付や件数で削除するのではなく設定した日付を
オーバーしたらファイルを削除するようにしたい。
この二つです。
307:訂正
08/03/16 17:26:49
URLﾘﾝｸ(ari-sin3.hp.infoseek.co.jp)
このアップローダを以下の様に改造したいのですがサイト等を参考にしてもよくわからなかったので
ここで質問させてもらいます。
・一日にアップロード可能な容量を制限したい
・指定した容量になると古いファイルから削除
308:nobodyさん
08/04/14 00:14:52 sAfeJoyW
【. CGI名 .】 p++BBS 2006/03/02版 【配布先URL】 URLﾘﾝｸ(php.s3.to)
【ヘルプ内容】URLﾘﾝｸ(www.cj-c.com)にあるChildTreeと同様の記事リストで、レスの更新時間を読んでUP!と表示させたいです。
自作の下記の処理だと親記事の更新時間しか読めてないため、レスがついてもNew!表示時間が延長されません。
レスの更新時間も読みにいく処理がうまく書けませんでした。お助け頂けたら嬉しいです。
素人のクソな処理なので効率化の突っ込みも大歓迎です。よろしくお願いします。
改行が多いと怒られたのでまとめてます…
function Kijilist(){
global $SCRIPT_NAME,$log;
array_shift($log); //要素1個目に非ログがあるので削除
foreach($log as $l){ list($ano,$no,) = split(',',$l); $carray[] = $no; }
$cdata = array_count_values($carray); /*要素数数えて格納*/ $tim = time(); $tgcnt = 0; /*別機能用*/ $page = $_GET['page']; /*別機能用*/
foreach($cdata as $key=>$val){
foreach($log as $l){
list($ano,$no,$res,$now,$name,$email,$sub,$com,$url,$ho,,$pco,$pk,$cnt,$uid) =split(',',$l);
if($res==0 && $no == $key) {
$val = $val-1;//親記事もカウントしてたのを除外
if($tim-$pk<NEWTIME * 3600) { //NEWTIMEを宣言しないとエラー
if($page <= 0 && $tgcnt<PAGEVIEW){ //PAGEVIEWを宣言しないとエラー
echo "<a href=\"#$no\">".NEWIMG."{$sub}($val)</a> | ";$tgcnt++; //NEWIMGを宣言しないとエラー
} else {
echo "<a href=\"$SCRIPT_NAME?mode=all&no=$no\">".NEWIMG."{$sub}($val)</a> | ";$page--;
}
} else {
if($page <= 0 && $tgcnt<PAGEVIEW){
echo "<a href=\"#$no\">$sub($val)</a> | ";$tgcnt++;
} else {
echo "<a href=\"$SCRIPT_NAME?mode=all&no=$no\">$sub($val)</a> | ";$page--;
}}}}}}
309:308
08/04/14 12:41:15
クソな処理なのは変わりませんが、自己解決できました。
310:nobodyさん
08/04/24 21:25:50
【. CGI名 .】 UpdaterRSS
【配布先URL】 URLﾘﾝｸ(php.s3.to)
【. 置き場所 .】 URLﾘﾝｸ(php.s3.to)
【ヘルプ内容】 ping送信機能を組み込みたい。
よろしくお願いします。
311:nobodyさん
08/05/02 23:36:35
【. CGI名 .】 Miniりすと
【配布先URL】 URLﾘﾝｸ(www.minicgi.net)
【. 置き場所 .】 URLﾘﾝｸ(www.minicgi.net) （サンプルあり）
【ヘルプ内容】
新規登録/編集でcheckbox（inputタグ）を使えるようにして、複数の項目を選択できるようにしたい
IDにカテゴリ付けをして、カテゴリ別に表示したい（だけど全表示してくれるページもあると有り難い）
この二つの機能を使えるようにしたいんですが
どうにもチンプンカンプンで自力では難しいので投稿しました
知恵をお貸しください。よろしくお願いします
312:nobodyさん
08/05/08 10:00:49
【CGI名】 スレッド天国 ver.1.10
【配布先URL】URLﾘﾝｸ(cgipon.specters.net)
【置き場所】URLﾘﾝｸ(cgipon.specters.net)
【ヘルプ内容】ログのスレ上げをなくしたいです。
（親スレに子レスが付くと、その親スレごと一番上にあがるやつです）
あげ荒らしが猛威をふるってるんで急ぎでお願いしたいです。
3060行位からそれらしい部分があるようにもみえるのですけど
perl素人すぎるのか、もの凄く複雑そうに見えちゃって
どこいじればいいのか かいもく検討がつきません。
どこいじればいいのか教えて下さい。（ぺこり
313:nobodyさん
08/05/14 17:55:06 1VhcNHK7
【. CGI名 .】 phpexit ver.1.1.4
【配布先URL】 URLﾘﾝｸ(chibinowa.net)
【. 置き場所 .】 URLﾘﾝｸ(chibinowa.net)
【ヘルプ内容】
項目の追加をお願いします。
配布先にスクリーンショット画面がありますが、
一覧部分の「webplog>perl」の部分（カテゴリの部分）の上部に、2件の項目を追加したく思っています。
追加項目の内容は、1件はテキストエリア、2件目はコメント欄と同じくらいの文章です。
個人で、テキストエリアの追加は出来たのですが、肝心の一覧にその部分が表示されず、行き詰っています。
lib/cmd/edit.php、item.php などを弄ってあります。
ご助言お願い致します。
314:nobodyさん
08/05/16 23:46:50 oqDS1N2X
313です。自己解決しました。
315:nobodyさん
08/05/17 02:10:38 Td8Jyj+I
【. CGI名 .】 Photo Memo
【配布先URL】 URLﾘﾝｸ(www.sa-k.jp)
【. 置き場所 .】 URLﾘﾝｸ(www.sa-k.jp)
【ヘルプ内容】
10枚までの同時アップロードなのですが、20枚までに増やせないでしょうか。
ファイルを開いて1～10まである項目を無理矢理20まで増やしてみたのですが、
途中でエラーが出てしまい、どこをどういじったのかもわからず…
たくさんあって半日くらいかかっていじってみたのですが、結局わかりませんでした。
よろしくおねがいします。
316:nobodyさん
08/05/17 04:44:29
foreach (@lines) {
($noa,$Yeara,$Montha,$Daya,$suba,$tail1a,$W1a,$H1a,$com1a,$tail2a,$W2a,$H2a,$com2a,$tail3a,$W3a,$H3a,$com3a,
$tail4a,$W4a,$H4a,$com4a,$tail5a,$W5a,$H5a,$com5a,$tail6a,$W6a,$H6a,$com6a,$tail7a,$W7a,$H7a,$com7a,
$tail8a,$W8a,$H8a,$com8a,$tail9a,$W9a,$H9a,$com9a,$tail10a,$W10a,$H10a,$com10a,$hosta) = split(/<>/);
ひどい処理だな｡
一応html部から全て項目を増やせば動作するはず｡
あるいは１件１行として全体的にリビルドしてしまうか｡
317:nobodyさん
08/05/24 20:37:38
【. CGI名 .】 SN Uploader 【配布先URL】 URLﾘﾝｸ(sugachan.dip.jp)
【ヘルプ内容】
拡張子とMIMEが合わなくてもアップロードできてしまいます。
ログには拡張子合わずと記録されてるので簡単に改造できるかなと思いましたら
知識が全然足りずに改造しても動きませんでした。
何方か知識をお貸しください。
318:nobodyさん
08/05/24 20:47:10
まず拡張子合わずと記録する部分を見つけるんだ
そしたらそこの条件を見るんだ
そしたらそこでbreakするなりexitするなりしてアップロードできないようにするんだ
319:nobodyさん
08/05/25 07:43:08
sub error{
my ($no,$note) = @_;
if (length($note) > 64) { $note = substr($note,0,64).'...'; }
$note =~ s/&/&/g; $note =~ s/\"/"/g; $note =~ s/</</g; $note =~ s/>/>/g; $note =~ s/\r//g; $note =~ s/\n//g; $note =~ s/\t//g; $note =~ s/\0//g;
my ($message,$dispmsg,$flag);
if($no == 98){ $message = ""; }
elsif($no == 99){ $message = "UpFileなし"; }
elsif($no == 101){ $message = "投稿禁止HOST"; }
（略）
# elsif($no == 108){ $flag = 1; $message = "POSTデータ不完全"; $dispmsg = '<tr><td>ファイルをアップロードできませんでした</td></tr><tr><td>POSTデータが不完全です</td></tr>';}
elsif($no == 109){ $flag = 1; $message = "POSTKey不一致"; $dispmsg = '<tr><td>ファイルをアップロードできませんでした</td></tr><tr><td>POSTKeyが一致しません</td></tr>';}
elsif($no == 202){ $flag = 1; $message = "拡張子合わず"; $dispmsg = '<tr><td>ファイルをアップロードできませんでした</td></tr><tr><td>投稿できる拡張子は'.$set{'up_ext'}.'です</td></tr>';}
見つけたけどわからない・・・orz
320:nobodyさん
08/05/25 15:57:11
エラーナンバー202を記録してるとこ探せばいいだろｗ
321:nobodyさん
08/05/25 18:41:41
{#メイン処理
if(!$in{'upfile'}){ &error(99); }
if($set{'post_flag'} && !check_postkey($in{'postkey'})){ error(109); }
if($set{'dlkey'} == 2 && !$in{'dlkey'}){ unlink("$in{'tmpfile2'}"); &error(61); }
open(IN,$set{'log_file'})||&error(303);
my @log = <IN>;
close(IN);
my ($no,$lastip,$lasttime) = split(/<>/,$log[0]);
if($set{'interval'} && $set{'interval'} && $in{'time'} <= ($lasttime + $set{'interval'}) && $in{'addr'} eq $lastip){ &error(203);}
$in{'ext'} = extfind($in{'orgname'}); if(!$in{'ext'} && $in{'upfile'}){ &error(202); }
my $orgname;
if(split(/\//,$in{'orgname'}) > split(/\\/,$in{'orgname'})){ my @name = split(/\//,$in{'orgname'}); $orgname = $name[$#name]; }
else{ my @name = split(/\\/,$in{'orgname'}); $orgname = $name[$#name];}
ここぐらいしか 202 ってところないけど・・・
322:nobodyさん
08/05/25 19:14:47
もしかしてperlのソース読めないんですか？
323:nobodyさん
08/05/25 19:16:16
>>322
$in{'ext'} = extfind($in{'orgname'}); if(!$in{'ext'} && $in{'upfile'}){ &error(202); }
この行をどうにかすればいけるぐらいしかわからん
324:nobodyさん
08/05/29 19:57:45 Ql0N4gMP
上げてもよかったのでしょうか…
【. CGI名 .】 Link ＆ Rank
【配布先URL】 URLﾘﾝｸ(taitaistudio.com)
【. 置き場所 .】 URLﾘﾝｸ(taitaistudio.com)
【ヘルプ内容】
ユーザーエディット(sub mente)で、サイト名やサイトURLなどに追加して、
新しい変数($kisyu)を追加して、登録者が対応機種を選択出来る
新しい選択欄を追加したいのですが、どうしてもログに追加されません。
挙げ句の果てにはズレてIPが表示されてしまいます。
配布元は改造のサポートは行っていないとの事なので、完全にいきずまってしまいました。
どなたか、御教授よろしくお願い致します。
325:nobodyさん
08/05/30 03:14:29
もっと詳しくかつ明瞭に。
326:324
08/05/30 19:04:03 mgybmJwP
ちょっと説明しづらいのですが、
デフォルトでランキングの登録者がサイト名やサイトURL、バナーURL、キーワード、サイト紹介文を決められるのに追加して、
例えば、『サイト詳細』などの新しい項目を作りたいです。
しかし、何度やってもログに記録されずにログから呼び出すことも出来ません。
わかりにくい説明かとは思いますがよろしくお願い致します。
327:nobodyさん
08/05/30 21:07:56
「何をどうやった」のかを「具体的に」説明してくれないと
こっちもアドバイスのしようがないんだが
328:nobodyさん
08/05/30 21:26:46 mgybmJwP
全てに新しい変数を追加しました。
329:nobodyさん
08/06/01 16:00:47
┓(￣∇￣;)┏
330:nobodyさん
08/06/14 03:25:31
置いてある場所
URLﾘﾝｸ(www.cj-c.com)
新規投稿時（親記事）の入力項目（セレクトフォーム）を増やすしたいです。
設定でセレクトフォームをつけれるのですが１つだけで、もう１つ増やしたいのです。
宜しくお願いします。
331:nobodyさん
08/06/16 05:57:41
１．設定で現在の書き方を参考に新しい変数を作ってデータを入れる
２．メインcgiのhtml出力しているところを見つけて同じように書く
３．メインcgiの書き込み、読み出ししてるところを見つけて同じように書く
以上
332:nobodyさん
08/07/25 03:17:16
【CGI名】 DiaryCGI nicky!
【配布先URL】 URLﾘﾝｸ(www.din.or.jp)
【ヘルプ内容】コメント記入時に、メールが送信されるように設定した場合、
通知メール内容にコメント文も載せるようにしたい。
nicky.CGIの2725行にどのような記述をいれれば本文に入るのでしょうか？
宜しくお願いします。
333:nobodyさん
08/07/25 04:48:36
>>332
2725行？入れるところはそこじゃないと思うよ。
from : $ENV{REMOTE_HOST}($ENV{REMOTE_ADDR})
agent : $ENV{HTTP_USER_AGENT}
という行の下に以下を追加する
name : $CommentName
message : $CommentMsg
文字化けで読めなかったら
$CommentName
$CommentMsg
をjcodeでjisコードに変換する文をsub SendMailRcvNotice{の下の行に追加
334:nobodyさん
08/07/25 22:21:13
>>333
ありがとうございました！
ちゃんとできました！
335:nobodyさん
08/08/07 13:46:25 qpI1q2Ei
【CGI名】 PRTC BBS
【配布先URL】 一般に配布されていません
【ヘルプ内容】暗号化をしたいです
URLﾘﾝｸ(www.rescue.ne.jp)
このサイトのような感じで(もっと簡素でも構いません)
とにかく出力をしたいんです
下記のソースでcgiを動かしたいのですが、初心者でわかりません
知識不足なのはわかっているのですがどうしてもやりたいです
よろしくお願いします
sub enc_string{
my ($key, $string) = @_;
my @map = (('A' ... 'Z'), ('a' ... 'z'), ('0' ... '9'), '+', '&');
my @key = unpack('C*', $key);
my $str = '';
my @x = map { int(rand(200)) } (0 ... 2);
@key = map {$x[$_] ^ $key[$_]} (0 ... 2);
while($string ne ''){
my $n = substr($string, 0, 3, '');
my @n = unpack('C3', $n);
map{$n[$_] ^= ($key[$_])} (0 ... 2);
336:335
08/08/07 13:47:25
@key = unpack('C3', $n);
@key = map {$x[$_] ^ $key[$_]} (0 ... 2);
my $a = $n[0] >> 2;
my $b = (($n[0] & 3) << 4) | ($n[1] >> 4);
my $c = (($n[1] & 15) << 2) | ($n[2] >> 6);
my $d = $n[2] & 63;
$str .= $map[$a] . $map[$b] . $map[$c] . $map[$d];
}
my $a = $x[0] >> 2;
my $b = (($x[0] & 3) << 4) | ($x[1] >> 4);
my $c = (($x[1] & 15) << 2) | ($x[2] >> 6);
my $d = $x[2] & 63;
return $str.'<>'.$map[$a].$map[$b].$map[$c].$map[$d];
}
337:nobodyさん
08/08/09 03:15:31 pVYfvjSg
【盗聴】web-up.cside.biz【個人情報詐取】
ｽﾚﾘﾝｸ(php板)l50
338:nobodyさん
08/08/18 18:39:47
>>335
それは暗号化キーと暗号化対象文字列を引数に取り、暗号化後の文字列二種を '<>' 区切りで返すサブルーチンです。
あとはそのサブルーチンを適切な引数で呼出し、返値を受取って表示するだけです。
この場合、引数は基本的に任意ですから、必要なものを与えてください。
値の与え方が分からない場合は暗号化アルゴリズムについて調べてください。
ルーチンの呼出し方、または返値の受取り方が分からない場合は、Perl のサブルーチン呼出しについて調べて下さい。
プログラムでの値の受取り方、または値の表示の仕方が分からない場合は、CGI の基礎を学ばれるべきだと思います。
339:nobodyさん
08/08/22 12:34:43 HAxZZ1Pz
△▲ WebProg 初心者の質問 Part17 ▼▽
ｽﾚﾘﾝｸ(php板)l50
（スレ違いしみませんでした））
から来ましたm(__)m
CGI掲示板スクリプト、ウェブパティオの記事表示順の変更について教えてください。
URLﾘﾝｸ(bbs.capture-game.com)
（バージョンは3.19です）
のウェブパティオについて質問なのですが
携帯のレス表示画面で単純に新しいレス記事を上から表示するには
何処を変更したらいいでしょうか？
初心者の質問スレではreverseを使う所まで教えて頂いたのですが、
何分初心者ですので何卒お願い致します。
340:nobodyさん
08/08/22 12:37:00
>(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い
341:nobodyさん
08/08/22 12:58:25 HAxZZ1Pz
>>340
すいません。ご指摘ありがとうございます。
補足です。
【. CGI名 .】 携帯対応ウェブパティオv3.19
【配布先URL】 URLﾘﾝｸ(www.capture-game.com)
【. 置き場所 .】 URLﾘﾝｸ(www.capture-game.com)
【ヘルプ内容】 携帯電話表示でレス表示画面の並び順を通常12345と並んでいるのを54321という風に新しい書き込みからに並び替えたいです。
lib/phone/read.plをいろいろやってみましたがPerlの知識が乏しいため駄目です。初心者の質問スレではreverseを教えていただきましたが、
どの様なプログラムを何処に入れたらいいか解りません。教えて下さい。何行目を（）しなさいみたいに言っていただけたら幸いです。
なにとぞお願い致します。
342:nobodyさん
08/08/22 12:59:30
>少しは自分で考えること
343:nobodyさん
08/08/22 13:38:02
>>342
もしかして
# 投稿順にソート
@new = @new[sort {$sort[$b] <=> $sort[$a]} 0 .. $#sort];
regist.plのここですかね？^^;
344:nobodyさん
08/08/22 17:08:31
>>343
で、やってみたか？
345:nobodyさん
08/08/22 17:49:49
>>344
やってみました＾＾
これと
@new = @new[reverse sort {$sort[$b] <=> $sort[$a]} 0 .. $#sort];
これを
@new = reverse(@new);
@new = @new[sort {$sort[$b] <=> $sort[$a]} 0 .. $#sort];
試しましたが無理でしたorz
346:nobodyさん
08/08/22 23:20:22
>>345
reverse() までたどり着いてんならあともう一歩だ。がんばれ。
347:nobodyさん
08/08/23 01:26:37
lib/phone/read.plの２２０行目
while (<IN>) {
↓
for (reverse <IN>){
ってな感じじゃないかな
348:nobodyさん
08/08/23 01:32:40
>>347
while と for では $_ のスコープに関する扱いに違いがある点に注意。
また逐行処理前提で書かれたループ内のコードが適切でない可能性があるよ。
読んでないからどう影響するかはわからんけど応援してみる。
349:nobodyさん
08/08/23 01:48:47
>>346
>>348
ありがとうございます(^o^)
>>347
解りやすくありがとうございます＾＾
出来た！と思ったのですが（ひっくり返りました（感動））
１ページ表示数以上のレスが付くと一番新しいレスが２ページ目に行ってしまいます（涙）
350:nobodyさん
08/08/23 03:58:22
@new = @new[sort {$sort[$a] <=> $sort[$b]} 0 .. $#sort];
でどうだ？
351:nobodyさん
08/08/23 09:27:40
>>350
２カ所とも試してみましたが変わりませんでした(;.;)
ありがとうございました。
352:347
08/08/23 09:49:35
>>349
あとは表示するレスの抽出だけみたいだから
$i = 0;
while (<IN>) {
$i++;
if ($i <= $from) { next; }
if ($i > $to) { last; }
chop;
↑の部分（read.pl２２０行目辺り）を
$i= 0; my @line;
while (<IN>){
$i++;
if ($i <= $from) { next; }
if ($i > $to) { last; }
push(@line, $_);
}
for (reverse @line){
chop;
ってな感じじゃないかな
353:nobodyさん
08/08/23 16:32:22
>>352
見事に出来ました(T.T)
非常に解りやすく教えて頂き本当に感謝致します。
ありがとうございましたm(__)m
354:nobodyさん
08/08/24 20:26:26 8OT0ZHuq
【. CGI名 .】 HiLink ver1.12（サンプルAバージョン）
【配布先URL】 URLﾘﾝｸ(www.e-hws.net)
【. 置き場所 .】 URLﾘﾝｸ(www.e-hws.net)
【ヘルプ内容】
リンク登録時に特定のカテゴリーを選択したとき、表示部のテーブル背景色を変更したいです。
hilink.cgiの「表示データ作成」部分に以下のように追加し
if ($category eq 'ああああ' ){$cate_clr="red";}
elsif ($category eq 'いいいい ){$cate_clr="blue";}
else {$cate_clr="#999999";}
スキンのmain.htmlで、テーブルタグにbgcolor="$cate_clr"と入れてみましたが
うまくいきませんでした。
なにぶん手探りで、何かおかしなことをやらかしているかもしれないのですが
なんとかご教授いただけると嬉しいです。
どうかよろしくお願いします。
355:nobodyさん
08/08/24 20:38:01 ZUYvYMes
【. CGI名 .】 へっどらいん
【配布先URL】 URLﾘﾝｸ(php.s3.to)
【. 置き場所 .】 URLﾘﾝｸ(php.s3.to)
【ヘルプ内容】
このへっどらいんで出力させる場合に<script>コードを無効にしてほしいです
ないサイトなら問題ないのですがある場合は気になります
よろしくお願いします
356:nobodyさん
08/08/28 12:17:05
>>355
headline.phpの144～146行目
144: for($j=7; $j<count($files); $j++){//残りはHTMLデータ
145: $line.= $files[$j];
146: }
の下に、以下の行を加える。
$line = preg_replace('/<script[^>]*>.*<\/script>/','',$line);
表示時だけでなくデータ取り込みの際にも<script>を除去したければ、85行目の上にも同じものを入れる。
84: if($start || !$head[start]){
85: $new.= $line;
検証してないけど。
357:nobodyさん
08/09/02 17:46:02 ikXIt5qG
【 CGI名 】配布用web拍手CGI
【配布先URL】URLﾘﾝｸ(www.webclap.com)
web拍手CGI公式サイトさんのところで無料配布のスクリプトをもらってきたのですが、
ファビコンがプロバイダ側のへんてこファビコンなので変えたいのです！
自サイトのhtmlページでは自作のファビコンで被せてあるのですが、CGIでファビコンを
つけるのはどこをどういじったら良いですか？
clapinit.txt (cgi) このファイルがあやしかったので、
#--------------
# HTMLヘッダー
#--------------
sub header{
print "Content-type: text/html\n\n";
print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">',"\n";
print '<html lang="ja"><head>',"\n";
print "<title>$title</title>\n";
print "</head>\n";
この内に
print "<link rel="shortcut icon" href="favicon.ico">\n";
↑これを加えてみたのですがダメですた。
他にもいじらないとダメだったりするのでしょうか。
もしかして根本的に間違ってたりするのでしょうか…。
どなたかお助けください。
スクリプトダウンロード先は
URLﾘﾝｸ(www.webclap.com)←ここです。
358:nobodyさん
08/09/02 18:03:23
print qq|<link rel="shortcut icon" href="favicon.ico">\n|;
書くならエスケープしないと
359:357
08/09/02 18:21:23 ikXIt5qG
358さん、ありがとうっ！
できました。ヽ( ´ ∇ ｀ )ノ
エスケープてなんのことかさっぱりですが、助かりました！
ありがとうございましたー。
360:WIvuwbtzwfKUbeCY
08/09/04 04:46:54
8BjBoM <a href="URLﾘﾝｸ(ywnlxptotivr.com)">ywnlxptotivr</a>, [url=URLﾘﾝｸ(rteiyeyfadlo.com) [link=URLﾘﾝｸ(ogppqltwqlls.com) URLﾘﾝｸ(qkrzooqzbhel.com)
361:nobodyさん
08/09/04 06:55:50
PHP限定で改造やります
改造したものはHPで公衆発信します
まず以下の情報を書いてレスよろ
[スクリプト名]名前は正確に！！
[配布先URL]二次配布できるかできないか確認するためです。うｐローダに置いてあったらスルー
[改造内容]何をどのように改造したいのか詳しく。あいまいな内容は基本的にスルー
362:nobodyさん
08/09/04 20:31:18
>>361
スレの趣旨から反するから改造丸投げはNG
363:nobodyさん
08/09/04 20:58:58
一部も丸投げもどっちでもいいよ
364:nobodyさん
08/09/04 23:19:35
関連スレ
【 スクリプト改造依頼スレ 】(丸投げ) part7再
ｽﾚﾘﾝｸ(php板)
365:RZWXbJawD
08/09/15 12:13:38
map+1409.txt;50;60
366:nobodyさん
08/09/20 18:44:46
URLﾘﾝｸ(www.dotup.org)
ゲームの得点ランキングを作ろうと思い、
名前・得点・コメントを入力してランキングに登録するといった形のものを作りたかったのですが、
値を入力し、送信してもうまく表示されません。
logのファイルに書き込みはできてるみたいですが、正しくかけていないように思えます。
どうすればランキングを表示できるでしょうか？
もうどこが間違ってるのか分からなくなってしまいましたので、アップロードさせていただきました。
どなたか修正・ご指導よろしくお願いします。
URLﾘﾝｸ(www.cgi-web.net)様の
quizというCGIを元に改造してみたものです。
こちらに誘導されました。よろしくお願いします。
367:nobodyさん
08/09/21 01:27:40
>>366
配布元の制限を読むと、あなたが配布元に連絡していない場合、
今回のアップロードは「スクリプトの無断再配布」に当たり、
同サイトの提示するライセンスに抵触する可能性があります。
権利関係を再確認してください。
368:nobodyさん
08/09/26 20:08:56 ze4UkUPR
【. CGI名 .】toshinariスクリプト(Perl)
【配布先URL】URLﾘﾝｸ(www.toshinari.net)
【ヘルプ内容】
としなり掲示板にリモートホスト、IPを取得できるように改造してください。
できれば/BBSID/log/00000.cgi
みたいに掲示板IDディレクトリに新しくlogディレクトリを作成してcgiファイルで保存するようにして
それでレス削除画面にリモートホスト、IPを表示させるようにしてくれるといいです。
あと、ここからは希望ですが
リモートホスト(IP)規制機能と透明あぼーん機能をつけてください。
報酬はリモートホスト、IP取得が500P
リモートホスト(IP)規制機能、透明あぼーんまで追加してくださったら+500P払います
369:nobodyさん
08/09/26 20:33:39
Pって何やねん
370:368
08/09/26 20:35:04 ze4UkUPR
>>368
すいません、書き忘れてました
ウェブマネーのことです。
371:368
08/09/26 20:36:50 ze4UkUPR
安価ミス・・・
>>368じゃなくて>>369
372:nobodyさん
08/09/26 20:52:29
ケチくさいにもほどがあるな
373:nobodyさん
08/09/27 00:18:26
>>368
「ここからは希望」ってあるがじゃあその前は何なんだ
374:nobodyさん
08/09/27 04:01:31
ま、>>1嫁
375:368
08/09/27 07:15:06 DmLoG2K4
すいません。書き直します
ダウンロード場所：URLﾘﾝｸ(cgi.toshinari.net)
スクリプト名：toshinariスクリプト
どんな風に改造するか：
としなり掲示板にリモートホスト、IPを取得できるように改造してください。
/BBSID/log/00000.cgiという感じにlogディレクトリにcgiファイルで保存するようにしてほしいです。
報酬はWM1000Pです。
これからは希望ですが
ＩＰ規制と透明あぼーんもつけてもらえれば幸いです。