CGI-BBS > CGI > Perl > Perlの改造でCSVエディタに「BACK」ボタンをつけたいしたい。


カレッヂ
カレッヂ


質問者 megawind  投稿日 2/20(木) 10:36:52
CSVエディタをダウンロードして編集して使っていますが、
1ページの以上のデータが書かれた場合はページの下に「次のページ」と表示しています。
当然それをクリックすれば次のページに行きますが、その2ページ目に「前のページ」
ボタンをつけたい場合はどう書けばいいでしょうか?
ブラウザーの「BACK」を使わないようにしたいです。

うまく説明できなくて申し訳ないです。

プロバイダ参照:
サーバのOS:WINサーバ
パソコンのOS:WinNT系
エディタ:秀丸
FTPソフト:
サーバ移転:していない
改造:している 改造前正常動作
CGI習熟度:middle

回答者 やまだ  [削除]  投稿日 2/26(水) 00:06:37
186行からの
if ($next ne '') {
	print <<"EOF";
	<form action="$ENV{'SCRIPT_NAME'}" method=POST>
	<input type=hidden name="start" value="$next">
	<input type=submit value="次のページ">
	</form>
EOF
}
の直前に次を挿入。

my $back;
if (($back = $start-$page) >= 0){
	print <<EOF;
	<form action="$ENV{'SCRIPT_NAME'}" method=POST>
	<input type=hidden name="start" value="$back">
	<input type=submit value="前のページ">
	</form>
EOF
}

質問者 megawind  [削除]  投稿日 2/26(水) 11:20:03
すばらしいです!!感激!!できました!ありがとうございます。
贅沢かもしれませんが、"前のページ"と"次のページ"ボタンが今縦並びなっていますが、
それを横並びするのは可能でしょうか?
よろしくお願い致します。

このページは終了したので返信(回答)は書きこめません
 


Web裏技