今、perlで次ページ処理がわからなくてこまっています。したいことは、リスト表示でデータは50件以上存在しているのですが、10件ずつ表示したくて、1ページ目に次ページへいくボタンをつけ、2ページ目には前ぺーじと次ページがでて、5ページ目には前ページのボタンが下にでるようにしたいのですが、できません。教えてください。
####図面一覧表表示####
$line=0;
print<<"_HTMLI_";
<HR>
<TABLE BORDER="5" BGCOLOR="#dfefff" BORDERCOLOR="#80bfff" >
<tr><td>MO</td><td>期</td><td>見積番号</td><td>読み(物件名称)</td>
<td>物件名称</td><td>読み(図面名称)</td><td>図面名称</td><td>図面形式</td>
<td>使用容量</td><td>作成日付</td><td>CAD担当者1</td><td>CAD担当者2</td></tr>
_HTMLI_
open(FILE,"< list.txt");
while(<FILE>){
$tmp=$_;
@sample=split(/\x09/,$tmp);
print<<"_HTMLA_";
<TR><TD>$sample[0]</TD><TD>$sample[1]</TD><TD>$sample[2]</TD>
<TD>$sample[3]</TD><TD>$sample[4]</TD><TD>$sample[5]</TD>
<TD>$sample[6]</TD><TD>$sample[7]</TD><TD>$sample[8]</TD>
<TD>$sample[9]</TD><TD>$sample[10]</TD><TD>$sample[11]</TD></TR>
_HTMLA_
if($line >= 100){
goto abort;
}
}
abort:
close(READ);
####HTML終了####
print<<"_HTMLT_";
</TABLE><BR><BR>
No.2ベストアンサー
- 回答日時:
「前ページ」と「次ページ」の実現方法としては例えば、
前のページへのURLは hoge.cgi?page=1
次のページへのURLは hoge.cgi?page=3
(もちろん現在ページは page=2)
などのように「どのページを表示させるか?」という情報をURLに含めることで実現させる手法がよく用いられています。Yahoo!でもGoogleでも「次」のURLをよく見てみると、そういうパラメータが含まれています。
ロジック的にはこうなります。
1)URLからpage番号を取得する
2)page番号で指定された範囲のみを表示する
3)page番号とデータ量に合わせて「前」「次」などのコントロールを表示する
> どこに増やしたらいいかわかりません。
既にお気付きかと思いますが、1~3は1ヶ所にスクリプトを追加して解決できるものではありません。
それでも数箇所に追加するだけで解決できます。
参考になるスクリプトは 携帯向けのCGI掲示板 などを入手してみるとよいかも。
http://www.i-say.net/cgi/
No.1
- 回答日時:
「前ページ」と「次ページ」のリンク先として、どんなURLを指定する予定ですか?
あと、下記のような表記だとさらにユーザビリティが上がるかもしれません。
前ページ 1 2 3 4 5 次ページ
まずはそこから考えていくと具体的なイメージが浮かんでくるかと。
この回答への補足
説明がうまくできなくてすみません。
今は表示すると、50件までずらっとでてきて、下までみるのに、スクロールするのが大変なので、10件ずつ
分けて表示させたいんです。
よく掲示板で目にする、下のほうに「NEXT」というボタンが出てきて、押すとその続きがでてきて、下のほうに「BACK」と「NEXT」ボタンが出てきます。
またヤフオフみたいに検索すると該当するデータがでてきて、次ページボタンをおすような感じです。
今は私の書いてあるPerlは、テキストデータを1行ずつ読み込んで、テーブルにわけて表示しているので、次ページ処理がなく、while文で最後までループさせています。どこに増やしたらいいかわかりません。何かよいHPや本を知っていたら教えてください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
perl 初等プログラミングについて
-
bashスクリプト
-
INDIRECT 横に再度抽出したい
-
arduino の割り込み処理について
-
Perl言語について。
-
ファイルをディレクトリ分配の...
-
アルファベットに付いて質問し...
-
#!/usr/bin/perlで書きだしたCG...
-
Perlのエラーについてご教授く...
-
perlのflock関数でロックをかけ...
-
AI sisterとは、偽物の人ですか?
-
ファイルアイコンの左下に緑の□...
-
perlプログラミング 空白行削除
-
perlでリテラル値はメモリにど...
-
perlで2次元配列をサブルーチ...
-
Perlで時間の計算
-
perlについて
-
perlのrequireの動き方について...
-
perlの構文でカンマの意味が分...
-
perlについての質問
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
派生クラスの利用にな当たり
-
Application.ScreenUpdating = ...
-
JSONで文字列が長い時
-
この曲のピアノの最後の和音が...
-
formで特定のinputを送信しない...
-
16進の10進変換について
-
実行時エラー 3020の対策
-
文字の横にプルダウンを表示さ...
-
FindFirst を複数条件で検索
-
<SELECT>タグの折り返し
-
VBAでPDFのコピーとリネームを...
-
pythonで演算子を変数に代入す...
-
メモリをアドレスを直接指定し...
-
セレクトメニューで2つの項目...
-
ACCESS テキストボックスを隙...
-
【至急!!!】python言語で本を見...
-
テーブル内でドロップダウンメ...
-
セレクトボックスのselected属...
-
pythonの*
-
複数列を持ったリストボックス...
おすすめ情報