★三 【 スクリプト改造工房 PART 8 】 ★三at PHP
★三 【 スクリプト改造工房 PART 8 】 ★三 - 暇つぶし2ch369:nobodyさん
04/07/11 01:17
【.CGI名.】ChaBo
【配布先URL】URLリンク(www.kemokemo.com)
【ヘルプ内容】
 この一行掲示板は、
 07/10 10:00 名前 : 本文
 この様に、投稿した時刻が自動的に挿入されるのですが、
 名前と本文は、自動挿入される時刻よりフォントサイズが1つ大きいのです。

 そこで、名前と本文のフォントサイズを、時刻と同じ大きさにしたいのですが、
 何処にどういうスクリプトを書けば良いのか全く分からず困っています。。
 

 どうか宜しくお願いします。

370:nobodyさん
04/07/11 01:25
>>369
よく見れ。
cssファイルをいじるだけだろ。

371:nobodyさん
04/07/11 01:36
>>370
あり?css?俺が見てるスクリプトだと、

602: $mesbuff .= "<SMALL>($timestamp)</SMALL> <B>[$name]</B> ";
# 名前と本文がデカいんじゃなくて、時刻が小さい。

なんだけど…。間違えて別のを落としてないか確認してくる(泣)。

372:nobodyさん
04/07/11 01:55
# 合ってた。鬱。

>>369
602行め辺りをぐりぐりする。

373:369
04/07/11 02:05
レス有難う御座います。
おかげ様で、名前と本文を時刻と同じサイズに出来たのですが、
実際に小さくしてみると、想像していた物とは少し・・(´Д`)

デフォルトサイズより小さく、<SMALL>指定より大きい、そんなサイズにしたいのですが、
SMALL以外にサイズ指定の関数にはどんな物が有りますか?

すみませんが、宜しくお願い致しますm(_ _)m

374:nobodyさん
04/07/11 02:14
>>373
なんでぇ、バージョン違いかよ。

【.  CGI名  .】 複数のバージョンがある場合には正確に        (必須)
          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
【配布先URL】 教えてくれる人が参照する場合があるので       (必須)
【. 置き場所 .】 配布先が閉鎖の場合、すぐ見られるようtxtなどで
          upした場合、 デザインをhtmlで作成した場合など  (任意)
【ヘルプ内容】 どのように改造したくてどのようにうまくできないか  (必須)
          機能・動作などを簡潔かつ詳細に


関数?
おまいはHTMLもわからんのか?
板違いだからWeb制作板で勉強してから出直せ。

375:nobodyさん
04/07/12 13:11
URLリンク(www.booboo.ne.jp)
のBooRandomLink ver1.05なのですが、DocomoのFOMAでCGIにアクセスすると「502 現在ご利用できません」とエラーが出ます。

docomoのページを見た所
URLリンク(www.nttdocomo.co.jp)
CGI作成時に「Content-Type」、「Content-Length」は必須項目となります。
SSLでKeep-Aliveを有効にするためにも「Content-Length」は必須となります。
LOCATION時のURLの指定は絶対パスで記述します。
携帯・自動車電話用iモード端末はHTTP1.0でアクセスします。
FOMAiモード端末はHTTP1.1でアクセスします。
と書いてありましたが、どこかに付け足せばいいのでしょうか。

サーバーはwindowsNT IISです。

376:nobodyさん
04/07/12 17:19
>>375
502 Bad Gateway

鯖がケッタイを弾いているだけなのではないかい?

377:nobodyさん
04/07/14 22:58
URLリンク(stnight.pekori.to)
このスケジューラーの"場所"と表示されるところを"名前"に変更したくて、
cgiにある"場所"という文字を"名前"に変換してみました。
すると"名前"に変わったんですが、書き込み画面だと"場所"のままなんです。
どうしてでしょうか?

378:nobodyさん
04/07/15 02:26
>>377
line:603
 print " <td align=center nowrap><b>場 所</b></td>\n";


379:nobodyさん
04/07/15 14:53
>>378
サンクス
スペースがあったから検索に引っかからなかった…
っていうかちゃんとスクリプト読むべきだと反省しました

380:nobodyさん
04/07/16 22:58
URLリンク(www.japu.org)
ですが、これはaskaBBSにキャップ機能(上のは「名前★」ではなく「"名前"」というキャップ)
を付けたものですが、今の状態だと登録された名前とメール欄のパスをそれぞれ入力しないと
キャップが出ないのですが、それを2ちゃんねると同じようにメール欄の
パスのみで「名前★」が出るように改造していただけないでしょうか。
よろしくお願いします。

381:nobodyさん
04/07/17 03:19
どうにも行き詰まってしまったので、宜しければご教授お願いします。

【スクリプト名】
 Miniりすと
 (配布元サンプル URLリンク(minicgi.net)
 (配布元解説ページ URLリンク(minicgi.net)
【CGIソース】
 URLリンク(maxfigs.hp.infoseek.co.jp)
 URLリンク(maxfigs.hp.infoseek.co.jp)
【改造したい内容】
 コメントの項目をふたつ作りたい
 >現状のリスト  URLリンク(maxfigs.hp.infoseek.co.jp)
 >>リストの変更後イメージ  URLリンク(maxfigs.hp.infoseek.co.jp)
 >現状の入力フォーム  URLリンク(maxfigs.hp.infoseek.co.jp)
 >>入力フォームの変更後イメージ  URLリンク(maxfigs.hp.infoseek.co.jp)
【その他】
 個人的なデータベースを作成している際に、コメント欄がひとつでは足りなくなってしまいました。
 CGIはlist.cgiとtool.cgiから出来ており、デフォルトのtool.cgiの270~275行あたりの記述を参考に、
 コメント入力欄や出力を2つ作ってみたのですが、項目どころか入力欄すらも作れませんでした。
 見様見真似のコピーペーストでは無理なのだろうと思うのですが、試しても反映されないのです。
 各cgiファイルのどの行を修正して行けば良いのか、どなたかアドバイス頂けませんでしょうか。

 どうぞ宜しくお願いします。


382:nobodyさん
04/07/19 18:32
○投げに投げたら?

383:nobodyさん
04/07/29 20:18
以前改造していただいたcgiに不具合が見つかったのですが、それを修正してもらうことは可能でしょうか?

384:nobodyさん
04/07/29 20:39
>>383
このスレの性質をよく理解されているのならどうぞ。

385:nobodyさん
04/08/02 02:17 j14ATa2k
(1)配布元 CGIぽん URLリンク(specters.net) ダウンロード項目内 yoyuuha.cgi
(2) 余裕派掲示板でINPUT要項をもういくつか増やし なおかつUSERAGENT BROWSER 情報をlogファイルに追記。
   閲覧画面で上記追加情報も見られるようにしたいです。

    現在の状態 URLリンク(cgi.f48.aaacafe.ne.jp) 
    変更後のイメージ URLリンク(cgi.f48.aaacafe.ne.jp)

デザイン系の変更は自分でいたしますので(2)に書いてあることに関しましてアドバイスがいただけたらと思います。
formないのINPUT項目を増やす、USERAGENT BROWSER情報を取得しlogファイルに追記。
上記追記情報を閲覧画面に出力、phpではある程度自分がやりたいことが出来るレベルにはなりつつあるのですが

perlはなにぶん初心者なもので何かアドバイスをいただけたらと思います。formでの新たな項目の追加、
それによって取得できる変数のlogファイルへの書き込み
logふぁいるからbrowserへの出力。ここらへんの流れを教えていただけるとありがたいです。

386:385
04/08/02 04:19 j14ATa2k
User Agent に加えてリモートホスト情報も加えたいです。お願いいたします

387:nobodyさん
04/08/03 05:44
【スクリプト名】
メッセージアンケート(KENT-WEB)

【CGIソース】
URLリンク(kish.s60.xrea.com)

【改造したい内容】
以前丸投げスレで改造してもらったものなのですが、不具合が見つかりました。
KENT-WEBのメッセージアンケートにレスを付けられるようにしていただけたのですが、
レスをする前に他の人がレスをして、それが上がってしまうと順番が変わり、
レスをする場所がめちゃくちゃになってしまう、という不具合でだいぶ困っています。
言葉で説明するのが大変難しいのですが、簡単に言いますと、
自分がレスしようとしたところに必ずレスできるようにしたい、ということです。
あとできればレスに番号を付けたいと思っています。
よろしくお願いします。

388:387
04/08/03 14:59 DZnGogL/
ageさせていただきます

389:nobodyさん
04/08/03 15:23
>>385
PHPが作れて何故出来ない?

著作権を削ってる様な人間にサポートはないと思え。
回線切って逝ってよし

390:nobodyさん
04/08/03 18:58
URLリンク(www2u.biglobe.ne.jp)
ここのAero chatを入室退室表示を出さないようにし、
名前をクッキーに保存するようにしたいと思います。
どなたかアドバイスお願いしますm(._.)m

391:nobodyさん
04/08/05 14:22 qK3P86ts
 

392:nobodyさん
04/08/05 21:52
>>360
そこのBBSは問題あるな。
%formから受取ったものをそのままファイルに書き込んでる

393:nobodyさん
04/08/07 16:26 lGP8f5JH
【CGI名】 ミニ更新履歴帖 ver1.15 シンプルD ver1.13
【配布先URL】 URLリンク(www.kit.hi-ho.ne.jp)
【置き場所】 URLリンク(www.kit.hi-ho.ne.jp)
【依頼内容】 背景画像をランダムで表示できるようにしたいです

javascriptを用いてランダムに背景画像を表示するタグはわかりましたが、
このCGIのように至るところにheadがあるのでうまく表示できませんでした。

丸投げよりこちらに来ました。
どうか宜しくお願いします。

394:nobodyさん
04/08/08 19:04
じゃあ至るところのheadに入れたり入れなかったりして試せよ

395:547
04/08/09 10:40 huEHQGdL
kentさんのデータベースみたいに
URLリンク(www.kent-web.com)
検索をした後、リンクをクリックすると
詳細ページにいけるようにしたいのですが
どうすればいいのでしょうか?
△▲ WebProg 初心者の質問 Part9 ▼▽
から誘導されてきたのですが
詳細ページにいく時のリンクの張り方?がわからずに
止まっている状態です。
ちなみにCGIのソフトはCGIROOMの
URLリンク(cgiroom.nu)
を使っています。

よろしくお願いします。


396:nobodyさん
04/08/09 11:02
改造中のソースを晒してくれ

397:nobodyさん
04/08/09 11:07
>>394
解決しました
ありがとうございました

398:547
04/08/09 11:17 huEHQGdL
URLリンク(www.geocities.jp)
こちらになります。
<a href="db2.cgi?no=$data[1]">$data[1]</a>
たぶんここ↑をどうにかすればできると思うのですが。
今はdb2というCGIを別に作って中身はdbと同じ(表示する項目が違うだけ)
をつくりそこにリンクを張って詳細ページを作りたいと思っています。

399:nobodyさん
04/08/09 12:38
詳細ページを作る。
それを表示するクエリーストリングを決める。
そのクエリーストリングを受け取ったら表示させる。

そんだけ。

400:547
04/08/09 13:00 huEHQGdL
クエリーストリングですか?
できればわかりやすくお願いしたいのですが・・


401:nobodyさん
04/08/09 13:22
>>400
クエリーストリング以前にお前は詳細ページを表示するHTML部分を作ったか?

402:547
04/08/09 13:30 huEHQGdL
詳細を表示させるHTML部分は作成しました。

403:nobodyさん
04/08/09 13:38
じゃ、クエリーストリング…
cgi?以降のことだが…
これに使うのを決める。
例えば、cgi?view=商品ナンバー
商品ナンバーはdata[1]かな?
これを<a href= (ry に書いておけ

で、ここからが肝要
クエリーストリングを受け取ったら、お前が作った詳細を表示させるHTML部分…
サブルーチンにしてあるならそのサブルーチンを呼び出して表示する。

404:nobodyさん
04/08/09 14:58 lYQyr6Nk
すみません。
「amigo database」みたいな汎用データベースを
「php+mysql」で使えるようなスクリプトってありますか?
ご教示願います。

405:547
04/08/09 16:21 huEHQGdL
>クエリーストリングを受け取ったら、お前が作った詳細を表示させるHTML部分…
>サブルーチンにしてあるならそのサブルーチンを呼び出して表示する。
のところが分からないのですが・・・

おそらくサブルーチンは
sub seek{
だと思うのでそれを呼び出す 
&seek

すみませんこれまでしか分かりません。

406:nobodyさん
04/08/09 18:41
>>547
ん?
sub seekは検索にHITした物の一覧を表示するサブルーチンだろ?
その一覧に詳細表示させるリンクを作りたいと言うのがおまいのやりたい事だろ?
お前が作った詳細を表示させるHTMLはどこだ?

407:547
04/08/09 21:51 O8/Ygb0m
ん?
もしかして同じcgiの中に
sub syou{
$print .=<<HTML;
<!-- 詳細表示 -->
<td width="17%" bgcolor="#FFFFFF"> <p>名前</p></td>
<td width="83%" bgcolor="#FFFFFF">$data[1]</td>
HTML
}
&syou
見たいな感じで記述するんでしょうか?
この場合&syouで詳細を表示させるってことですか?
いまいち分からんです・・



408:547
04/08/09 21:52 O8/Ygb0m
ん?
もしかして同じcgiの中に
sub syou{
$print .=<<HTML;
<!-- 詳細表示 -->
<td width="17%" bgcolor="#FFFFFF"> <p>名前</p></td>
<td width="83%" bgcolor="#FFFFFF">$data[1]</td>
HTML
}
&syou
見たいな感じで記述するんでしょうか?
この場合&syouで詳細を表示させるってことですか?
いまいち分からんです・・



409:547
04/08/09 22:19 O8/Ygb0m
すみません2回投稿してしまった

410:nobodyさん
04/08/10 03:59
>>407-409
それで合ってる。

411:547
04/08/10 10:12 9CP1J+UA
なぜかポート80エラーに・・
URLリンク(www.geocities.jp)
今できてるところまでなんですが
やはりsub syou{の使い方がおかしいみたいなので
ご指摘お願いします

412:nobodyさん
04/08/10 12:17
単発質問なんですけど
KENT WEBのYY-BOARDで半角カナ使うと文字化けするんですけど
どうすれば半角カナ文字化けしなくなりますか?

413:nobodyさん
04/08/10 19:22
>>411
まず、オリジナルにあるsub footがないのでエラーが出てる。
&syouのあとにセミコロンがないのでエラーが出てる。

だいたいが&syou;の位置がぜんぜん違う。
もうちょっとがんばれ。

414:nobodyさん
04/08/10 19:22
>>412
文字コードをEUCにしる

415:nobodyさん
04/08/10 20:53
>>387をなんとかお願いできないでしょうか?

416:nobodyさん
04/08/10 23:12
>>415
他スレのものをなぜここへ持ち込む?

417:nobodyさん
04/08/11 04:31
>>415
神気取りのあいつの尻拭いをしたいヤシなどいない。

お前も悪い事したと反省しる!
小出しの依頼をしたことをな。

418:415
04/08/11 06:26
>>417
以前依頼したときも気になったんですが、小出しだけでなく追加依頼も禁止したほうが良いと思います。
私はあのとき小出しにしたつもりはなく、改造していただいたCGIを使用して初めて、ageの機能もあったほうがいいな…と思ったのです。
追加依頼も禁止ならば、そう明記してあったほうがより良いと思います。
ただ、頼む側は追加依頼という気持ちでも、頼まれる側は小出しに見えてしまいますから、前回そういう形になってしまったことは謝ります。
すみませんでした。

419:547
04/08/11 10:25 KDJbSiLZ
>413
なるほどsub foot抜けてますね。あとセミコロンも・・・

&syou;の位置がどうやっても分かりません。
URLリンク(www.web-terakoya.net)
とか見てみたんですが余計に混乱して・・・
もうちょっとヒントお願いします。

420:nobodyさん
04/08/11 16:47
>>418
(゚Д゚)ハァ?

追加依頼 = 小出し だろ!

もう来るな!!

421:418
04/08/11 17:25
>>420
その通りですね。本当にすみませんでした。

422:nobodyさん
04/08/11 17:49
>>419
あんまりにも長引いてしまっているので、サンプルを作ってみた。
URLリンク(marunage.web2.poporo.net)
こんなのでいいのかな?

あっ、漏れはオリジナルのを改造したんでな。
ファイル名はdatabase.cgiにしてくれよ。

423:547
04/08/11 21:05 AZrnpxJ0
うわぁ
ありがとうございますー。

んで早速アップーと思ったら
The server encountered an internal error or misconfiguration and was unable to complete your request.
と表示が・・・
調べてみたらCGI スクリプト内の問題が原因みたいなんですが
見たところで全然わかるはずもなく。。
ほんと申し訳ないですがもうちょっとだけ教えて
いただけないでしょうか?

424:547
04/08/11 21:11 AZrnpxJ0
って
デキタ━━(゚∀゚)━━!!
名前をつけて保存でなくて
そのままコピー&ペーストで貼り付けてやったら
できました!!
ありがとうございましたー。
>422のエライ人ありがとうでした。

425:nobodyさん
04/08/12 07:51
URLリンク(php.s3.to)
で複数の添付ファイルを受信するにはどの部分を修正すればいいのでしょうか?

426:nobodyさん
04/08/12 19:56
>>424
まだいるか?
ちょっと手直ししたぞ。
URLリンク(marunage.web2.poporo.net)

お礼が欲しいぞ。
↓に逝ってクリックしまくれ

クリックで救える命がある。 
URLリンク(www.dff.jp)

427:547
04/08/13 13:07 X3c1TvpR
>>426
まだいましたー。
何度もありがとうございます。
UPして確認したいですが今サーバーが落ちてるみたいなので
確認できません。。
でもソース見る限りでは説明文が入ったりして
すごくありがたいです。。

今そのソースを新規にウインドウを立ち上げるのではなく
同一ページ?に開くようにしてるのですが。
むずかしいですねー。
とりあえず新しいページを出さないようにするには
"javascript:void(0)" onClick="window.open
のとこをを削ればいいみたいなのはわかりました。
これからもうちょっと改造していきたいと思ってます。

クリックしてきましたー。
とりあえず毎日クリックしてお礼の代わりとさせていただきますので。
またなにかあったらよろしくお願いします。。


428:412
04/08/13 17:11
文字コードをEUCにするってのはheaderの部分のcharsetをEUC-JPにするって事ですか?
それともEUCで保存するって事ですか?
両方やってみましたがこれをやると文字が全部文字化けしちゃいます

429:nobodyさん
04/08/14 02:08
>>412
>>79

430:nobodyさん
04/08/14 02:28 YM4iJTAR
KENT氏のサイトで紹介あるよ。ここの8ね。最低限配布サイトで調べてから来ようよ。
URLリンク(www.kent-web.com)

431:nobodyさん
04/08/15 00:51 ThpZR4Ya
C-BOARDで、投稿画面に追加したセレクトボックスの
投稿データチェック(未選択不可)を行いたいのですが、
どうすればいいのですか?

下記のところに、新しく追加したら大丈夫だと思うのですが..
チェックの仕方がわかりません。

#─ メールアドレスをチェック
length($::FORM{'email'})
&& ($::FORM{'email'} !~ /^[!-?A-~]+@[!-?A-~]+\.[!-?A-~]+$/)
&& push(@error, 'メールアドレスが不正です。');

#─ パスワードをチェック
($::FORM{'key'} =~ /[<>&"]/)
&& &::error(\('パスワードに「<, >, &, "」は'
. '使えません。'));

432:nobodyさん
04/08/15 01:19
コピペかよ・・・

433:nobodyさん
04/08/15 20:34 ACdvGoXy
あげ

434:nobodyさん
04/08/19 00:28
KENT-WEBさんのYY-BOARDの改造に関する質問です。
同サイトのサポート掲示板で


# タグ処理
$val =~ s/&/&/g;
$val =~ s/"/"/g;
$val =~ s/</</g;
$val =~ s/>/>/g;
$val =~ s/\0//g;

このような記述が書かれている行のあとに、
$val = s/変換前の文字列/変換後の文字列/g;
こんな感じの文を追加すると特定の文字列の表示を変換できる。


という記述を見つけたのですが、これを応用して、

<< >>で囲まれた文字列は全て※※※※に変換する

ということはできますでしょうか?
できましたら具体的なスクリプトも提示して下さると幸いです。宜しくお願い致します。

435:nobodyさん
04/08/19 05:37
できるよー。
いま時間とテスト環境がないから書かないけど(嘘を教えたらイヤなので)、
きっと正規表現のえらい人が教えてくれるでしょう。

436:nobodyさん
04/08/19 10:48
>>434
> KENT-WEBさんのYY-BOARDの改造に関する質問です。
またか。。。

> << >>で囲まれた文字列は全て※※※※に変換する

> $val =~ s/</&lt;/g;
> $val =~ s/>/& gt;/g;
する前に変換すること。
凡例:
$val =~ s|<<(.+)>>|<em>$1</em>|g;
注意点:
<<ABC<<いろは>>DEF>>
は、
<em>ABC<<いろは>>DEF</em>
となる。(ただし<em></em>が&lt;em&gt;&lt;/em&gt;となるので、この分を再変換すること)

# タグ処理
$val =~ s|<<(.+)>>|<em>$1</em>|g; # <<>>で囲まれたものを。。。
$val =~ s/&/&amp/g;
$val =~ s/"/&quot/g;
$val =~ s/<(?!/?em>)/&lt;/g; # <em> の復元1
$val =~ s/(?<!</?em)>/&gt;/g; # <em> の復元2
$val =~ s/\0//g;

437:434
04/08/20 18:44
>>435-436

 教えて下さりありがとうございました。言われたとおり実行したところ変換することが出来ました。
 ただ、この方法だとログ自体が書き換わってしまい、実際に何を書き込んだのかを確認することが出来ませんでした。
 表示部分のみ書き換える方法はありませんでしょうか?
 多分、 $val =~ s|<<(.+)>>|<em>$1</em>|g;  の行を挿入する位置の問題だと思うのですが。

438:nobodyさん
04/08/20 22:03
>>437
丸投げ君はスレ違いですよー
それくらい解析しましょうねー

439:nobodyさん
04/08/28 10:16
【.  CGI名  .】 WebPatio Ver: 1.51
【配布先URL】 URLリンク(www.kent-web.com)
【. 依頼内容 】
書き込み・返信を管理者のみしか出来ないようにしたいのと、管理識別用文字列の機能とトリップ機能、fusianasan機能を入れたいんですが、どうしたら良いのでしょうか?

440:nobodyさん
04/08/28 15:26
>>439
スレリンク(php板:60-66番)

441:nobodyさん
04/08/28 22:47
質問があります。KENTWEBで公開されているWEB PATIOを改造したいのですが、
以下のようにするにはどのような方法がありますか。回答していただければ幸いです。
1. トリップ機能の付加
2. 各スレッド及びレスへIP表示機能の追加。
3. スレッド作成時及びレスをするときの確認画面。
以上の機能を追加したいのですが、ご教授下さい。


442:nobodyさん
04/08/28 23:22
>>441
1. regist.cgi の sub regist の中で $i_nam をいじる
2. regist.cgi の sub regist の中で $i_nam や $i_sub に $host をくっつける
3. regist.cgi の sub regist を regist2 にでも変えて、
 regist は hidden で値を持たせて regist2 に投稿できる確認画面表示にする。

443:nobodyさん
04/08/29 00:11 d+jXT+vh
webアンケートについて教えてください。

URLリンク(www.narishin.com)

上記サイトのWeb Qnaire 1(一つ目のサンプル)についてなんですが、
自分のホームページになんとか設置できたのはいいんですが、
テストしようとしても、エラーが出て連続投稿は受け付けないと表示されます。
下のヒントの言う通りにCGIをいじってもダメでした。
どうか連続投稿できるように教えてください。

444:nobodyさん
04/08/29 01:29
■ 設置の方法がわからない場合には
CGI設置について質問
スレリンク(php板:15番)(テンプレ)

■ 自分で改造できない場合には
【 スクリプト改造依頼スレ 】(丸投げ) part2
スレリンク(php板:2番)(テンプレ)

■ 自分で改造するアドバイスが欲しい場合には
★三 【 スクリプト改造工房 PART 8 】 ★三
スレリンク(php板:79番)(テンプレ)

445:nobodyさん
04/09/03 00:36 khCAQhgB
【.  CGI名  .】 T-BookmarkPlus Final
【配布先URL】 URLリンク(www.de-bug.net)
【 置き場所 .】 URLリンク(primrose.sakura.ne.jp)
CGIのテキストファイル
         URLリンク(primrose.sakura.ne.jp)
【ヘルプ内容】 置き場所で表示している左フレームの文字サイズを小さくしたいんですが…
        HTMLのファイルにタグを入れてもダメポだったので…
        配布サイトでのサポート板には入ることが出来ませんでした。
        テキストファイルは、左フレームが処理しているCGIです。
        …説明ベタで申し訳ありません。
        よろしくお願いします。


446:445
04/09/03 01:55 khCAQhgB
申し訳ありません!
自己解決しました…

447:nobodyさん
04/09/19 13:19:03 4/TOgomW
【.  CGI名  .】 WebPatio Ver: 1.51
【配布先URL】 URLリンク(www.kent-web.com)
【依頼内容】
こちらの掲示板で、スレッド毎にパスワードによる閲覧制限をし、パスワードを各スレッド毎に設定したいのです。
どのスレッドにも共通して仕様できるパスワードと、ユーザーが使用する各スレッドに割り当てたパスワードによる制限です

ver.1.2ならば、改造方法を掲載している所を見つけたのですが、1.51だと少し異なるようで、指定されている変更ではエラーとなります。

また、同時に投稿を管理者のみにしたいのですが、どうすればよいのでしょうか?




448:nobodyさん
04/09/19 16:54:35
エラーとなるとかどうすればいいかって、お前な。。。
このスクリプトをこんな風にしたくてこんな改造を施したんですがこんなエラーが出てしまいますっていうふうに書かないと誰もどうすることも出来ない。

449:nobodyさん
04/09/20 00:23:32 tFiVPHxE
>>447
ver.1.2の「改造方法を掲載している所」を貼るのがいいと思うよ。
運と心象が良いとエロイ人が微妙なヒントをくれるよ。

450:nobodyさん
04/09/20 09:46:44
KヨNTのWebPatioが出来る以前に同じ名前のスレッドフロート掲示板を作ったことがあったんだけど、
Niftyの商標に引っかかりそうだったんでさっさと排除したんだよなぁ。

KヨNTはそのあたりのことを気にとめているのだろうか。

451:nobodyさん
04/09/20 09:53:35
スレ違い

452:445
04/09/20 17:14:59 MKPCc/Nf
自己解決しました
お騒がせしました

453:nobodyさん
04/09/22 11:34:26
<?php print(">>452\n?"); ?>

454:nobodyさん
04/09/23 10:23:18 fGLKapG0
SSIで表示するカウンターを改造し、
gif画像連結ライブラリを使ってimgタグで呼び出すものを作ったのですが、
Content-Lengthを入れると表示されなくなってしまいます。

@files = ();
for ($i = 0; $i < length($count); $i++) {
$n = substr($count, $i, 1);
push(@files, "$n.gif");
}

require "gifcat.pl";
print "Content-type: image/gif\n\n";

binmode(STDOUT);
print &gifcat'gifcat(@files);
exit;
このような感じなのですが、どうすればうまくいくのでしょうか・・・?

455:nobodyさん
04/09/23 13:41:37

■ 自分で改造するアドバイスが欲しい場合には
★三 【 スクリプト改造工房 PART 8 】 ★三
スレリンク(php板:79番)(テンプレ)

456:nobodyさん
04/09/23 19:53:52
>>454
print "Content-type: image/gif\n";
print "Content-length: ".$length."\n\n";
とかするんじゃないのか?


457:nobodyさん
04/09/23 20:00:38
[スクリプト名]Ezbo type3
[スクリプト内容]アイコン型掲示板
[配布先URL]URLリンク(homepage2.nifty.com)
[置き場所]URLリンク(www.tiara.cc)

ここのアイコン掲示板CGIなんですが、2chのように半角カナが使えません。
ですが、半角カナの使えないCGI掲示板は殆どの場合、簡単な修正で
半角カナを使えるようにする事が出来ると聞きました。
(Web初心者板で聞きました。詳細はWebProg板に行くように誘導されました)

このCGIの場合、どの辺をどのように書き換えたら良いのでしょうか?


458:nobodyさん
04/09/23 20:24:00
大抵はjcode.plを読み込んでるから、それをjcodeg.plに変えれば結構半角になる。
jcode.plは適当に検索で探してみて。

459:nobodyさん
04/09/23 20:53:54
つーかjcode.plのバージョンあげるだけ

460:nobodyさん
04/09/23 20:55:13
>458
CGI部分のjcode.plをjcodeg.plに直し、
jcodeg.plも同じフォルダにアップしてパーミッションをjcode.plと同じにしましたが
CGIスクリプトエラーで止まってしまいます。
元に戻すと普通に掲示板として動いています。
あとは何がいけないのでしょうか…

461:nobodyさん
04/09/23 21:03:45
>459
457のCGIに同梱されているjcode.plのバージョンは2.13です。
公式サイト?(URLリンク(srekcah.org))でも2.13が最新のようですが…

462:nobodyさん
04/09/27 12:14:26
>>461
スレ間違ってるぞ
スレリンク(php板:272番)


463:457
04/09/29 13:30:30
何とか自己解決しました。

464:nobodyさん
04/09/30 19:03:57
>458-459 >462
( ´,_ゝ`)プッ

