出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
DBのデータを数件ずつ行表示するには 　 karlさん [2004/08/06 14:56:21] [4562]
　 Re:DBのデータを数件ずつ行表示するには 　 Lightningさん [2004/08/06 16:29:06] [4563]
　 Re:DBのデータを数件ずつ行表示するには 　 暇人さん [2004/08/06 16:47:06] [4565]
　 　 Re:オフとぴ　無視していいですｗ 　 Lightningさん [2004/08/06 16:51:37] [4566]
　 　 　 Re: 　 karlさん [2004/08/09 13:45:27] [4568]
[4562] DBのデータを数件ずつ行表示するには
投稿者：karlさん 2004/08/06 14:56:21
こんにちは。いつも拝見させていただいています。
質問があるのですがよろしいでしょうか？
DBのデータを表示するのですが、１行ずつに５件を
表示したいと考えています。つまりソース的には
<table>
<tr>
<td>A</td><td>B</td><td>C</td><td>D</td><td>E</td>
</tr>
<tr>
<td>F</td><td>G</td><td>H</td><td>I</td><td>J</td>
</tr>
:
</table>
こうなってほしいのです。
ちなみにチェックボックス付きにしようと考えているので
レイアウト的にはこうなります。

□A　□B　□C　□D　□E
□F　□G　□H　□I　□J
:
これをレコード分繰り返したいのですが
どういう風に書けばいいのか全くわかりません。。
どなかか教えていただけないでしょうか？
[4563] Re:DBのデータを数件ずつ行表示するには
投稿者：Lightningさん 2004/08/06 16:29:06
HTML = "<table>\n<tr>\n"
i=0
do until objRS.EOF
if i=5 then
HTML = HTML & "</tr>\n<tr>"
end if
HTML = HTML & "<td><input type=""Checkbox"" value=""" & objRS.Fields("データの奴") & """>" & objRS.Fields("データの奴") & "</td>\n"
objRS.movenext
i= i + 1
if i=5 then
HTML = HTML & "</tr>\n"
end if
loop
こんな感じ。
テストとかしてないし、なんとなく書いてるので、細かい訂正はしてください。
あと、一応、DBに接続して、ちゃんとSQLを飛ばしてることを前提にしています。
（当然ADODBで接続していて、RecordsetをobjRSとしていることを前提)
[4565] Re:DBのデータを数件ずつ行表示するには
投稿者：暇人さん 2004/08/06 16:47:06
私も考えてみました。
こういった単純な1重ネストしたループ文でも
プログラマの個性がでて面白いですね。
Lightningさん　のものとは違った味付けになってます

objRs //レコードセットオブジェクト
cntI //ループカウンター

Do Until objRs.EOF
Response.Write "<tr>"
for cntI = 1 to 5
if objRs.EOF then
　　　　　　　 //テーブルレイアウトをくずさないように
//レコードがない場合に<TD>タグだけ打ち出す
Response.Write "<td></td>" & vbcrlf
else
//ここのところで
//<TD>タグでチェックボックスと
　　　　　　　 //FieldsのValueを囲んだものを打ち出す
end if
next
Response.Write "</tr>" & vbcrlf
Loop

抜けてる部分は適当に補ってください

Response.Writeで直打ちしてますが、変数に入れて最後に打ち出してもいいですね。
関数化して変数を返すようにするのも手ですね。
[4566] Re:オフとぴ　無視していいですｗ
投稿者：Lightningさん 2004/08/06 16:51:37
> 私も考えてみました。
> こういった単純な1重ネストしたループ文でも
> プログラマの個性がでて面白いですね。
そうですね〜、私はベースにオブジェクト指向があったりしたりしたので、MVCを少し気にするんですね、だからRespose.writeとかDocument.write（JS)とかは嫌う傾向にあるようです。

あと、非常に手抜きなのは、質問に対して完璧な回答をする気がないのと
明日から1週間、丸々休みなので気持ちがそっちに行ってるためだったりしますｗ
[4568] Re:
投稿者：karlさん 2004/08/09 13:45:27
Lightningさん,暇人さん、レスどうもありがとうございます！
人それぞれに違ったやり方があるのだなあと勉強になります。
お二人のアドバイスを基にがんばってみます。
どうもありがとうございました！

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