读取数据库记录,并在前三个记录或其它记录增加背景颜色

三分地 / 18人浏览 / 0人评论
加个判断:
<%
Dim Color: Color = "#FF0000"
Dim i
Response.Write "<table width=""20"">" & vbCrlf
For i = 1 To 10
If i > 3 Then Color = "#CCCCCC"
Response.Write "<tr><td bgcolor=""" & Color & """>" & i & "</td></tr>" & vbCrlf
Next
Response.Write "</table>"
Response.End()
%>

另一个

<table width=""200"">
<% for i=1 to 10 %>
  <tr><td
<% if i<3 then
     Response.Write " width=""200"" bgcolor=""#FF0000""></td></tr>" 
   else
     Response.write " width=""200""></td></tr>"
   end if
   next
   Response.End()
%>
</table>


感谢博主,喝杯咖啡~

0 条评论

还没有人发表评论

发表评论 取消回复

记住我的信息,方便下次评论
有人回复时邮件通知我