465:nobodyさん
04/09/30 19:18:25
>464 ( ´,_ゝ`)プッ

466:459
04/09/30 20:01:12
【言い訳】
何も読まずに適当に答えたんだYO!!
以前jcode.plのverが古くてEUCで半角カナが無理な時があったんだYO!!!!!!!!!!111111111111

467:nobodyさん
04/09/30 20:43:01
( ´,_ゝ`)プププププゲラッチョッ

468:nobodyさん
04/10/01 00:53:40
>>463 これだけ騒がせたんだからどう解決したか書こうよ。

469:nobodyさん
04/10/01 01:12:18
解答出てからえらい時差のある事故解決だったな

470:丸投げ寸前です・・・
04/10/01 11:05:01 6lZQYFV2
スクリプトの内容はここです↓
URLリンク(f46.aaacafe.ne.jp)
配布元は【レッツPHP】の掲示板です。
URLリンク(php.s3.to)
やりたいことは2つあります。
1つは、ラジオボタンを設置して【男/女】を掲示板に表示させたいのです。
ラジオボタンは設置できるのですが、【$dat.='~~】のソースが分かりません。
何処を?どう拡張したらいいのか教えてくださいませんか?
2つ目は、名前と本文が無記入(未記入)でも【エラー】を出さずに送信できる
(書き込める)ようにしたいのですが、こちらも全く分かりません。
よろしく回答お待ちします。
これは?丸投げの方がよかったでしょうか?でも、ぜひお願いします<(_ _)>


471:nobodyさん
04/10/01 14:45:39
未記入エラーはログ書き込みの時にやってるから、370-390行あたりの
不要なエラーチェックをコメントアウトするだけ。

表示したいって希望だから、既に性別情報は適当な書式でログに入ってんの?
なら、file() で Dat 読んでから、explode() してる個所(L.321-332)の list() に性別情報用の
変数を加える。$dat .= はただのHTMLだから分かるだろ。

list($xxx, $yyy, . . ., $sex) = expl . . . ; としたなら、性別を挿入したい個所で
$dat .= '<span class="opt">ここはあなたの性別よ: ' . $sex . '</span>'; とでもすればOK。

472:nobodyさん
04/10/01 14:53:01
> 何処を?どう拡張したらいいのか

参考までに。
そこのスクリプトはたいていextract()つかって外部変数を展開してくるので、
HTMLフォームのname属性で指定した名前が直接変数名になる。

書き換えるべきところは、ログ記入個所と、ログ読み出し&表示個所。

どうかとは思うがそれを書いた人の流儀にのっとれば、関数の頭でglobal宣言して
必要な外部変数を得て、ログを書式かしてる部分("$foo<>$bar<>$hoge\n"みたいなとこ)に追加する。
この場合は、regist() と past_log() 。

んで読み出す方は 471 でも書いたけど、list() = explode(); のパターンなので、ここで
追加したログ項目を拾ってHTMLに埋め込む、という流れ。

473:nobodyさん
04/10/01 23:48:13
>469
アドバイスの通りでは解決せず、自分で調べたからねー

474:nobodyさん
04/10/02 00:05:03
で、アドバイスとは違うどんな解決方法があったんだい?

475:丸投げ寸前です・・・
04/10/02 00:40:37 GZSz8bwn
>>471
ありがとうございます。
めちゃ勉強になりました。中途半端な知識しかなかったものですから
本当にたすかりました。やっぱ、最後は2chだと痛切に感じています。

>>472
親切にお答え頂き、ありがとうございます。
習うより慣れろをモットーに頑張って1週間。。。
お手上げ状態でした。
頑張ります。お返事ありがとうございました。


476:nobodyさん
04/10/04 20:05:11 TuRS65Ar
【CGI名】 超マニア広辞苑 ver2.0 (03/10/12)
【配布元URL】 URLリンク(www.bellcity.ne.jp)(上のメニューCGIを押すと切り替わる左メニューダウンロードより配布)
【置き場所】 URLリンク(cgi.f58.aaacafe.ne.jp)(自分で改造を試みたものを設置しています。)
CGIのテキストファイル
URLリンク(cgi.f58.aaacafe.ne.jp)(自分でいじったもの)
URLリンク(cgi.f58.aaacafe.ne.jp)(配布状態)
【依頼内容】
・登録した単語ごとにデータファイルを作成。あまり長いようならファイル分割(1.2.のようにリンクがはられるようになればベストです)
(小説置き場として利用としようと考えているので長いものが続くとkologというデータファイルの大きさが莫大になり重くなりそうなので)
・意味登録時のタグ利用許可
・現在は意味登録は削除のみ可ですが修正も可に。
・単語登録時にジャンルを分け、辞書を選択するとジャンルごとに分けた上で五十音順表示表示
↑こちらは配布元でβ版として稼動していますのでそちらを確認いただけるとイメージしていただきやすいと思います。
URLリンク(kazuman.web.infoseek.co.jp)
辞書名を選ぶとジャンルごとに五十音順に並んでソートされます。
・ソートを五十音ではなく任意で選べるように、または登録日付順に行う。

依頼内容が多くてすみません。
自分でいじったものは管理人のみの登録に制限し、見た目と単語を選んだときの表示のされ方を変えました。
今回このCGIを使って小説ページを作ろうと思い、初めてCGIの中を読みながらいじってみたのですが、機能のつけたしとなるとお手上げ状態になりました。
一つでも二つでも良いのでアドバイスいただけますようお願いいたします。

※このような質問は丸投げでしょうか。スレ違いでしたら申し訳ありません。

477:nobodyさん
04/10/05 21:26:16
次の依頼どうぞ

478:nobodyさん
04/10/05 21:31:51
    |l  |l l |l | |i
   |i  l |i l| li  |
        ∩
    _,,..,,n,r'゙ <⌒つ
   ./ ゚ 3  ヽ )´   
 ) l ゚ ll ∩ ノ そ
