作者redming (无尘室游魂)
看板Visual_Basic
标题[ASP ] 请问一个问题
时间Mon Jul 13 09:53:18 2009
以下第一个程式是读取资料 是可以跑的
第二个程式是把第一个改成每一行颜色是不同的
EX:红色
蓝色
红色
第二个程式怎麽跑都跑不出去说 有时间的人帮忙指点一下
错误都是 执行档时间逾时
谢谢>"<
== = = = = = 1st== = = =
'输出资料表得所有内容
rs.MoveFirst '将目前资料录一到第一笔
while Not rs.EOF '判断是否过了最後一笔
row="<tr bgcolor=#ffff00>"
for k=0 to rs.Fields.Count-1
row = row &"<td>" & rs(k) & "</td>"
NEXT
response.write row & "</tr>"
rs.MoveNext
Wend
= == = = = =2nd= = = = =
'输出资料表得所有内容
rs.MoveFirst '将目前资料录一到第一笔
while Not rs.EOF '判断是否过了最後一笔
if rs.recordcount > 0 then
for i= 0 to rs.recordcount-1
if i mod 2=0 then
row="<tr bgcolor=#CCFFFF>"
else
row="<tr bgcolor=#FFFFCC>"
end if
for k=1 to rs.Fields.Count-2
row = row &"<td>" & rs(k) & "</td>"
NEXT
response.write row & "</tr>"
rs.MoveNext
NEXT
end if
Wend
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.117.157.18
1F：推 mathlinka:把 while 跟 Wend 拿掉试试看？ 07/13 21:57
2F：→ redming:一样不行耶@@ 07/15 17:03