★三　【 スクリプト改造工房 PART 8 】　★三

1 名前：sage mailto:sage [04/02/23 17:36 ID:???] #================================ # スレッドの説明 #================================ 「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。 質問するときは以下の点に注意して書いて下さい (1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い) (2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し) (3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い ※答えてくれないからといって逆ギレする厨はお断り 前スレ　pc2.2ch.net/test/read.cgi/php/1063780103/ 590 名前：nobodyさん mailto:sage [05/01/25 11:35:50 ID:???] >>588 $mail_add = $in{'mail_add_a'} . $in{'mail_add_b'}; 591 名前：nobodyさん mailto:sage [05/01/25 21:21:27 ID:???] >>590 解決しました。 vrytnx 592 名前：572 mailto:sage [05/01/27 21:43:23 ID:???] 忘れてました # このスクリプトの名前 $script = "kensaku2.cgi"; （78〜79行目辺り）の部分をスクリプトの名前に変えてください よろしくお願いします 593 名前：572=586 [05/01/28 22:52:33 ID:wG0bpuZu] うｐしなおしました ttp://www.uploda.org/upload.cgi?mode=dl&file=36634 デバッグしてみると 「次へ」ボタンが押された時、検索語が受け渡されていないようです どこをいじればいいかわからなくなってきました アドバイスお願いします 594 名前：nobodyさん [05/01/29 16:02:16 ID:BgaXde9b] 【.　 CGI名 　.】　Design BBS 1.80 【配布先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 mailto:sage [05/01/29 16:03:22 ID:???] # ホスト名取得 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さん mailto:sage [05/01/29 16:57:47 ID:???] >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 mailto:sage [05/01/29 21:54:11 ID:???] >>596 if ($flag=!1) { &error("許可されていないアクセスです！") } これだと500エラーになってしまいましたです。 で if ($flag ne "1") にしてみましたが、こっちも500エラー。 if ($flag = "0")も500エラーでした。 >>594だったらちゃんと動作するんですけど･･･（＞＜） 598 名前：594 mailto:sage [05/01/29 22:21:41 ID:???] フラグを使わない方法を考えてみましたが・・・ 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 mailto:sage [05/01/30 01:16:06 ID:???] たぶんできました。 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さん mailto:sage [05/01/30 05:18:46 ID:???] つか、500エラーに対処できないのかね？ 多分こいつは共有サーバでテストしながら改造している希ガス 601 名前：594 mailto:sage [05/01/30 11:57:38 ID:???] なんかエラった（汗） >>600 文法チェックの結果エラーがなく、 InternalServerErrorになる理由がわからないというだけの話です。 IPの判断に関してはローカルではテストできないので 確かに共有鯖にしましたけど、 ローカルでテストする方法あります？ 602 名前：nobodyさん mailto:sage [05/01/30 12:02:58 ID:???] >>601 500エラーについて ＣＧＩ設置について質問　【Part2】 pc5.2ch.net/test/read.cgi/php/1104624784/2 603 名前：nobodyさん mailto:sage [05/01/30 17:01:23 ID:???] >>601 &get_host; をコメントアウトして代わりに $host = 'ダミーのアドレス';を書けばいいだろ 604 名前：nobodyさん mailto:sage [05/01/31 23:38:23 ID:???] 質問にあったスレが見当たらないのでお邪魔します CGI配布場所　　ttp://sugachan.dip.jp/download/ サンプル　　ttp://sugachan.dip.jp/download/sample/upload.html 特定IP・串からのアクセス・DLを弾きたいのですが 特定IPの場合 $set{'deny_host'} = '　';に何を入れればいいのでしょうか？ そして上にIPを入れた場合は直リンからのDLも防げるのでしょうか 検索してみたのですがわけがわからず途方にくれています 605 名前：nobodyさん mailto:sage [05/01/31 23:52:38 ID:???] >>604 ここは改造スレなのでスレ違い。 ＣＧＩ設置について質問　【Part2】 pc5.2ch.net/test/read.cgi/php/1104624784/ 606 名前：nobodyさん mailto:age [05/02/03 10:49:14 ID:???] 丸投げスレッドから来ました。 期限が近いのでどうぞよろしくお願いします 【.　 CGI名 　.】　検索専用データベース Ver2.04 【配布先URL】　ttp://cgiroom.nu/ 【. 置き場所 .】　ttp://hpcgi2.nifty.com/wanchan/downlode.cgi/database2_04.lzh 【 依頼期限 】　出来れば１週間ほどで。 【. 依頼内容 】検索結果に画像を表示、新着情報等がわかるように。 の２点をしたいのですが、よくわかりません。 理想としては ttp://rikunabi-next.yahoo.co.jp/rnc/docs/cp_s00010.jsp のような感じにしたいです。 どうぞよろしくお願いします。 607 名前：nobodyさん mailto:sage [05/02/03 15:09:30 ID:???] >>606 ＞丸投げスレッドから来ました。 ＞期限が近いのでどうぞよろしくお願いします (ﾟДﾟ)ﾊｧ?　スレ違いは帰れ 608 名前：nobodyさん mailto:sage [05/02/04 00:30:42 ID:???] >605 改造だと思っていたのですが、違っていたのですね お礼が遅れてすいませんでした ありがとうございます 609 名前：606 [05/02/04 10:07:39 ID:x2xOcYLj] すみません、書き方がおかしかったです。 丸投ではなく、出来るだけ自分でどうにかしたいので 改造の方に来ました。という意味です。 >607様わかってもらえたでしょうか？ 610 名前：nobodyさん mailto:sage [05/02/04 11:25:07 ID:???] >>609 要するにマルチって事だろ？ 期限って何よ？ 611 名前：nobodyさん mailto:sage [05/02/04 13:47:30 ID:???] >>610 期限は前スレッドで記入するところがあったので そのまま流用してみました。 期限を決め、大体そのくらいで出来ればいいな。 という希望的観測も含まれています。 前スレッドに移動しますと言う旨を書いてるので マルチではないかと思いますがどうでしょうか？ 分かりにくくてすみません。 612 名前：nobodyさん mailto:sage [05/02/05 09:23:59 ID:???] omae no taido ga kiniiran 613 名前：nobodyさん mailto:sage [05/02/05 18:32:34 ID:???] 態度が悪く申し訳ありません。 悪かった点がありましたら、謝りますので どうにかしていただけないでしょうか？ 614 名前：nobodyさん mailto:sage [05/02/06 05:14:40 ID:???] やっぱ人に依存しっぱなしのﾔﾂってどっか抜けてるんだな。 漏れもperlの文法とかはさっぱりだけど、 最低限自分のしたいようにするためにhtmlの出力部分をいじったり どの変数がどういう処理に回されてるかを必死ににらめっこして自分なりに判断して、 その上で具体的にどの部分をどうしたいかを明記するもんだと思うんだけどね。 質問があまりにも抽象的だったり漠然としすぎているから 正直誰も答えようがないし、答える気もしないんじゃないかな。 2chでは社交辞令的な事には誰も関心なくて、 用件をはっきり伝えて手短に済ませるってなｽﾀｲﾙが定着してると思うしね。 615 名前：nobodyさん mailto:sage [05/02/07 02:06:50 ID:???] 「俺パソコンとかよくわかんねーからさぁ」って、開き直ってる人が多いｯす。 大抵は少し経てばそういう気分は抜けて「そろそろ俺も中級者って感じィ♪」と思うんだけど、新しい分野に取り組むと またお手上げ状態…みたいな。 身近にそういう人が何人かいるのでよくわかるｯす。 まあ、なんでもかんでもそうですけど、わからなくてもとりあえずチャレンジすることって大切ｯす。 いや勿論、責任の取れる範囲でのハナシｯす。 >>14みたいな文は誘導のテンプレにしたいｯす。 616 名前：nobodyさん mailto:sage [05/02/07 12:32:17 ID:???] 社交辞令っつーかさ「ひとまず謝ってみた」って姿勢がな。 あと「ﾄﾞｰﾕｰｱﾝﾀﾞｽﾀﾝ?」な返答って「ｱﾝﾀ馬鹿?」って言ってんのに等しいぞ。 教えを請う態度じゃないよね。やる気の問題。 丸投げスレじゃなくてさ、改造スレなんだから。 まずおまぃさんのスキルが不明、prog理解度が不明。 何をやってみてどうダメだったのかのかが不明。 ソース丸ごと表示して「○○行目に以下を追加して〜」 「□□を△△に書き直して〜」とか言って欲しいのか？ それは丸投げっていうんだぞ。 お前宿題って先生に答え聞いてノートに丸写しする事だと思ってなぃ？ 617 名前：nobodyさん mailto:sage [05/02/07 12:35:44 ID:???] どっちにしろここでも丸投げでももう相手にされないから諦めるだろ 618 名前：nobodyさん mailto:sage [05/02/07 18:10:45 ID:???] どこがどう解らないかを提示できないってのは、 理解しようという意識が薄い顕れだからね。 1つ問題が解決できても、また同じような事で質問してくる確変パターンに繋がるのが オチだし 619 名前：nobodyさん mailto:sage [05/02/07 18:52:22 ID:???] omae no taido ga kiniiran 620 名前：nobodyさん mailto:sage [05/02/10 20:59:03 ID:???] BBQ あらしお断りシステム bbq.uso800.net/ bbq.uso800.net/code.html を掲示板に組み込みたいのですが、ソースをそのままコピペしてもできません。 どこを変えればいいか教えて頂けないでしょうか？ 621 名前：nobodyさん mailto:sage [05/02/11 01:05:32 ID:???] >>620 ｴｽﾊﾟｰｷﾎﾞﾝﾇですか？ 622 名前：nobodyさん mailto:sage [05/02/11 03:01:13 ID:???] 既存の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さん mailto:sage [05/02/11 04:27:14 ID:???] 「既存のcgi」って言われても、千差万別。何につけたいんだ？ 624 名前：622 mailto:sage [05/02/11 11:59:46 ID:???] bbsのcgiです。 例えばkentのとか。 www.kent-web.com/bbs/index.html 625 名前：nobodyさん [05/02/11 14:26:33 ID:5gSqwCgm] はじめまして。自分の手ではどうしても改造しきれなかったのでここで質問させていただきます。 配布元：dream.lib.net/room/ スクリプト名：Power Search 登録式のサーチエンジンです。 マークサイトというものを複数登録する事ができるのですが、仕様では８個までしか登録できません。 これを２２個登録できるように改造したいのですがうまくいきません。 ps_user.cgiの３１３〜３２４行目あたりの ☆マーク<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さん mailto:sage [05/02/11 17:27:38 ID:???] W3C形式の日時を YYYY年 MM月 DD日 hh時 mm分 に変換したいです。 参考 Perlメモ/W3C形式の日時の解析 digit.que.ne.jp/work/index.cgi?Perl%A5%E1%A5%E2%2FW3C%B7%C1%BC%B0%A4%CE%C6%FC%BB%FE%A4%CE%B2%F2%C0%CF 2005-02-10T14:54:18+09:00　を変換する場合、どう書けばいいのでしょうか？ 627 名前：nobodyさん mailto:sage [05/02/11 19:56:25 ID:???] >>626 マッチや split 628 名前：nobodyさん mailto:sage [05/02/12 05:57:07 ID:???] >626 マルチすんな、ヴォケ。 pc5.2ch.net/test/read.cgi/php/1106816922/331 629 名前：nobodyさん mailto:sage [05/02/12 14:58:20 ID:???] 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さん mailto:sage [05/02/12 15:56:04 ID:???] >629 if( $host=~/$line/ ){print "Status: 204\n\n";exit;} この{　}の中を許可したIP用の対応に書き換える↑ 631 名前：nobodyさん mailto:sage [05/02/12 16:22:03 ID:???] >>629 $ENV{'REMOTE_HOST'};でホスト名を返さないサーバが多数。 ドツボにはまる予感がするぞ。 632 名前：625 mailto:sage [05/02/12 18:19:25 ID:???] 丸投げスレへ行きます。ありがとうございました 633 名前：629 mailto:sage [05/02/14 19:08:26 ID:???] &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さん mailto:sage [05/02/14 23:47:48 ID:???] ■ 自分で改造する時にアドバイスが欲しい場合には ★三　【 スクリプト改造工房 PART 8 】　★三 pc5.2ch.net/test/read.cgi/php/1077525387/79（テンプレ） 635 名前：nobodyさん mailto:sage [05/02/15 12:28:07 ID:???] はじめまして、少し質問させてください。 www.hot-dining.com/free_cgi/256palette.php　 で配布されています　「256palette」というカラーパレットのCGI(ＰＨＰ）を、 useyan.pupu.jp/s/cgis/twin.htmlに組み込みたいのですが、 上手く動かず分からなくなったので伺ってみました。 上記「Twin」チャットの動作サンプルがコチラで、 useyan.pupu.jp/s/twins/　 コチラの「じぶんいろ」という文字にリンクを貼り、となりのテキストボックスで動作するように 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（＿）ｍ 636 名前：nobodyさん mailto:sage [05/02/15 17:26:48 ID:???] 256paletteは捨てて他のを探したほうがいいと思う 637 名前：zoooe mailto:sage [05/02/18 07:05:00 ID:???] pc5.2ch.net/test/read.cgi/php/1104624784/l50 から来ました。 【　 CGI名 　】カラーBBS Ver.2.02 【配布先URL】ttp://www.cgi-down.com/cgi/c-bbs.php 【設置サーバ】lolopop 【 質問内容 】“投稿者：[ あああ ] 　投稿日：[ 2005年02月12日(土) 13時18分26秒 ]” の部分を、例えば“wrote by： あああ 02/17/2005(thu) 13:18:26 ” と英語に変えたいのですが、何度やっても500エラーになってしまします。 投稿者→wrote by　だけでもエラーです。 どなたか解決法をご存知でしたらご指導いただけないでしょうか？ # 曜日を日本語化 @week = ('日','月','火','水','木','金','土'); $wday = $week[$wday]; local($date) = "$year年$mon月$mday日($wday) $hour時$min分$sec秒"; return ($date); の部分を変えてもダメなのでしょうか？それともjcode.plの方をいじるんですか？ 638 名前：zoooe mailto:sage [05/02/18 07:06:08 ID:???] 続き # 記事の表示 print "<hr size=0 color=$hr_color><BR><CENTER>\n"; for ($i = $end_page;$i<$end_list;$i++) { local($main,$re) = split(/★/,$DATE[$i]); chop($re); local($number,$date,$name,$title,$mail,$hpurl,$com,$tc,$kc) = split(/☆/,$main); $name =~ s/\0/☆/g; $title =~ s/\0/☆/g; $com =~ s/\0/☆/g; print "<FORM ACTION=\"$cgifile\" METHOD=\"post\">\n"; print "<TABLE WIDTH=$kizi_wid BORDER=0 bgcolor=$main_tccolor cellpadding=0 cellspacing=0><TR><TD>\n"; print "<TABLE WIDTH=100% BORDER=0>\n"; print "<TR><TD BGCOLOR=$title_bgcolor WIDTH=95%>\n"; print "<FONT COLOR=$tc[$tc] SIZE=4><B>$title</B></FONT>　[$number]</TD>\n"; print "<TD BGCOLOR=$title_bgcolor WIDTH=5%><INPUT TYPE=\"submit\" VALUE=\"RES\"></TD></TR>\n"; print "<TR><TD WIDTH=100%>投稿者：[ <B>$name</B> ]\n"; if ($mail ne '') { print "<A HREF=\"mailto:$mail\"><IMG SRC=\"$mail_gif\" WIDTH=40 HEIGHT=15 ALT=\"$name\" BORDER=0></A>\n"; } if ($hpurl ne '') { print "<A HREF=\"$hpurl\"><IMG SRC=\"$home_gif\" WIDTH=40 HEIGHT=15 ALT=\"ホームページ\" BORDER=0></A>\n"; } print "　投稿日：[ $date ]</TD></TR>\n"; print "<INPUT TYPE=\"hidden\" NAME=\"ac\" VALUE=\"return\">\n"; print "<INPUT TYPE=\"hidden\" NAME=\"res\" VALUE=\"$number\">\n"; print "<INPUT TYPE=\"hidden\" NAME=\"title\" VALUE=\"$title\">\n"; print "<TR><TD><BLOCKQUOTE>\n"; print "<P><FONT COLOR=$kc[$kc]>$com</FONT></P>\n"; print "</BLOCKQUOTE></TD></TR>\n\n"; ここを英語に変えたらエラーになります。よろしくお願い致します。 639 名前：nobodyさん mailto:sage [05/02/18 09:03:36 ID:???] そこ変えただけでエラーになるのは有り得ない気がする。 perl -c のチェックは通る？ それか、修正してセーブしたときに日本語文字コードがEUCからSJISに変わってるとかありそう。 640 名前：nobodyさん [05/02/19 02:37:51 ID:JY0g4Gmr] すいません、教えて下さい。 メールフォームで特定アドレスの受信拒否を行えるスクリプトを見つけたのですが、スクリプトを編集して禁止アドレスを登録しなければいけない為、随時更新する手間が大きく、 できれば別ファイルでそれの管理ができないものか、と悩んでおります。 元スクリプトは、KentWebさんのPostMail v2.41の改造バージョン、PostMail RDです。 ttp://planet.cside5.com/csw/free/mailrd.html @errmail = ('nomail@xxx.com','xxx@nomail.com'); 　（入力エラーとするメールアドレスです。シングルクォーテーションで囲みながらいくつでも指定することができます） この部分なのですが、別ファイル（csvやtxt等）で管理する方法ありませんでしょうか？ タブや＜＞区切りでは、編集しにくいのでできればcsvがいいのですが・・・ 641 名前：zoooe mailto:sage [05/02/19 03:43:57 ID:???] >>639 さん 大変ありがとうございました。 『そこ変えただけでエラーになるのは有り得ない気がする。』 と言うのを参考に、普通にメモ帳で編集してUPしたら、できました。 お礼が遅くなってしまってごめんなさい。 642 名前：nobodyさん [05/02/21 14:41:10 ID:xjZaU2mS] 【.　 CGI名 　.】　shiory diary Ver2.0 【配布先URL】　ttp://www.area-s.com/ 【. 置き場所 .】　ttp://www.area-s.com/main/sdy.html 【 依頼期限 】　今週中 【. 依頼内容 】 デフォルトの表示幅が400pxになっているのですが、これを344pxの画像枠に縮めたいです。 tableで400となった箇所を344に変えてみましたが、どうしても日記の記事がはみ出てしまいます。 どうかよろしくお願いします。 643 名前：nobodyさん mailto:sage [05/02/21 15:20:55 ID:???] >>642 別に記事はみ出なかったけど？ 使ってるブラウザが悪いんじゃないの？ 644 名前：nobodyさん mailto:sage [05/02/21 15:22:29 ID:???] CGIの改造じゃなくてHTML（CSS？）の問題ってことで 板違いだな 645 名前：642 mailto:sage [05/02/21 17:09:59 ID:???] 何度か再アップロードしたらちゃんと表示されました なんだったんだ・・・ スレ汚しすみませんでした 646 名前：nobodyさん [05/02/24 10:56:33 ID:QVcBOm5y] はじめまして。宜しくお願いします。 自分で色々といじってたのですが、どうしても解決できないのでここで質問させてください。 (板違いでしたら指摘してください。) 【.　 CGI名 　.】　SiteHistory ver1.01+3.00 【配布先URL】　ttp://www.lira.co.jp/t-room/re_cgi/index.html 【改造中ﾃﾞｰﾀ】　ttp://cgi.2chan.net/up2/src/f70057.txt 【 依頼期限 】 2/25　(急ぎですみません) 【依頼内容】　　 項目を幾つか増やしてみました。 なぜか画像($image)を登録すると開催日($eventday)のデータがロストしてしまいます。 「sub edit1」「sub edit2」あたりを間違ってしまっていると思うのですが、原因を特定できません。 何か記述し忘れているのでしょうか? お願いします。 647 名前：646 [05/02/25 14:21:12 ID:tjf4sPQL] >>646です。 あぷろだに載せていたデータがなくなってしまったので、再度アップしました。 ttp://up.isp.2ch.net/up/e4cf18f36469.zip 宜しくお願いします。 648 名前：nobodyさん [05/02/25 15:41:05 ID:QBQJZtMZ] KENTのe-PAD掲示板に荒らし対策としてなりすまし禁止ののトリップ機能か 携帯情報取得のBBQ機能追加って無理ですか？ それか管理人のみのアイコン表示とか・・・ 649 名前：nobodyさん [05/03/01 21:42:51 ID:mUN1SLsJ] SPGM というアルバム用スクリプトなんですが、トップページ spgm.sourceforge.net/spgm/ から各アルバムへ入って サムネイルをクリックして表示された時に↓ spgm.sourceforge.net/spgm/index.php?spgmGal=Worlwide_shots&spgmPic=0&spgmFilters=#pic 上のサムネイル一覧は消して、大きい画像だけを表示したいんです。 そんな改造をしてほしいです。 ソースはここにあります。よろしくお願いします。 earth.prohosting.com/uedada/cgi-bin/box/0457.txt 650 名前：nobodyさん mailto:sage [05/03/01 22:04:31 ID:???] >649 【 スクリプト改造依頼スレ 】(丸投げ) part3 pc5.2ch.net/test/read.cgi/php/1105046286/l50 651 名前：nobodyさん mailto:sage [05/03/01 22:07:45 ID:???] >>650 すみません、移動します。 652 名前：nobodyさん mailto:sage [05/03/08 18:36:41 ID:???] 【.　 CGI名 　.】　Joyful Note + YY-BOARD + alpha ver.1.0 Beta 【配布先URL】　ttp://webmin.bbzone.net/subcon/cgi.htm 【依頼内容】 このCGIを動かす鯖がwin2000の自宅鯖なのでsymlink関数が使えません 管理モードで設定を変更しようとするとadmin.cgiの979行目でエラーが起きます 979行目 while (!symlink(".", $lockfile)) { 同様に画像を投稿しようとするとjoiful.cgiの1485行目がエラーを起こします 1485行目 while (!symlink(".", $lockfile)) { できればmkdir関数でファイルロックをしたいのですが 自分なりにやってみましたがうまくできません 日本語が少し変だと思いますが許してください よろしくお願いします 653 名前：nobodyさん mailto:sage [05/03/08 22:11:41 ID:???] >>652 NetBSDに汁！ 654 名前：チョップ5/5 mailto:sage [05/03/08 22:40:57 ID:???] >>652 使い方は他で聞いてね〜☆ 655 名前：nobodyさん mailto:sage [05/03/10 13:47:16 ID:???] >>652　ロックはinit.cgiで変えられるよ。あとロック用のフォルダを作っておかないといけないかも。 656 名前：nobodyさん mailto:aa@ab.com [05/03/11 12:34:38 ID:???] 【.　 CGI名 　.】　Simple Olive Diary2 var2.0 【配布先URL】　ttp://www.olive-design.com/~cgi/simple_diary2.html 【 依頼期限 】 3/14 【依頼内容】 現状では新しく書き込んだデータが一番上に来ます。 これを逆(先に書き込んだものが上に来る)としたいです。 イメージとしては、イベント開催情報のようなものでしょうか? イベントが決まったら書き込みしますが、それはあとの方なので 先に書き込んだ今からあるものをトップに表示したいって感じですね。 ログを書き込むときに一番下に書き込むって事は出来るのでしょうか? その場合、どうしたら良いですか? もしくは別の方法をとったほうが良いのでしょうか? お願いします。 657 名前：nobodyさん mailto:sage [05/03/11 13:38:37 ID:???] >>656 unshift (@log,"$newdata"); を push (@log,"$newdata"); にすれば逆になる。 ただ2重投稿のチェックも変更が必要 658 名前：656 mailto:aa@ab.com [05/03/11 19:02:16 ID:???] >>657 すばやい返答ありがとうございます。 >2重投稿のチェックも変更が必要 と言うのは、以下の部分ですよね。 $top = $log[0]; ($top_no,$jpg,$Wid,$Hei,$t_subject,$t_iday,$t_itime,$t_iplace,$top_comment,$top_time)= split(/<>/,$top); if ($top_comment eq $comment ){ &error('エラー','二重投稿禁止')} ------------ $top = $log[0];ってのがログの一番上(0行目)を見るって事でOKですか?で、コメントが一緒じゃないかを チェックするんですよね。 では、最終行をチェックってどうしたら?数値じゃ無理ですよね。 どうしたら良いんですか?お願いします。 659 名前：nobodyさん [05/03/12 07:11:46 ID:u7n1go0F] 【.　 CGI名 　.】updir.php[ver1.83] 【 配布先URL　】ttp://updir.net/index.html　→　ttp://updir.net/download.html 【 ソース 　】ttp://tool-ya.ddo.jp/2ch/trash-box/contents.jsp?file=20050312064949012.txt 【 依頼期限 】 3/19まで 【 依頼内容 】 フォームで画像を投稿する際に2つ程項目（出身地/好きな動物）を増やし表示させたいです。 【自分で試した事】 (1)583行目辺りに追加予定項目を追加（<input type=text name=inaka>と<input type=text name=animal>） (2)2255行目辺りの「if($comi == 0){$html_text = "$comnum${tname2}${tcom}　${ttime}<br>";」に項目追加 →if($comi == 0){$html_text = "$comnum${tname2}${tcom}$inaka<br>$animal　${ttime}<br>"; この状態だとログに組み入れられない為、書き込むたびに全ての変数が変わってしまいます。 管理画面での操作等は必要としませんので、 追加項目に書き込み→一覧画面で表示の実現の助言をどうかお願い致します。 助けてください。切にお願いしますm(_ _)m 660 名前：659 mailto:sage [05/03/13 08:36:11 ID:???] ウワァーン。どなたか助けてください。 661 名前：nobodyさん mailto:sage [05/03/13 09:53:52 ID:???] 改造で金取るために無料で配布してるもんを勝手に改造したらまずいだろーよ 662 名前：659 mailto:sage [05/03/13 12:41:43 ID:???] >>661 その辺の事が一切かかれていなかったので依頼しちゃいましたorz それと>>659については自力でできちゃますた。 ご迷惑おかけしました。 663 名前：nobodyさん mailto:sage [05/03/17 01:22:38 ID:???] 【.　 CGI名 　.】　Joyful2ch-Me(MobileEdition) 【配布先URL】　www.supra.cx/joyful2chMe/index.html 【. 置き場所 .】　www.supra.cx/joyful2chMe/dlrank/dlranklog.cgi?dl=j2me031111L 【. 依頼内容 】　 当スクリプトはJoyful2chの携帯メール投稿可能版なのですが、 そのメールを処理するpost.cgiが付属していないので、 自分で何とかしたいんですが、ヒントくれませんか？ 664 名前：nobodyさん mailto:sage [05/03/17 04:50:35 ID:???] 【.CGI名.】TOWN 　ver.1.40 【配布先URL】ttp://brassiere.jp/02cgi/09.html 【依頼期限】3月末日 【ヘルプ内容】CGIゲームの買い物で、クレジットを使用する時に 　　　　　　　普通口座にお金がなければ買えないようにしたい。 command.plの1008行くらい ####購入処理 sub buy_syouhin { #ver.1.30ここから if ($kaenai_seigen == 1){#ver.1.40 if ($k_id eq "$in{'ori_ie_id'}" || $house_type eq "$in{'ori_ie_id'}" && $in{'ori_ie_id'} ne ""){&error("自分や配偶者のお店では商品を買うことができません。");} } ($katta_syouhin,$katta_taikyuu,$katta_nedan) = split(/,&,/,$in{'syo_hinmoku'}); if ($in{'siharaihouhou'} eq "現金"){ if ($katta_nedan > $money){&error("お金が足りません");} } ここ迄の中に if ($in{'siharaihouhou'} eq "クレジット"){ if ($katta_nedan > $bank){&error("普通口座にお金が足りません");} これを組み込めばいいのだとわかっているのですが、 初心者なので上手くいきません。どうか宜しくお願いします。 665 名前：nobodyさん mailto:sage [05/03/17 07:33:00 ID:???] >664 マルチ 666 名前：644 mailto:sage [05/03/17 07:58:46 ID:???] いえ、向こうには窓を間違えて書き込んでしまったのです（汗） 667 名前：nobodyさん [05/03/17 22:37:47 ID:lZ4EUQO4] あげんな！！ 668 名前：nobodyさん mailto:sage [2005/03/21(月) 18:42:25 ID:???] THE ROOM(dream.lib.net/room/)さんの、Rankling Linkを を使って、携帯用のランキングサイトを公開しているのですが、 投票(voteform)ページを、携帯端末からのアクセスの時のみ表示して、 その他PC等からのアクセス時には非表示 (そのままランキングページを表示) になるようにしたいのですが、何か良い方法は無いでしょうか。。。 HOST名取得で表示選別、等が出来ればベストなんですけど。。。 自分なりに色々試してみたのですが、ranklink.cgiの100行目あたり if ($a1){ &fileunlock; &changehtml("voteform","id","ssd"); } } このあたりの、"voteform"の部分を"index"等に変えると、投票ページ として読み出すページが変えれるところまでは分かったのですが。。。 お詳しい方、アドバイス下さい。よろしくお願いします。 669 名前：nobodyさん mailto:sage [2005/04/10(日) 00:50:50 ID:???] 9tst4さんのX-counter：paxs.hp.infoseek.co.jp/9tst4/xct/xct.html 1回のアクセスで2つカウントするようにしたいんだけどどれを弄ったらいいかわからない 別途設置しているアクセス解析のトップページのカウント数と、設置してるカウンタのカウント数が2倍くらいずれてるから これて実際のページ表示回数に追いつかせたいんですが・・・ よろしくお願いします 670 名前：nobodyさん mailto:sage [2005/04/10(日) 03:33:21 ID:???] >>669 カウンタのログファイルを書き換えればいいといってみるテスツ 671 名前：nobodyさん mailto:sage [2005/04/16(土) 02:03:53 ID:???] >669 135行目から146行目までがカウントアップ処理だと思われるので、ここで2ずつ増やすように書き換えればいいと思う。 俺もデータファイルを直接編集するのを薦めるけどな。 672 名前：nobodyさん mailto:sage [2005/04/16(土) 02:24:09 ID:???] >668 そこか、あるいはサブルーチンchangehtml（rl_prf.cgi L.358-）だろうね。 携帯端末を判別するルーチンをそこに組み込めばいい。 適当にやるならそのCGI内にもあるようにHTTP_USER_AGENTで振り分け。 厳密にやりたいなら携帯電話各社の使用するホスト名やIPアドレス範囲を調べる。 ところで、標準でPCからの投票を拒否する機能がついているようだけど、それでは駄目なの？ 673 名前：nobodyさん mailto:sage [2005/04/16(土) 03:26:34 ID:???] 誘導されてきました。 www.kent-web.com/data/postmail.html のフォームの確認画面で パスワードを表示されないようにしたい（現在は表示される）んですけど、 改造できませんか？ フォーム画面では表示されないのですが、確認画面では表示されてしまいます。 それを隠す方法はありますでしょうか？ よろしくお願いします。 674 名前：nobodyさん mailto:sage [2005/04/17(日) 12:45:44 ID:???] >673 もし、パスワード入力部のhtmlが <input type=password name="text2"> なら、 252行目 if ($key eq "need" || $key eq "cc" || $key eq "match" || $key eq "subject" || ($in{'match'} && $key eq $match2)) { を if ($key eq "need" || $key eq "cc" || $key eq "match" || $key eq "subject" || $key eq "text2" || ($in{'match'} && $key eq $match2)) { とでもすればいいのかな。 HTMLソースを見ると分かっちゃうけど、画面に表示はされない…という状態になる、はず。 675 名前：nobodyさん [2005/04/17(日) 23:16:56 ID:YWLnSC6R] >>674 どうも、ありがとうございます。 上のようにしたところ、プレビュー画面でも消えませんでした。 プレビュー画面を外させてもらいました。 しかしながら、エラー画面（入力もれ）が出るときに、 パスワードを入力して他の項目をエラーにすると、 エラー画面でパスワードがそのまま表示されてしまうみたいです。 もし、表示されない方法がありましたら、よろしくお願いします。 676 名前：nobodyさん [2005/04/17(日) 23:25:37 ID:YWLnSC6R] できました！ あなたは天才だ。同じような項目を３ヶ所全部変えてみたらできました。 エラー画面も修正されました。 どうもありがとうございます。 677 名前：nobodyさん [2005/04/18(月) 19:49:09 ID:QI6M91tZ] 【.　CGI　.】　ookuwagata2005.hp.infoseek.co.jp/tengoku.txt 【配布先URL】　specters.net/cgipon/ 【 依頼内容 】　トリップ機能を付けたいんですが、初心者でわかりません。 　　　　　　　　ご教授のほど、宜しくお願い致します。 678 名前：nobodyさん mailto:sage [2005/04/19(火) 00:55:09 ID:???] 【.CGI名.】簡易データベースII 【配布先URL】ttp://www.rescue.ne.jp/cgi/database2/ 【依頼期限】4月末日 【ヘルプ内容】 　1. 検索結果の件数を表示したい。 　2. 検索結果を「名前」でソートをかけたい。 よろしくお願いいたします。 679 名前：nobodyさん [2005/04/21(木) 16:42:21 ID:Xy2T8jBX] フォームメーラー ttp://www.ahref.org/cgi/formmailer/ で、>>674　のようにパスワードを確認画面で隠す方法はありますでしょうか？ ソースは>>674　と全然違っていて苦戦しています。 よろしくお願いします。 680 名前：nobodyさん mailto:sage [2005/04/29(金) 18:38:44 ID:???] 【.　 CGI名 　.】もっと書き込み隊 Ver0.94 【配布先URL】tackysroom.com/cgi_mkakikomitai.htm　　　　　　　　 【. 置き場所 .】aoblue.s101.xrea.com/mkakikomitai.txt 【 依頼期限 】4月30日まででお願いします　　　　　 【. 依頼内容 】2ch系の掲示板でよくある、スレッドリストを作って、 そこから各記事へ飛ぶようにしたいのですが、改造に失敗するので、 ヒントをお教えしていただけないでしょうか？ 681 名前： ◆GrsqjXpGxE mailto:age [2005/04/30(土) 16:52:26 ID:???] 【CGI名】智猫フォームメールCGI 【配布元】tomo-net.org/download/cgi/parts/formmail.html 【CGIソース】majix.dip.jp/~naoto/cgi-bin/uploader/uploader.cgi/formmail.cgi (txtファイルに自動変換されます) [依頼内容] ・添付ファイル機能をお願いします(添付ファイルサイズ上限を指定できる事・添付ファイル個数は最大５個まで) 【改造したら・・・】 こちらの、アップローダにアップお願いします(自動でテキストファイルに変換されます) majix.dip.jp/~naoto/cgi-bin/uploader/uploader.cgi よろしくです、お願いします。 682 名前：nobodyさん mailto:sage [2005/04/30(土) 18:24:28 ID:???] >>681 マルチ乙。 683 名前：nobodyさん mailto:sage [2005/04/30(土) 23:23:20 ID:???] こんにちは。 【CGI名】KENT WEBさんのYY-BOARD 【配布元】www.kent-web.com/bbs/yybbs.html 【依頼内容】禁止ワード(投稿者名、投稿内容の部分)の設定と、 管理モードから管理人が記事の修正を可能にしたいのです。 どうかよろしくお願いします。 684 名前：nobodyさん mailto:sage [2005/05/01(日) 03:54:49 ID:???] >>683 さようなら 685 名前：nobodyさん mailto:sage [2005/05/01(日) 15:42:15 ID:???] >>683 ここは自分で改造するためのヒントをもらうスレだよ。 丸投げは丸投げスレへどうぞ。 >>684 簡潔すぎて>>683もどうしていいのかわからなくなっちゃうYO 686 名前：nobodyさん mailto:sage [2005/05/07(土) 08:09:26 ID:???] 【.　 CGI名 　.】Banner Search 1.12 【配布先URL】ttp://www.webpower.jp/websofts/search_engines/banner_search/ 【ヘルプ内容】 同一URLの、複数カテゴリへの登録を可能にしたい。 デフォでは、同一URLの複数個登録は出来ない仕様にしてある、と明記してあります。 登録時のカテゴリ選択をプルダウンからチェックボックスに変更してみましたが navi.cgi478行目あたりから 登録サイトのチェック項目があります foreach (@Record) { if (!$i) { $i++; next; } %Field = stdio'ReadData(split "\t"); if ($Field{'Code'} == $Form{'Code'} && $Form{'mode'} ne 'regist') { $find = 1; last; } elsif ($Field{'Url'} eq $Form{'Url'} && $Form{'mode'} eq 'regist') { $find = 1; last; } $i ++; %Field = (); } if ($find && $Form{'mode'} eq 'regist') { Errors('フォーム入力ミス','入力されたURLは既に登録されています。'); } elsif (!$find && $Form{'mode'} ne 'regist') { Errors('フォーム入力ミス','入力されたURLは登録されていません。'); ここが肝だと思うんですが、どう書き換えたら上手くいくのか 自信がありません。御伝授お願いします。 687 名前：nobodyさん mailto:sage [2005/05/09(月) 23:07:48 ID:???] >>686 元のスクリプトを全く見ずに答えるので間違っていたらすまん。 if ($find && $Form{'mode'} eq 'regist') { Errors('フォーム入力ミス','入力されたURLは既に登録されています。'); } elsif (!$find && $Form{'mode'} ne 'regist') { Errors('フォーム入力ミス','入力されたURLは登録されていません。'); } この部分、上のif文で重複チェックしてみるみたいだから、ここを if (!$find && $Form{'mode'} ne 'regist') { Errors('フォーム入力ミス','入力されたURLは登録されていません。'); } に書き換えれば同一URLがいくらでも登録できるようになるはず。 ただし同一カテゴリにも同じURLを何度でも登録できるようになってしまうと思われるので、 しっかり処理するならば同一カテゴリ内で重複がないかチェックしなきゃだめ。 ソースをしっかり見る時間がないのでこれ以上は自分で頑張って下さいな。 688 名前：nobodyさん mailto:sage [2005/05/11(水) 03:24:51 ID:???] >687さん if以下の削除で試していたところです。 重複可、不可とするのよりも、 カテゴリ内の重複不可、とする方が 逆に難しいかもしれませんね。もう少しいじってみます。 ありがとうございました。 689 名前：nobodyさん mailto:sage [2005/05/18(水) 09:43:52 ID:???] 一度丸投げで依頼したものですが 自分なりにやってみたのでこっちに来ました。 【CGI名】HoneyBoard 配布先など依頼テンプレは↓アプロダに一緒に書いてあります。 s3p.net/~channel2/webpro/marunage/joyful/joyful.cgi?mode=thr&no=236 【依頼内容】 　ふきだし型BBS＋アイコン＋画像投稿・・のできるBBS。 　イメージとしてはHoneyBoardに 　同KENT-WEB内のJoyfulNoteの画像アップ機能を 　プラスしたような感じです。 690 名前：まるなげどんの人 [2005/05/19(木) 11:44:31 ID:wVMVs5Vc] >>689 perlも全くわからず、HTML知識と勘でやっただけですがこんな感じ？ s3p.net/~channel2/webpro/marunage/sample/bbs-joyful-fukidashi/ 表示の設定とか変えたらなんかおかしくなるけど取り敢えず動くくらいです。 参考になれば幸いです。

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef