* 過去の栄光、覇者の石碑、闘技場の歴史などのプルダウンリンク [#jc9ac9cd]
- ページ: [[罪罰改造板３]]
- 投稿者: [[ゆき]]
- 優先順位: 普通
- 状態: 着手
- カテゴリー: 罪罰管理者の雑談
- 投稿日: 2008-12-30 (火) 16:41:07
- バージョン:
** メッセージ [#pb4fac78]
jump.cgi
#!/usr/bin/perl
$querybuffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/,$querybuffer);
foreach $pair (@pairs) {
($name, $value, $id, $pass) = split(/=/, $pair);
if( $name eq "jumpto" ) {
$jumpto = $value; # 移動先
}
}
if( $jumpto ne "-" ) {
print "Location: $jumpto\n\n";
}
else {
print "Content-type: text/html\n\n";
print qq|<HTML>\n<HEAD><META HTTP-EQUIV="Content-Type" CONTENT="text/html ; charset=Shift_JIS">\n<TITLE>移動先が未指定です </TITLE></HEAD>\n|;
print qq|<BODY><H1>移動先が選択されていません。</H1><P>移動先を選択してからボタンをクリックして下さい。</P></BODY>\n|;
}
exit;
hist.cgi
<form name="ore_" method="GET" action="./jump.cgi">
<input type=hidden name=id value="$id">
<input type=hidden name=pw value="$pass">
<input type=hidden name=mode value="$mode">
<select name="jumpto" size="1">
<option value="hist.cgi">情勢の軌跡</option>
<option value="chist.cgi">英雄の軌跡</option>
<option value="sekihist.cgi">覇権の軌跡</option>
</select>
<input type=submit value="決定">
</form>
色々なサイトを参考にしてこういうのを作ってみました。
携帯用にプルダウンメニューで選択して見られるようにしたいのです。
このままだとidとpassとmodeの情報がうまく渡せないのですが、どうしたらよいでしょうか？
うちのサイトではchist.cgi、sekihist.cgiと分けてあるのですが、他のサイトではaction=hist.cgi name=cmd としてすべてhist.cgiで処理してるのですがよくわかりませんでした。
試しに
$logfile = "./logdata/hist_log.cgi"; # ログファイルのパス
$logfile = "./logdata/chist_log.cgi" if($cmd==100);
$logfile = "./logdata/sekihist_log.cgi" if($cmd==101);
<select name="cmd" size="1">
<option value="-1">情勢の軌跡</option>
<option value="100">英雄の軌跡</option>
<option value="101">覇権の軌跡</option>
としてみましたが撃沈しました。
--------
- 自分の罪罰でやってみました。
��$logfile=〜〜の箇所を、$logfile1=〜 $logfile2=〜 $logfile3=〜のように表示分増やす。~
��titleの下に、
<form name="ore_" method="$method" action="./hist.cgi">
<input type="hidden" name="id" value="$id">
<input type="hidden" name="pw" value="$pw">
<input type="hidden" name="camp" value="$in{'camp'}">
<select name="hist_num" class="button2" size="1">
<option value="1">過去栄</option>
<option value="2">石碑</option>
<option value="3">仕官</option>
</select>
<input type=submit value="GO" class="button2" style="width:80px">
</form>
な感じで選択部を表示。
�Ｉ充�部に、
# ログ読み込み
$hist_num = $in{'hist_num'}; #過去栄表示番号
if($hist_num==1){$kfile=$logfile1}
elsif($hist_num==2){$kfile=$logfile2}
elsif($hist_num==3){$kfile=$logfile3}
else{$kfile=$logfile1}
open(IN,"$kfile") || &error("Open Error : $kfile");
my @lines = <IN>;
close(IN);
他の$logfileの箇所も$kfileに変更する。
��systemのデコードに $hist_num = $in{'hist_num'}; #過去栄表示番号
を入れ、、、なくても多分大丈夫だと思う。-- [[mike]] &new{2009-01-07 (水) 11:15:20};
- ぁ、ただし、これで表示させるためには、各ログファイルが同じ形式で保存されていることが条件になります。＞表示形式が統一されてしまうため -- [[mike]] &new{2009-01-07 (水) 11:24:42};
- 大変勉強になりました！！＞＜ 闘技場のだけなぜか表示されなかったので同じ形式ではなかったみたいです。調整してみたいと思います -- [[ゆき]] &new{2009-01-09 (金) 03:21:49};
- <input type="hidden" name="camp" value="$in{'camp'}">は私のトコでのみ必要な表記なので気にしないで下さい＾＾；＞＞それと、$kfileは$logfileでも構わないと思うのですが、個人的に「他での影響を避けるため極力違う名前を使う」主義なもので$kfileにしました。 -- [[mike]] &new{2009-01-09 (金) 09:07:55};
- cYHPXVWbU -- [[dxzywb]] &new{2009-03-26 (木) 16:05:45};
#comment