Σ `'ー---‐''  (
  ⌒ヽ/V⌒v、/⌒ ビダァァァン!!

479:nobodyさん
04/10/05 23:31:01
>>478 どうした!? 丸投げされたのかっ!!!

480:nobodyさん
04/10/06 14:58:38
【.  CGI名  .】 PHPウェブログシステム3 #304
【配布先URL】 URLリンク(www.netmania.jp)
【ヘルプ内容】 
リンクの所に貼ったリンクを別ウィンドウで開きたいのですが
どこをどういじればいいのやらで。。。
要は、 target="_blank"入れたいんです。
出来ればでいいので、よろしくお願いします。

481:nobodyさん
04/10/06 15:41:32
>>480
そういうのはhtmlやらCSSで何とかなる部分でしょ?
自分でやれ。

482:480
04/10/06 16:50:13
やべーすみません
自己解決しましたです。
もし今調べてる方がいらっしゃったら、
大変ご迷惑おかけしましたです。

483:nobodyさん
04/10/08 21:48:28
こういうクズがいると本当に気分が悪い

484:nobodyさん
04/10/08 21:53:23
>>483
2日の前のどうでもいいレスにわざわざやつあたりするお前の方が気分悪い

485:nobodyさん
04/10/09 13:14:46
本人降臨

486:初心者です。
04/10/09 21:17:20 fCvsZBf9
フリーの掲示板の設置が上手く出来たのですが、スクリプトの改造で
以下の戻り先URLの設定でターゲットの設定は出来ないのでしょうか?
_topに戻りたいのですが、戻れません。

# 戻り先URL
$home = 'URLリンク(xxxxx.com)';

以下の使いました。
URLリンク(www.kent-web.com)
です。ご指導下さいませ。

htmlの中には
<a href="$home"> は記述がありませんでした。
超初心者ですいません。



誰か教えて下さいませ。大変困ってます。<(_ _)>

487:nobodyさん
04/10/09 21:23:47
スレリンク(php板:682番)が読めないのか?
日本語もわからないなら帰れ。

初心者だからなんて理由にならん。
ここはそういうやつが来る板ではない。

488:nobodyさん
04/10/09 21:41:53
すいませんm(__)m 自己解決しました。
調べてくれてる方人すみませんでしたm(__)m


489:nobodyさん
04/10/09 21:58:54
△▲ WebProg 初心者の質問 Part10 ▼▽
スレリンク(php板:324番)

490:nobodyさん
04/10/09 22:05:28
>>487>>489
揃って同じレスしてるお前のが初心者

491:nobodyさん
04/10/09 22:48:53
たまーに簡単な質問が来るとスレ違いでも回答ラッシュ

492:nobodyさん
04/10/11 10:12:48
【CGI名】   ZeroBoard
【配布先URL】 URLリンク(nzeo.com)
【ヘルプ内容】
日本語化してホシイです。
韓国産ですので^^;

493:nobodyさん
04/10/11 18:11:35
丸投げに池

494:nobodyさん
04/10/12 02:15:20
>>493おお、馬鹿だ

495:492
04/10/12 14:54:38
丸投げに逝ってみます~

496:nobodyさん
04/10/20 01:06:37
どなたか教えてください。
1つのディレクトリ内にある複数の画像を
更新年月日順にソートして1ページに表示するCGIです。

スクリプトはこちら
URLリンク(www.clavis.ne.jp)

各画像の下にファイル名が表示されるのですが、
それぞれの画像のタイムスタンプも表示したい場合
どのようにすればよいのでしょうか。

497:nobodyさん
04/10/20 20:45:15
>>496
よくもこんな糞ソース晒せるもんだなぁ。すばらしいよくらビす。

498:nobodyさん
04/10/21 10:54:18
【CGI名】Miniりすとver4.01
【配布元】URLリンク(minicgi.net)
【内容】トップページに、(さんぷる2(らぐなろくなさんぷる)で言うと)
――――――
|ノービス | 0人 |
――――――
|ソードマン| 2人 |
―――――― 
| ・・・
という感じでここの(URLリンク(tackysroom.com))ように
統計を表示させるようにするにはどこをどう追加すればいいでしょうか?

499:nobodyさん
04/10/23 14:37:00 by3ineVA
URLリンク(www.ghost.jp)で配布してる「exit3v11alpha3.zip アルファ版リリース3」という自動リンク集です。
このCGIは管理人しか登録できないので、訪問者が各自で登録・修正(出来れば削除)出来るように改造したいと思います。
ネットで調べてちょっといじってみたのですが上手くいきません。
是非ヒントをください。よろしくお願いします。


500:nobodyさん
04/10/23 16:20:45
【.  CGI名  .】 YY-BOARD v5.33
【配布先URL】 URLリンク(www.kent-web.com)
【. 依頼内容 】
BBQ規制とDSBL規制を適用したいです。よろしくお願い致します。

501:nobodyさん
04/10/23 16:49:01
>499 500
ここは改造工房だってことはわかっているよな?
まずはお前等の改造中のスクリプトを晒してもらおうか。
話はそれからだ。

安易に丸投げスレに逃げるんじゃねーぞ。

502:500
04/10/23 21:46:31
>>501
了解です。

こんな感じにしてみましたが、両方ともうまく機能してないみたいです。よろしくお願いします。

# dsbl 問い合わせ。
if ($dsbl) {
gethostbyname(sprintf qq|%s.%s.%s.%s.list.dsbl.org.|, reverse split /\./, $ENV{'REMOTE_ADDR'}) and &error("アクセスを許可されていません (dsbl listed.)");
}

# BBQ 問い合わせ。
if ($bbq) {
gethostbyname(sprintf qq|%s.%s.%s.%s.niku.2ch.net.|, reverse split /\./, $ENV{'REMOTE_ADDR'}) and &error("アクセスを許可されていません (BBQ listed.)");
}

$bbq ='1';

$dsbl ='1';


503:nobodyさん
04/10/23 22:50:25
>>502
reverse (split /\./, $ENV{'REMOTE_ADDR'})
かな。

504:500
04/10/23 23:29:56
>>503
症状は、生ホストだとBBQリストに入っていないのにエラーメッセージが出る、串を使うとDSBLに入っているのにアクセスできる、というものです。

505:nobodyさん
04/10/30 14:11:34
【.  CGI名  .】 なんちてBLOG 記事INDEX付き バージョン        (必須)
【配布先URL】 URLリンク(nyats.com)       (必須)
【ヘルプ内容】
現在改造中のものです→URLリンク(shingari1582.hp.infoseek.co.jp)
メインはhtmlなのでcssを挿入してあるのですが、過去ログ表示用のCGI(現在改造中のもの)にもリンクやフォントのcssを入れたいと思いました。
$cssという因数があったので素人考えで適応させたいcss(a:linkから)をそのまま入れてみたのですが、
1行目は実行されても2行目からは反映されませんでした。
とほほさんの所等を参照してみたのですが、CGIに関しては本当に初心者で一体どうやって記事全体に反映されるようなcssを挿入すれば良いのか見当もつかなくて困っています。
何かヒントをいただければ嬉しいです、よろしくお願いします。

506:nobodyさん
04/10/31 01:03:45
URLリンク(hk2ch3.hp.infoseek.co.jp)
パーミッション設定とか色々手を尽くしたのですが
どうしても500エラーが起こるわけで…_| ̄|○
何故でしゃう。

507:nobodyさん
04/10/31 16:51:11
>>505-506
ファイルがないよ

508:nobodyさん
04/10/31 19:00:48
>>507
505のはファイル名のtypo
URLリンク(shingari1582.hp.infoseek.co.jp)

509:nobodyさん
04/10/31 21:29:48
>>505
動作確認してないけどヒアドキュメントにしたらいいんじゃないの?
下のjavascriptのとこ見てやってみた。

#CSS
$css = <<CSSEND;
"<style type=\"text\/css\">\n<\!--\n
\.doc \{  font-size\: $honbunsize\; color\: $honbuncolor\ font-family : Verdana;}\n
\.sub \{  font-size\: $titlesize\; color\: $titlecolor\; font-family : Verdana;}\n
\.date \{  font-size\: $datesize\; color\: $datecolor\; font-family : Verdana;}\n
a:link {color:000000;text-decoration:none;}
a:hover {color:666666;text-decoration:none;}
a:visited {color:000000;text-decoration:none;}
a:active {color:000000;text-decoration:none;}
FONT { font-family : Verdana;}
BODY {  line-height : 120%;}\n
-->\n<\/style>";
CSSEND

510:nobodyさん
04/11/01 04:04:37
>>509
パッと見\nはおかしいと思うのだが…

511:nobodyさん
04/11/01 14:22:31 dvWt0D+J
保存先をCSV形式のファイルからデータベース(MySQL)に変更すにはどうすればいいのでしょうか?どなたか、おしえてくださいm(_ _)m
<?php
//error_reporting(E_USER_WARNING); // Warrningを出力しない

//----------------------------------------------------
// 定数の宣言
//----------------------------------------------------
define("BBS_DATA", "./bbs.csv");
define("BBS_COL_DATE", 0);
define("BBS_COL_NAME", 1);
define("BBS_COL_BODY", 2);

//----------------------------------------------------
// 関数の定義
//----------------------------------------------------
// AppendCsvFile関数
// 機 能  CSV形式のデータをファイルの末尾に追加する
// 引 数  $FilePath : 書込むファイルへのパス
//   $CsvData : 書込みデータ
function AppendCsvToFile($FilePath, $CsvData) {
if ($FilePath == "") {
return false;
}
$fp = fopen($FilePath, "a");
if ($fp == 0) {
return false;
}
//作成日、名前、発言内容を「,」で連結し、レコードを作成する。
//また、レコード中の改行文字を取り除き行末に改行文字を付加する。
$temp = ereg_replace("[\r\n]", "", join(",", $CsvData)) . "\n";
fputs($fp, $temp);
}

512:nobodyさん
04/11/01 14:23:01
>>511の続き
// LoadCsvFile関数
// 機 能 CSV形式のファイルを2次元配列に読込む
// 引 数 $FilePath : 読込むファイルへのパス
// 戻り値 $CsvData : 読込んだテキストの2次元配列
function LoadCsvFile($FilePath) {
if (file_exists($FilePath) == false) { // ファイルの存在を確認する
return false;
}
$CsvData = array(); // 配列を作る
$TextData = file($FilePath); // ファイルのデータを読み込む

for ($i = 0; $i < sizeof($TextData); $i++) { // レコードが10件あれば10回
$TextData[$i] = ereg_replace("\n$", "", $TextData[$i]); // 行末の\nを取り除く
$TextData[$i] = ereg_replace("\r$", "", $TextData[$i]); // 行末の\rを取り除く
$CsvData[$i] = split("," , $TextData[$i]); // 「,」を区切りとしてフィールドの値を取り出す
}

return $CsvData; // $CsvDataは二次元配列
}
//------------------------------------------------------------
// ここからが主処理
//------------------------------------------------------------
if (isset($_POST["SUBMIT"])) { //このページが初めてアクセスされたか?
if ($_POST["BODY"] != "") { //発言内容はあるか?
$body = str_replace("\n", "<br>", $_POST["BODY"]); // \n\r(改行文字)をタグ<br>に変換する
$body = str_replace("\r", "", $body);
$name = $_POST["NAME"];
$BBSRecord = array(date("Y/m/d H:i:s"), $name, $body);
AppendCsvToFile(BBS_DATA, $BBSRecord); //「内容」の書込み
}
}

513:nobodyさん
04/11/01 14:23:23
>>512の続き
$BBSData = LoadCsvFile(BBS_DATA); //「内容」の読込み
?>
<html>
<head>
<title>掲示板</title>
</head>
<body><h1 align="center">掲示板</h1>
<a href="bbs.php">最新</a>
<form action="bbs.php" method="POST">
<table border="1" align="center" cellspacing="0">
<tr><td bgcolor="#cccccc" align="center">名 前</td><td><input type="text" name="NAME"></td></tr>
<tr><td bgcolor="#cccccc">発言内容</td><td><textarea name="BODY" cols="40" rows="8"></textarea></td>
<tr><td colspan="2" align="center">
<input type="submit" name="SUBMIT" value=" 投 稿 ">
<input type="reset" value=" ク リ ア "></td>
</tr>
</table>
</form>

514:nobodyさん
04/11/01 14:25:07
>>513の続き
<?php
if ($BBSData == false) { // 発言内容がなければ$BBSDataは空っぽ
print "発言はありません。<br>";
} else {
for ($i = sizeof($BBSData) - 1; $i >= 0; $i--) {
print "<hr><font size='3' color='#0000ff'><b>";
print $BBSData[$i][BBS_COL_NAME] . "</b></fomt>";
print "<font size='2' color='#666666'>";
print " [" . $BBSData[$i][BBS_COL_DATE] . "]" . "</font><br><br>";
print "<font size='3' color='#333333'>";
print $BBSData[$i][BBS_COL_BODY] . "</font><br><br>";
}
}
?>
</body>
</html>

515:nobodyさん
04/11/01 15:24:26
>>511-514
マルチうざい

516:505
04/11/01 23:13:08
>508
ファイル名間違えていました…訂正ありがとうございます。
>509
回答有難うございました!
#css以下を書き換えて動作させてみたのですが、反映されませんでした。
mainをちゃんと作ってないのですが、動作させてみたらこんな感じです↓
URLリンク(shingari1582.hp.infoseek.co.jp)(左フレームからログファイルへ入れます)
書き換え前と変わった事は一番上に「""; 」という記号が入った事だけのようです。
ソースを見てみたところ、<meta name="keywords" content=""></head>の後にスタイルシートが来ているので反映されないのかな?と思うのですが…関係ないでしょうか。
元もとのprint OUT $css;の位置がおかしいのかな?とも思うのですが、それだったら\.docからのcssも反映されませんよね。
現在a:hover以下のcssが反映されていないようです。
自分で別にcss用の変数を作ってみたらどうかと思いいろいろいじってみたのですが、表示されなくなってしまったりしてお手上げ状態です…orz
よろしければアドバイスお願いいたします…。

517:nobodyさん
04/11/02 03:54:29
>>516
#CSS
$css = <<CSSEND;
<style type="text/css"><!--
.doc {  font-size: $honbunsize; color: $honbuncolor font-family : Verdana;}
.sub {  font-size: $titlesize; color: $titlecolor; font-family : Verdana;}
.date {  font-size: $datesize; color: $datecolor; font-family : Verdana;}
a:link {color:000000;text-decoration:none;}
a:hover {color:666666;text-decoration:none;}
a:visited {color:000000;text-decoration:none;}
a:active {color:000000;text-decoration:none;}
FONT { font-family : Verdana;}
BODY { line-height : 120%;}
--></style>
CSSEND

じゃあ、これで。
不要な\と\nと"と;を削除しただけ。
SyntaxErrorはないから多分いけるはず。
動作確認は面倒なのでやってないけど。

#>516のリンク先のhtmlソースには一応css部分出力されてるみたい
#有効になってるかどうかはわからんけど

518:nobodyさん
04/11/04 08:51:40
おはようございます。

URLリンク(haiiro.info)

このCGIで NGワードを設定出来るようにしたいのですが
可能でしょうか?
宜しくお願いします。

519:nobodyさん
04/11/04 12:02:05
>>518
変数にNGワードが入ってたらエラーで弾けばよかろ

520:518
04/11/04 13:11:29 /4YiSBg1
>>519
スミマセン。詳しくお教えいただけないでしょうか?

521:nobodyさん
04/11/04 17:36:00
>>520
これ以上何を聞きたいのだろうか…
丸投げしたいのならスレ違い。
自分で何とかしたいのなら、どこがどう解らないのかを書く。

【 スクリプト改造依頼スレ 】(丸投げ) part2
スレリンク(php板)

522:nobodyさん
04/11/06 21:18:18
178 Name_Not_Found [sage] 04/11/06 16:26:41 ID:???
【種別】 ダイスチャット
【言語】 perl
【備考】 URLリンク(www.big.or.jp)
      これのようにダイスを振るフォームがあるのではなく、発言欄にコマンドを入れるようなもの。

正確には、COMCHAT-EX(KENT-WEB)に追記することによって
実装できるダイス用の構文が欲しいかも。


179 Name_Not_Found [sage] New! 04/11/06 19:49:11 ID:???
それは改造になるんじゃ?

523:nobodyさん
04/11/06 21:22:07
>>522
>>521

1つ上のレスぐらい読めや

524:nobodyさん
04/11/17 22:33:22
【.  CGI名  .】LIGHT CHAT
【配布先URL】URLリンク(happy.honesto.net)
【. 置き場所 .】URLリンク(botejako.com)
         自分で多少改造したものです。
【ヘルプ内容】
チャットの発言が表示される上の部分に表示される参加者名を
左から発言・入室したのが早い順に更新・発言した際に並び替えて
表示させるようにしたいのですがどうしてもできません。
今の状態だと、入室した順にしかなっていないようです。
参加者リスト(present.dat)の先頭に毎回追加すればいいのだと思うのですが、
push~~をunshift~~に変えてみてもうまくいきません。
それが見当違いのことをしてるかどうかもわかりません。

何かヒントをいただけないでしょうか、お願いします。

525:nobodyさん
04/11/17 22:35:28 A5o7/dm+
書き込みないようなのでageさせてもらいますです。

526:nobodyさん
04/11/22 19:28:58
しかし回答出来る人間は居なかった


      - 完( ´∀`) -






527:nobodyさん
04/11/22 22:20:50
いやぁ、つまらん改造だから、スクを見る気になれないだけ。
有料なら請け負うが…

528:nobodyさん
04/11/23 00:04:37
一匹釣れたみたいよ>>526

529:nobodyさん
04/11/23 02:43:22
527 :nobodyさん sage :04/11/22 22:20:50 ID:???
いやぁ、つまらん改造だから、スクを見る気になれないだけ。
有料なら請け負うが…

527 :nobodyさん sage :04/11/22 22:20:50 ID:???
いやぁ、つまらん改造だから、スクを見る気になれないだけ。
有料なら請け負うが…

527 :nobodyさん sage :04/11/22 22:20:50 ID:???
いやぁ、つまらん改造だから、スクを見る気になれないだけ。
有料なら請け負うが…

527 :nobodyさん sage :04/11/22 22:20:50 ID:???
いやぁ、つまらん改造だから、スクを見る気になれないだけ。
有料なら請け負うが…

530:nobodyさん
04/11/24 05:44:42
527 :nobodyさん sage :04/11/22 22:20:50 ID:???
いやん、つまらん改造ですので、スクを見る気になれませんわ。
私を満足させられる対価を頂けますなら請け負いますけれど…

531:nobodyさん
04/11/26 17:09:14
【CGI名】ランキングSP
【配布先URL】URLリンク(hp.bird.to)
【依頼内容】スコアと表示されてる数字の間に.とかを入れる(9999を9.999と表示)ようにしたいのですが、どのように改造すればいいでしょうか?
アドバイスお願いします。


532:nobodyさん
04/11/30 18:53:24
URLリンク(www.rescue.ne.jp)

↑ここのサイトのデータベース改造してます。
regist.cgi、search.cgiは変更しましたがエラーになったのでデフォルト。
regist.htmlのみ変更してます。

複数登録したいのでregist.htmlのリストボックスをチェックボックスに改造中なのですが、
チェックボックスに変更した後、WEB上で動作確認した所
チェックボックスで選択した項目で最後の物のみ反映されて
他の項目は反映されません。

【例】

<input type="checkbox" name="PREF" value="1" border="0">1  
<input type="checkbox" name="PREF" value="2" border="0">2 
<input type="checkbox" name="PREF" value="3" border="0">3 
<input type="checkbox" name="PREF" value="4" border="0">4
<input type="checkbox" name="PREF" value="5" border="0">5

Aに対して2つの項目を登録するとして

1と4を選択すると4のみ、2と3を選択すると3のみ
と言った状況です。

regist.cgi、search.cgiもいじらなくてはいけない事は分かるんですが、
何処をどうやって良いのか分かりません_| ̄|○

誰か、教えてください。。。

長文、すいませんでした。

533:nobodyさん
04/12/01 04:25:16
こっちに貼っておけば良かったのかな?
URLリンク(www.google.co.jp)

534:nobodyさん
04/12/04 20:50:36 8LV5OOZo
配布されているチャットを改造したいです。

インフォシークなので直リンができないので、中継地点を作ってます。

URLリンク(keizibann.hp.infoseek.co.jp)
↑から入ったチャットの、一番上あたりに、
 参加者の名前を表示させるにはどうすればいいですか?

スクリプトはこれ↓です。
URLリンク(keizibann.hp.infoseek.co.jp)

よろしくお願いします。




535:nobodyさん
04/12/04 21:24:16
URLリンク(help.www.infoseek.co.jp)
通報済み

536:nobodyさん
04/12/05 06:13:44
>>534
知恵袋で質問した人だよね。
漏れは丸投げスレに誘導したんだが、工房スレに来たということは自分で改造できるんだね。

じゃ、改造の流れを説明するぞ。

まずKENTの所(URLリンク(www.kent-web.com))に行ってcomchatをダウンロードして来い。
comchat.cgiの在室者処理の所をパクれ。
変数名をK's Chat Ligthにあうように弄れ。

以上。

537:nobodyさん
04/12/05 06:14:55
>以上。

これは余計だなお

538:nobodyさん
04/12/05 16:51:08 +UKjgSSz
ここじゃなかったのか、、、。
ついでに寄ったから間違えた。。。

でもありがとう。がんばります。

539:nobodyさん
04/12/12 03:38:36
imgboard.cgiを利用中です。
URLリンク(www.big.or.jp)

これに2ちゃんと同じsage機能をつけたいのですが上手くいきません。

540:nobodyさん
04/12/12 03:39:20
3341行目からの
----------------------------------------------------
if($PM{'res_go_up'} == 1){
undef $tp_match_flag;
local($tp_loop_counter)=0;
foreach $tmp_parent(@NEW_BLOODS){
# 3スレッドまで上へ持って行く
# それ以上にすると負荷が上がるのでやめる
last if($tp_loop_counter >= 3);
if(($tmp_parent eq "$9")||($tmp_parent eq "$11")){
$tp_match_flag = 1;
last;# 検出したら抜ける
}
$tp_loop_counter++;
}
if($tp_match_flag == 1){
push(@GOUP_MESSAGE, $_);
$all_message++;
}else{
push(@MESSAGE, $_);
$all_message++;
}
}else{
push(@MESSAGE, $_);
$all_message++;
}
----------------------------------------------------

541:nobodyさん
04/12/12 03:40:26
を下のように書き換えました

----------------------------------------------------
if($email == $sage){ #### $sage=sageというのを作った
push(@MESSAGE, $_);
$all_message++;
}
else{
undef $tp_match_flag;
local($tp_loop_counter)=0;
foreach $tmp_parent(@NEW_BLOODS){
# 3スレッドまで上へ持って行く
# それ以上にすると負荷が上がるのでやめる
last if($tp_loop_counter >= 3);
if(($tmp_parent eq "$9")||($tmp_parent eq "$11")){
$tp_match_flag = 1;
last;# 検出したら抜ける
}
$tp_loop_counter++;
}
if($tp_match_flag == 1){
push(@GOUP_MESSAGE, $_);
$all_message++;
}else{
push(@MESSAGE, $_);
$all_message++;
}
}
----------------------------------------------------


542:nobodyさん
04/12/12 04:12:51
そうした所レスのメール欄にsageを入れようが入れまいが
書き込むと上に上がらなくなってしまいました。
試しに変更した
if($email == $sage)

if($PM{'res_go_up'} == 0)
にしてレスを入れたらちゃんと上がりました。

if($email == $sage)
が間違えているのでしょうか?
どなたご教授頂けないでしょうか?
長くなってすみません。

543:nobodyさん
04/12/12 06:05:55
質問を全部読んでないが(^^;
== は数値の比較
eq が文字列の比較

544:539
04/12/12 08:03:13
>>543
ありがとうございます。
if($email eq $sage)が正しいようですね。
しかし今度は下がらなくなった。_| ̄|○

545:nobodyさん
04/12/12 17:10:46 cJqt4xtP
参考:URLリンク(www.kent-web.com)
依頼:携帯から投稿された絵文字が記録されているログを開き
$text = &emoji($text);
の様に絵文字変換ルーチンを通せば
携帯3キャリア相互変換、PC表示ができる様にさせたい。
&emoji; の部分をお願い致します。


546:nobodyさん
04/12/12 18:53:39
>>545
まず、>>1の(3)の真ん中を音読してもらおうか?

547:nobodyさん
04/12/14 09:19:31 Q99fVzSY
URLリンク(www.kit.hi-ho.ne.jp)
こちらで配布している「シンプル日記」の改造をお願いします
(作者さんが多忙のせいか、更新放置されているので・・・)

改造項目は日付の横に任意の画像アイコン(セレクトタグで)を載せたいです
自分で改造できなくて情けない・・・
宜しくお願いします

548:nobodyさん
04/12/14 10:10:33
>>547
スレ違い

■ 自分で改造できない場合には
【 スクリプト改造依頼スレ 】(丸投げ) part2
スレリンク(php板:2番)(テンプレ)

549:nobodyさん
04/12/14 11:04:42
>>548
ありがとう、移動します
スレ汚してごめんなさい

550:6
05/01/07 23:40:43
【.  CGI名  .】 電光! v.5.20
【配布先URL】 URLリンク(cgiscriptmarket.com)
【. 置き場所 .】 URLリンク(www36.tok2.com)
【ヘルプ内容】 
途中までやりましたがココからがわかりません。
・枠がどうしても青色。黒色に変えたい。枠の太さも1pxに。
・日付に「'」が入ってしまう。
・1 名前 : 内容  5/06 12:40 とひとつのformで表示したい。
・見かけ上だけ消してるだけなので要らないソースは消してしまいたいがどれを消していいかわからない。

お願いします。

551:nobodyさん
05/01/07 23:53:58
>>550
マルチ乙!

552:6
05/01/07 23:59:44
誘導されてきました。。
スレ違いですか?

553:nobodyさん
05/01/08 00:55:46
>>552
丸投げスレとperlスレみたいにあちこち書いてるだろ。
他のスレに書くなら取り消すなり移動する旨ぐらい書け。
だからマルチと言われる。
それに自分でいじってるんだろ?
だからここへ誘導されたんだ。

↓自分がどちらなのかよく考えろ。

■ 自分で改造できない場合には
【 スクリプト改造依頼スレ 】(丸投げ) part3
スレリンク(php板:2番)(テンプレ)

■ 自分で改造するアドバイスが欲しい場合には
★三 【 スクリプト改造工房 PART 8 】 ★三
スレリンク(php板:79番)(テンプレ)

554:6
05/01/08 16:21:33
こっちが★三 【 スクリプト改造工房 PART 8 】 ★三 で
・枠がどうしても青色。黒色に変えたい。枠の太さも1pxに。
・日付に「'」が入ってしまう。
こっちが★三 【 スクリプト改造工房 PART 8 】 ★三 です。
見かけ上だけ消してるだけなので要らないソースは消してしまいたいがどれを消していいかわからない。 rmで表示したい。
・1 名前 : 内容  5/06 12:40 とひとつのformで表示したい。

555:nobodyさん
05/01/14 22:12:47
【.  CGI名  .】 WwwSearch Ver3.15 - 検索フォーム
【配布先URL】 URLリンク(www.tohoho-web.com)
【ヘルプ内容】 検索結果を、5件ごとや10件ごとに表示させるようにしたいです
自分がいじった部分のソースを貼ります

sub search1 {
  local($dir) = $_[0];
  local(@filelist, $file, $filename);
  opendir(DIR, $dir);
  @filelist = readdir(DIR);
  closedir(DIR);
  $begin = $FORM{'page'} * $hyouji;
  $end = $bigin + $hyouji;
  if($end > @filelist) {
    $end = @filelist;
  }

(続く)



556:555
05/01/14 22:13:34
    #foreach $file (@filelist) {
    for ($a = $bigin; $a < $end; ++$a) {
    if ($file eq ".") { next; }
    if ($file eq "..") { next; }
    $filename = "$dir/$file";
    if (-d $filename) {
      if ($recursive_flag) {
        &search1($filename);
      }
    } else {
    &search2($filename, $dir);
    }
  }
  if ($end < @filelist) {
  $nextpage = $FORM{'page'} + 1;
  print "<a href=\"$ENV{'SCRIPT_NAME'}?page=$nextpage\">次へ</a>\n";
  }

# }
}



557:555
05/01/14 22:18:04
foreachのかわりにforでまわしてみたんですが
結果は検索が一件もされず「次へ」のみが表示されてしまいます
アドバイス、解決法よろしくお願いします


558:nobodyさん
05/01/15 19:29:07
>>555
久しぶりに改造工房にお客が来たのに放置されているなぁ~

sub search1の@filelistだが、お前はこの配列に検索に引っかかったものが入っていると思っているだろ?
残念。
@filelistには対象ディレクトリの中にある全てのファイルが格納されている。
試しに
closedir(DIR);
のあとに
errexit("@filelist");
って入れてごらんよ。

漏れならsub search1とsub search2を大改造しる。
opendir(DIR, $dir);
で、指定してた拡張子のファイルのみを
@filelistに入れていく。

559:555
05/01/15 23:08:47
>558
指摘、アドバイスありがとうございます
となるとforループ自体がおかしいことになりますね
なんだか煮詰まってテンパってきました
もちょっとガンガってみますです…

560:nobodyさん
05/01/16 03:38:30
KENTのBBSのソースでも眺めれ。
たいていは件数によって次ページ送りの機能がついているから。

561:nobodyさん
05/01/17 11:01:28 gvEGsU/w
丸投げの方で放置されそうな勢いなので、自分で努力しつつこちらで質問します。

【.  CGI名  .】 HiLink Type-B
【配布先URL】 URLリンク(www.e-hws.net)
簡易表示の方法をちょっと変えたいです。新着順とランキング順しかソート方法が無いのですが、
これをタイトル(サイト名)で50音表示できるように変更したいです。
利用方法としては「ランキング表示」リンクボタン(?)を「50音表示」とし、クリックするとで50音順で
並ぶというものです。
表示方法なんかを改造してるので、行数が合わないと思われるので、名前で場所を伝えます。

sub mainの「表示データ作成」にある「# ランキング表示の場合、ソートする」をどうにかしたら良いんですよね?
$ititleと$jtitleがサイト名のようです。
さらに、その下の「if( $iclicknum < $jclicknum ){」の部分を書き換えれば良いとは思うのですが…
素人ながらに「if( $ititle < $jtitle ){」ってしてみましたが、案の定変化無しです。
どのようにしたら50音順に並べる事が可能ですか?

宜しくお願いします。


562:nobodyさん
05/01/17 18:56:00
>>561
規約は読んだのか?
再配布禁止&&使用者はメールで届出の義務あり

563:555
05/01/18 19:32:37
>560
眺めて悩んでいたらなんかわかってきました
558さん560さん、アドバイスありがとうございました

564:nobodyさん
05/01/18 20:55:07
>>562
このスレは改造工房であり、改造済みのスクリプトを手渡すわけではないので再配布禁止には当たらないかと…
それにまだ改造したものを設置してないので、メールはまだしなくてもよいかと…

要するにヒントだけ与えれば質問者が何とかするって言うスレなので問題はないかと…

>>561
今ちょっと忙しいので、そのうちスクを見てみるわ。

565:nobodyさん
05/01/19 05:16:19
>>561
惜しい。
Perlは数値か文字列かで比較演算子が異なる。
< の代わりに gt を使えば丁度だな。

566:561
05/01/19 10:15:04 sYVj0TcQ
>>564 >>565
フォロー&返答ありがとうございます。

ばっちり出来ました。
文字列は数字じゃないから数字の演算式記号は使えないって事で覚えててOKでしょうか?

アドバイスありがとうございました!

567:730
05/01/23 11:37:56
他スレから誘導されて来ました。

会員制掲示板のPerlCGIスクリプトです。普通の掲示板(KENTさんの書籍のスクリプトを参考に、過去ログ
作成機能と検索機能を削除した)に、IP制限とパス制を組み合わせ改造しました。
✓で特定のIP(@allow)だったら認証画面(&admin)を出し、パスが合ったら掲示板を表示させる(&bbs)。
IPおよびパスが合わなければエラーを返す、・・・つもりでした。しかし下記のスクリプトでは認証画面は
表示しますが、パスを入力しても認証画面、パスミスでも認証画面になるという状態で、
どうにも煮詰まってしまいました。どこがおかしいのかご教授下さい。これでもIP制限は動作しています。

スクリプトはここにアップしました。該当部分だけ。
URLリンク(up.isp.2ch.net)


568:730
05/01/23 12:14:51
ついでにお聞きします。

【スクリプト名】
Web拍手(公式HPから配布版DL。2004年10月。)

【CGIソース】
kaiseki.cgiだけ。
URLリンク(up.isp.2ch.net)

【改造した内容】
●過去15日分のデータを保存し表示するのを、31日分にする。(crap.cgiとkaiseki.cgi)
●アクセス解析機能を追加し、拍手した人のホスト名をaccess.datに保存する。(crap.cgi)
●このスクリプトへアクセスしたときの画面にはaccess.datへのリンクを張る。
●DLしたままのスクリプトでは、解析グラフのタグがぐちゃぐちゃだったので
 そこも変更。時間ごとのグラフも縦表示から横表示に変更し、31日表示を
 しやすくした。
●グラフの画像も横表示に対応させた。
[現在困っていること]
上記改造を加えたあと先週までは問題なく動作していたのですが、今日アクセス
してみたらスクリプトエラーが発生していました。拍手機能は動作しています。
kaiseki.cgiは、上記改造後何も手を加えていないので普通は起こりえないエラーです。
ただ原因として、ローカルに保存していたこのスクリプト(アプロダに挙げたもの)が
間違っていて、サーバーで動作していたのはサーバー側で直接書きなおしたからでミラーリング
していなかった。それをFTPソフトの誤動作で全ファイルを送信したために、動かないローカルの
スクリプトで更新されてしまった・・・というのが考えられます。
#FTPソフトのログにはこのファイルを送信したという記録はないのですが、一昨日以前のログが
#消えているのでわからない。

そこでUPしたこのスクリプトを眺めてみたのですが、どこがおかしいのかわかりません。
pcheck.cgi(Perlスクリプト文法チェッカ)ではsyntax errorの発生はありませんでした。
なにか間違っているところがありましたら教えてください。


569:nobodyさん
05/01/23 13:17:49
>>567-568
アップ先が表示できません


570:567
05/01/23 16:52:48
ありゃ。失礼しました。申し訳ないです(大汗)
UPしなおしました。
>>567
URLリンク(yellow.ribbon.to)
>>568
URLリンク(yellow.ribbon.to)

571:555
05/01/23 22:33:51 a5mA126v
再びすみません

【.  CGI名  .】 WwwSearch Ver3.15 - 検索フォーム
【配布先URL】 URLリンク(www.tohoho-web.com)
【ヘルプ内容】 検索結果を、「次へ」ボタンを押して、次の件をひょうじさせたいです

5件ごとや10件ごとの表示は最初だけは表示できるようになりました
「次へ」ボタンを押して、次の件をひょうじさせたいのですが
うまくいきません
この文を最後に追加しました

print "<form method=\"POST\" action=\"$script?page=$page&word=$word\">\n";
print "<input type=\"submit\" value=\"次へ\">";
print "</form>";

「次へ」ボタンを押しても検索結果が出てきません
何かたりないのでしょうか
かなり悩みましたが答えが見つかりません
ヒント、アドバイスお願いします

572:nobodyさん
05/01/23 22:37:48
書き忘れました

>571の文の前に

$page=$FORM{'page'};
$word=$FORM{'word'};

を実行しています

$scriptには自身のCGIファイルの名前が入ってます

573:nobodyさん
05/01/24 00:23:35
>>572
掲示板スクリプトを拾って読んでみたら応用できるんじゃない?

574:nobodyさん
05/01/24 00:33:32
>>572
かなり勘で答えるけど、
<form method=\"POST\" action=\"$script?page=$page&word=$word\">
これをこんな風にしたらだめ?
<form method=\"POST\" action=\"$script¥">
<input type=\"hidden\" name=\"page\" value=\"$page\">
<input type=\"hidden\" name=\"word\" value=\"$word\">

それと、$pageが、ボタンを押したら変化する(=数字が増えたり減ったり)
ようになってますか?
(FORMのほうの数字が固定だったら、最初のページしか動かない。)

575:572
05/01/24 01:12:24
>573
掲示板スクリプト眺めてるんですが
一向にらちがあかないのです;;

>574
ありがとうございます
試してみましたが、結果はやっぱり同じでした
「次へ」を表示するとこまではいいんですが
押しても、検索フォームだけ出て結果は出ないのです

ソースも晒したほうがいいでしょうか?

576:572
05/01/24 01:16:02
>574
うっかりしてました
この文の直前に

$nextpage = $FORM{'page'} + 1;

をしています

print "<input type=\"hidden\" name=\"page\" value=\"$nextpage\">\n";

にしても結果変わらずです

577:nobodyさん
05/01/24 01:33:30
そんな送信する側の記述を書かれたってわかるわけない。
page=$pageとword=$wordという値を受け取ってどういう処理をさせてる?

578:572
05/01/24 09:52:41
>577
sub readform {
 if ($ENV{'REQUEST_METHOD'} eq "POST") {
  read(STDIN, $query_string, $ENV{'CONTENT_LENGTH'});
 } else {
  $query_string = $ENV{'QUERY_STRING'};
 }
 @a = split(/&/, $query_string);
 foreach $x (@a) {
  ($name, $value) = split(/=/, $x);
  $value =~ tr/+/ /;
  $value =~ s/%([0-9a-fA-F][0-9a-fA-F])/pack("C", hex($1))/eg;
  $FORM{$name} = $value;
}
}

の後

$page = $in{'page'};
$word = $in{'word'};

を実行してます
(続く)

579:572
05/01/24 10:03:39
(続き)
 if ($word =~ /[\x80-\xff]/) {
  # 日本語が含まれているフラグ
  $jflag = 1;# 日本語が含まれている
  # 一度EUCに変換する
  &jcode'convert(*word, "euc");
  # 全角空白を半角空白に置換する(EUCの空白は#A1A1)
  $word =~ s/([\x80-\xff][\x80-\xff]|[\x00-\x7f])/($1 eq "\xa1\xa1") ? " " : $1/eg;
  # SJISモードであればSJISに変換する
  if ($kcode_file eq "sjis") {
   &jcode'convert(*word, "sjis");
  }
 }

sub search1の中から抜粋
 if (defined($FORM{'WORD'})) {
  # メタ文字を無効化する
  if (!$jflag) {
   $word =~ s/([\+\*\.\?\^\$\[\-\]\|\(\)\\])/\\$1/g;
  }
  # 検索語を分割する
  @words = split(/ +/, $word);
  # 検索する
  print "<dl>\n";
  @dirs = split(/ +/, $target_dir);
  foreach $dir (@dirs) {
   &search1($dir);
  }


580:572
05/01/24 10:07:38
$pageは>576にも書いたのですが$nextpageにしてますので
今は使ってません
最初の一回目は5件表示されるのに
「次へ」を押すと検索フォームだけ出て、結果が出ないのがはがゆくてなりません
これで参考になりますでしょうか?

581:nobodyさん
05/01/24 10:18:02 f8wXJteD
>>580
Perlってデバッガ無いの?
PHPだとZend入れてればIEの右くりメニューからデバッガ起動するよ。

582:572
05/01/24 10:28:28
一番重要なトコ忘れてました
sub search2の中から抜粋
 $bigin = $FORM{'page'} * $hyouji;
 $end = $bigin + $hyouji;
 if($end > @filelist) {
  $end = @filelist;
 }
中略
if ($bigin <= $a) {
 if ($a < $end) {
  $h_k++;
  print "<dt>■ <a href=\"$target\" target=\"out\">";
  $title =~ s/<[^>]*(>|$)//g;
  $title =~ s/[\r\n]+//g;
  &jcode'convert(*title, $kcode_cgi);
  if ($title eq "") {
   $title = $target;
  }
  print "$title</a>\n";
  if ($print_filename) {
   print "( <a href=\"$target\" target=out>";
   $target =~ s/$tdir\/?//;
   print "$target</a> )\n";
  }
  print "<dd>";
  $imin = $i - $how_many_lines;
  if ($imin < 0) { $imin = 0; }
  $imax = $i + $how_many_lines;
  if ($imax > $#lines) { $imax = $#lines; }


583:nobodyさん
05/01/24 10:29:17 CX5KANJQ
  for ($j = $imin; $j <= $imax; $j++) {
   $line = $lines[$j];
   &jcode'convert(*line, "euc");
   line =~ s/<[^>]*(>|$)//g;
   $tmp = $word;
   &jcode'convert(*tmp, "euc");
   if ($jflag) {
    $tmp =~ s/([\+\*\.\?\^\$\[\-\]\|\(\)\\])/\\$1/g;
   }
   foreach $w (@words) {
    $w2 = $w;
    &jcode'convert(*w2, "euc");
    $line =~ s/($w2)/<b>$1<\/b>/ig;
   }
   &jcode'convert(*line, $kcode_cgi, "euc");
   print "$line ";
   if ($end >= @filelist) {
    exit;
   }
  }
  if ($h_k == $hyouji) {
  $nextpage = $FORM{'page'} + 1;
  print "<form method=\"POST\" action=\"$script\">\n";
  print "<input type=\"hidden\" name=\"page\" value=\"$nextpage\">\n";
  print "<input type=\"hidden\" name=\"word\" value=\"$word\">\n";
  print "<input type=\"submit\" value=\"次へ\">";
  print "</form>";
  }

 }
}


584:nobodyさん
05/01/24 12:14:55
部分だけじゃなくてどっかに全部うpしろや。

585:nobodyさん
05/01/24 12:35:13
>>567
✓ # アクセスチェック
if ($mode eq ''){ &admin; }
if ($FORM{'pass'} ne "$pass") {&error("パスワードが違います");}
if ($mode eq 'regist'){ ®ist; }
&bbs;
exit;
sub check { # アクセス制限
$host = gethostbyaddr(pack("C4", split(/\./, $ENV{'REMOTE_ADDR'})), 2) || $ENV{'REMOTE_ADDR'};
 foreach $i (@allow) {
  if ($host =~ /$i/) { return; }
 }
 &error("アクセスが許可されていません");
 exit;
}
sub admin { #認証
 &header;
print << "_ID";
<form action="$script" method="POST">
<input type=hidden mode=bbs size="8">
<input type=text name=pass size="8">
<input type=submit value="認証">
</form>
_ID
 &footer;
 exit;
}

全体がわからんけどこんなところか。
ただしこれだけじゃなくて全体にも手を入れないと動かんよ。


586:572
05/01/24 18:07:17
>584
うpしました
URLリンク(www.uploda.org)
受信パスは「cgi」です
よろしくお願いします

587:567
05/01/24 22:09:17
>>568解決しました。jcode.plのパスが違ってました。
わかってみれば、にんともかんとも(滅)
お騒がせしました。

>>566についてはまだです。
パス認証だけどうしてもうまくいきません(TT)

588:nobodyさん
05/01/25 04:15:56
URLリンク(www.net-easy.com)
のパスワード認証&自動発行スクリプト
URLリンク(cat.zero.ad.jp)

まず、115行のメールアドレス入力欄
<INPUT name="mail_add" size="30"><BR>
 を
<INPUT name="mail_add_a" size="30"><BR>
<select name="mail_add_b">
<option value="\@docomo.ne.jp">\@docomo.ne.jp</option>
<option value="\@ezweb.ne.jp">\@ezweb.ne.jp</option>
<option value="\@c3.ezweb.ne.jp">\@c3.ezweb.ne.jp</option>
</select>
のように2段階入力にして、
("mail_add_a"はメアドの@までのアカウント、
"mail_add_b"は@以降のドメイン名として代入)

147行 $mail_add = $in{'mail_add'}; の部分で
上記フォームから受け渡される"mail_add_a"と"mail_add_b"を連結して
変数 $mail_add に代入されるようにしたいのですが、
$in{'mail_add'}; の部分をどのように書き換えれば2つの文字列を連結させられるでしょうか?


589:588
05/01/25 04:31:03
付け足し
147行はメアドの書式をチェックする部分です。

590:nobodyさん
05/01/25 11:35:50
>>588
$mail_add = $in{'mail_add_a'} . $in{'mail_add_b'};

591:nobodyさん
05/01/25 21:21:27
>>590
解決しました。
vrytnx

592:572
05/01/27 21:43:23
忘れてました

# このスクリプトの名前
$script = "kensaku2.cgi";

(78~79行目辺り)の部分をスクリプトの名前に変えてください
よろしくお願いします

593:572=586
05/01/28 22:52:33 wG0bpuZu
うpしなおしました
URLリンク(www.uploda.org)

デバッグしてみると
「次へ」ボタンが押された時、検索語が受け渡されていないようです
どこをいじればいいかわからなくなってきました
アドバイスお願いします

594:nobodyさん
05/01/29 16:02:16 BgaXde9b
【.  CGI名  .】 Design BBS 1.80 【配布先URL】 URLリンク(prism-web.com)
【ヘルプ内容】 
このCGIについている、特定のIPからのアクセスを拒否するアクセス制限を、逆に特定のIPからのアクセスだけOKにするアクセス制限に変更したい。どうすればよいか。
DLしたままのファイルで、sub axs_checkのflagを逆にしてみたらスクリプトエラーになってしまい、他にどうすればよいかわからなくなった。
ーーここからスクリプト
@deny = (
"hogehoge.com",
);

&decode;  #フォームデコード
&axs_check; #アクセス制限
#(中略):フォームの設定が数行
&html;   #BBS本体表示

# アクセス制限
sub axs_check {
 &get_host;

 if ($deny[0]) {
  local($flag)=0;#ここを1にして・・・その下の$flag=1を0にするとスクリプトエラー。
  foreach (@deny) {
  #↓これは、@denyにないIPならループ抜けの意味ですよね?違う?(・・、
   if ($_ eq '') { last; }
   $_ =~ s/\*/\.\*/g;
   if ($host =~ /$_/) { $flag=1; last; }
  }
  if ($flag) { &error("許可されていないアクセスです!") }
 }
}


595:594
05/01/29 16:03:22
# ホスト名取得
sub get_host {
 $host = $ENV{'REMOTE_HOST'};
 $addr = $ENV{'REMOTE_ADDR'};

 # ホスト名取得に gethostbyaddr関数を使用する場合は$gethostbyaddr = 1;にします。
 $gethostbyaddr = 1;

 if ($gethostbyaddr) {
  if ($host eq "" || $host eq "$addr") {
   $host = gethostbyaddr(pack("C4", split(/\./, $addr)), 2);
  }
 }
 if ($host eq "") { $host = $addr; }
}

596:nobodyさん
05/01/29 16:57:47
>594-595
俺もperlをちょこっといじって遊んでるくらいの人間なんで、あんま自信ないけど・・・

 if ($deny[0]) {
  local($flag)=0;
  foreach (@deny) {
  #↓これは、@denyから取り出した内容($_)が空('')だったらループ抜け、だと思
   if ($_ eq '') { last; }
   $_ =~ s/\*/\.\*/g;
   if ($host =~ /$_/) { $flag=1; last; }
   #↑アクセスした人のホスト($host)に@denyから取り出した内容($_)が
   #↑含まれていたら$flagの値を1にしてループを抜ける
   #↑つまり「$flag==1なら拒否」
   # これを「$flag==1なら許可」に変えたい → 言い換えると「$flag=!1なら拒否」
  }
  if ($flag=!1) { &error("許可されていないアクセスです!") }
  #↑ということでここをこう変更すればいけるんでは?
 }

ただ「特定のIPからの制限」なら、$hostじゃなくて$addrにするべきなんじゃ?って気がするけど



597:594
05/01/29 21:54:11
>>596
if ($flag=!1) { &error("許可されていないアクセスです!") }
これだと500エラーになってしまいましたです。

if ($flag ne "1") にしてみましたが、こっちも500エラー。
if ($flag = "0")も500エラーでした。
>>594だったらちゃんと動作するんですけど・・・(><)

598:594
05/01/29 22:21:41
フラグを使わない方法を考えてみましたが・・・
sub axs_check {
 # ホスト名を取得
 &get_host;
 if ($deny[0]) {
  foreach (@deny) {
   if ($_ eq '') { &error("許可されていないアクセスです"); last;}
   $_ =~ s/\*/\.\*/g;
   if ($host eq~ /$_/) { last;}
   #こうしたら、@denyのIPでのアクセスがエラーになる。
   #$host ne にするとスクリプトエラーに。
  }
 }
}
お手上げです(TT)

599:594
05/01/30 01:16:06
たぶんできました。
sub axs_check {
 # ホスト名を取得
 &get_host;
 if ($deny[0]) {
  local($flag)=0;
  foreach (@deny) {
   $_ =~ s/\*/\.\*/g;
   if ($host =~ /$_/) { $flag=1; last; }
  }
  if (!$flag) { &error("許可されていないアクセスです!") ; exit;}
 }
}
これで何とか動作しました。
>>596さん、いろいろヒントありがとうでした。
>>595
>if ($_ eq '') { last; }
これ、@denyが空の設定がありうる、ということを失念しておりました(^-^;
#だってデフォルトからして空ではなかったので、なんて言い訳してみるテスト(ぉぉ

600:nobodyさん
05/01/30 05:18:46
つか、500エラーに対処できないのかね?
多分こいつは共有サーバでテストしながら改造している希ガス

601:594
05/01/30 11:57:38
なんかエラった(汗)

>>600
文法チェックの結果エラーがなく、
InternalServerErrorになる理由がわからないというだけの話です。
IPの判断に関してはローカルではテストできないので
確かに共有鯖にしましたけど、
ローカルでテストする方法あります?

602:nobodyさん
05/01/30 12:02:58
>>601
500エラーについて
CGI設置について質問 【Part2】
スレリンク(php板:2番)


603:nobodyさん
05/01/30 17:01:23
>>601
&get_host; をコメントアウトして代わりに
$host = 'ダミーのアドレス';を書けばいいだろ

604:nobodyさん
05/01/31 23:38:23
質問にあったスレが見当たらないのでお邪魔します
CGI配布場所  URLリンク(sugachan.dip.jp)
サンプル  URLリンク(sugachan.dip.jp)
特定IP・串からのアクセス・DLを弾きたいのですが
特定IPの場合
$set{'deny_host'} = ' ';に何を入れればいいのでしょうか?
そして上にIPを入れた場合は直リンからのDLも防げるのでしょうか
検索してみたのですがわけがわからず途方にくれています

605:nobodyさん
05/01/31 23:52:38
>>604
ここは改造スレなのでスレ違い。

CGI設置について質問 【Part2】
スレリンク(php板)

606:nobodyさん
05/02/03 10:49:14
丸投げスレッドから来ました。
期限が近いのでどうぞよろしくお願いします
【.  CGI名  .】 検索専用データベース Ver2.04
【配布先URL】 URLリンク(cgiroom.nu)
【. 置き場所 .】 URLリンク(hpcgi2.nifty.com)
【 依頼期限 】 出来れば1週間ほどで。
【. 依頼内容 】検索結果に画像を表示、新着情報等がわかるように。
の2点をしたいのですが、よくわかりません。
理想としては
URLリンク(rikunabi-next.yahoo.co.jp)
のような感じにしたいです。
どうぞよろしくお願いします。

607:nobodyさん
05/02/03 15:09:30
>>606
>丸投げスレッドから来ました。
>期限が近いのでどうぞよろしくお願いします

(゚Д゚)ハァ? スレ違いは帰れ

608:nobodyさん
05/02/04 00:30:42
>605
改造だと思っていたのですが、違っていたのですね
お礼が遅れてすいませんでした
ありがとうございます

609:606
05/02/04 10:07:39 x2xOcYLj
すみません、書き方がおかしかったです。
丸投ではなく、出来るだけ自分でどうにかしたいので
改造の方に来ました。という意味です。
>607様わかってもらえたでしょうか?

610:nobodyさん
05/02/04 11:25:07
>>609
要するにマルチって事だろ?
期限って何よ?

611:nobodyさん
05/02/04 13:47:30
>>610
期限は前スレッドで記入するところがあったので
そのまま流用してみました。
期限を決め、大体そのくらいで出来ればいいな。
という希望的観測も含まれています。
前スレッドに移動しますと言う旨を書いてるので
マルチではないかと思いますがどうでしょうか?
分かりにくくてすみません。


612:nobodyさん
05/02/05 09:23:59
omae no taido ga kiniiran

613:nobodyさん
05/02/05 18:32:34
態度が悪く申し訳ありません。
悪かった点がありましたら、謝りますので
どうにかしていただけないでしょうか?


614:nobodyさん
05/02/06 05:14:40
やっぱ人に依存しっぱなしのヤツってどっか抜けてるんだな。


漏れもperlの文法とかはさっぱりだけど、
最低限自分のしたいようにするためにhtmlの出力部分をいじったり
どの変数がどういう処理に回されてるかを必死ににらめっこして自分なりに判断して、
その上で具体的にどの部分をどうしたいかを明記するもんだと思うんだけどね。

質問があまりにも抽象的だったり漠然としすぎているから
正直誰も答えようがないし、答える気もしないんじゃないかな。

2chでは社交辞令的な事には誰も関心なくて、
用件をはっきり伝えて手短に済ませるってなスタイルが定着してると思うしね。

615:nobodyさん
05/02/07 02:06:50
「俺パソコンとかよくわかんねーからさぁ」って、開き直ってる人が多いッす。
大抵は少し経てばそういう気分は抜けて「そろそろ俺も中級者って感じィ♪」と思うんだけど、新しい分野に取り組むと
またお手上げ状態…みたいな。
身近にそういう人が何人かいるのでよくわかるッす。
まあ、なんでもかんでもそうですけど、わからなくてもとりあえずチャレンジすることって大切ッす。
いや勿論、責任の取れる範囲でのハナシッす。

>>14みたいな文は誘導のテンプレにしたいッす。

616:nobodyさん
05/02/07 12:32:17
社交辞令っつーかさ「ひとまず謝ってみた」って姿勢がな。
あと「ドーユーアンダスタン?」な返答って「アンタ馬鹿?」って言ってんのに等しいぞ。
教えを請う態度じゃないよね。やる気の問題。

丸投げスレじゃなくてさ、改造スレなんだから。
まずおまぃさんのスキルが不明、prog理解度が不明。
何をやってみてどうダメだったのかのかが不明。

ソース丸ごと表示して「○○行目に以下を追加して~」
「□□を△△に書き直して~」とか言って欲しいのか?
それは丸投げっていうんだぞ。

お前宿題って先生に答え聞いてノートに丸写しする事だと思ってなぃ?


617:nobodyさん
05/02/07 12:35:44
どっちにしろここでも丸投げでももう相手にされないから諦めるだろ

618:nobodyさん
05/02/07 18:10:45
どこがどう解らないかを提示できないってのは、
理解しようという意識が薄い顕れだからね。
1つ問題が解決できても、また同じような事で質問してくる確変パターンに繋がるのが
オチだし

619:nobodyさん
05/02/07 18:52:22
omae no taido ga kiniiran

620:nobodyさん
05/02/10 20:59:03
BBQ あらしお断りシステム
URLリンク(bbq.uso800.net)
URLリンク(bbq.uso800.net)
を掲示板に組み込みたいのですが、ソースをそのままコピペしてもできません。
どこを変えればいいか教えて頂けないでしょうか?

621:nobodyさん
05/02/11 01:05:32
>>620
エスパーキボンヌですか?

622:nobodyさん
05/02/11 03:01:13
既存のcgiに下のような環境変数のアクセスをはじく機能をつけたいのですが
どんな風に追加したらいいのでしょう?

'HTTP_VIA',
'HTTP_X_FORWARDED_FOR',
'VIA',
'HTTP_FORWARDED',
'FORWARDED',
'HTTP_X_BLUECOAT_VIA',
'HTTP_PROXY____',
'HTTP_PROXY___________',
'HTTP_PROXY_CONNECTION',
'HTTP_X_HOST',
'HTTP_X_REFERER',
'HTTP_X_SERVER_HOSTNAME',
'PROXY_HOST',
'PROXY_PORT',
'PROXY_REQUEST',
'HTTP_CLIENT_IP',
'HTTP_PRAGMA'

623:nobodyさん
05/02/11 04:27:14
「既存のcgi」って言われても、千差万別。何につけたいんだ?

624:622
05/02/11 11:59:46
bbsのcgiです。
例えばkentのとか。
URLリンク(www.kent-web.com)


625:nobodyさん
05/02/11 14:26:33 5gSqwCgm
はじめまして。自分の手ではどうしても改造しきれなかったのでここで質問させていただきます。
配布元:URLリンク(dream.lib.net)
スクリプト名:Power Search
登録式のサーチエンジンです。
マークサイトというものを複数登録する事ができるのですが、仕様では8個までしか登録できません。
これを22個登録できるように改造したいのですがうまくいきません。
ps_user.cgiの313~324行目あたりの
☆マーク<br>
EOD
for (0 .. 7){
next if $marks[$_][1] eq "";
if ($data =~ /^\d*$_\d*</){
$buffer2.="<input type=\"checkbox\" name=\"sitemark\" value=$_ checked>$marks[$_][0]<br>\n";
}else{
$buffer2.="<input type=\"checkbox\" name=\"sitemark\" value=$_>$marks[$_][0]<br>\n";
}
}
$buffer2.="<br>";
$buffer3 = <<EOD;
を改造し、22個のマークが表示されるようにはなったのですが
チェックしていないチェックボックスにチェックが入ってしまうという不具合が起こりました。
よろしければ問題点を教えてください。


626:nobodyさん
05/02/11 17:27:38
W3C形式の日時を YYYY年 MM月 DD日 hh時 mm分 に変換したいです。

参考
Perlメモ/W3C形式の日時の解析
URLリンク(digit.que.ne.jp)

2005-02-10T14:54:18+09:00 を変換する場合、どう書けばいいのでしょうか?

627:nobodyさん
05/02/11 19:56:25
>>626
マッチや split

628:nobodyさん
05/02/12 05:57:07
>626
マルチすんな、ヴォケ。

スレリンク(php板:331番)

629:nobodyさん
05/02/12 14:58:20
cgiにこういうのを入れて、リストにあるIPを弾いています。
これを逆にリストにあるIPだけ許可できるように改造できないでしょうか?
お願いします。

&hostcheck;
sub hostcheck{
local($host_file,$remote_host,$line);
local(@lines);
$host_file = './host.dat';
$host=$ENV{'REMOTE_HOST'};
open(DB,"$host_file") || die "Cannot Open Log File $host_file: $!";
@lines = <DB>;
close(DB);
foreach $line (@lines) {
next if(length($line)<4);
chop $line;
if( $host=~/$line/ ){print "Status: 204\n\n";exit;}
}
}#hostcheck END

630:nobodyさん
05/02/12 15:56:04
>629
if( $host=~/$line/ ){print "Status: 204\n\n";exit;}
この{ }の中を許可したIP用の対応に書き換える↑

631:nobodyさん
05/02/12 16:22:03
>>629
$ENV{'REMOTE_HOST'};でホスト名を返さないサーバが多数。
ドツボにはまる予感がするぞ。

632:625
05/02/12 18:19:25
丸投げスレへ行きます。ありがとうございました

633:629
05/02/14 19:08:26
&hostcheck;
sub hostcheck{
local($host_file,$remote_host,$line);
local(@lines);
$host_file = './host.dat';
$jump = "./abc.html";
$host=$ENV{'REMOTE_HOST'};
open(DB,"$host_file") || die "Cannot Open Log File $host_file: $!";
@lines = <DB>;
close(DB);
foreach $line (@lines) {
next if(length($line)<4);
chop $line;
if( $host=~/$line/ ){print "Location: $jump\n\n";exit;}}
}#hostcheck END

こういう感じで特定のファイルにアクセスさせればいいのでしょうか・・

634:nobodyさん
05/02/14 23:47:48
■ 自分で改造する時にアドバイスが欲しい場合には
★三 【 スクリプト改造工房 PART 8 】 ★三
スレリンク(php板:79番)(テンプレ)

635:nobodyさん
05/02/15 12:28:07
はじめまして、少し質問させてください。
URLリンク(www.hot-dining.com) 
で配布されています 「256palette」というカラーパレットのCGI(PHP)を、
URLリンク(useyan.pupu.jp)に組み込みたいのですが、
上手く動かず分からなくなったので伺ってみました。

上記「Twin」チャットの動作サンプルがコチラで、
URLリンク(useyan.pupu.jp) 

コチラの「じぶんいろ」という文字にリンクを貼り、となりのテキストボックスで動作するように
256paletteを組み込みたいのですが、twin.cgiのheadタグ内に設置手順①を貼り付け、

446行目を
<form action="$script" method="get" target="_self">

<form name="mae" action="$script" method="get" target="_self">

469・470行目を
<input type="text" name="irom" size=10 value="$cirom" class="text">
<font $fontm><b>じぶんいろ</b></font></font>

<input type="text" name="iroa" size=10 value="$cirom" class="text">
<font $fontm><b>【<a href="javascript:wopen('256palette/palette.php?form=mae&name=iroa')">じぶんいろ</a.>】</b></font></font>

としましたが、スクリプトのエラーとウィンドウの下に出て動きません。
このCGI自体は説明どおりの階層に設置して動作を確認しております。
iromをiroaと変えたのは入室後も同じ名前のテキストボックスもあったからで、
この追加機能を入室後もつかえるようにしたいのですが。

宜しければお教えください、お願いします。M(_)m


次ページ
最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch