不错呦!smile@林凯西,确保“准备文件”中的几个文件都有安装,S...您好,看了您这篇帖子觉得很有帮助。但是有个问题想请...我的修改过了怎么还被恶意注册呢 @jjjjiiii 用PJ快9年了,主要是A...PJ3啊,貌似很少有人用PJ了,现在不是WP就是z...@332347365,我当时接入时错误码没有-10...楼主,ChkValue值应为-103是什么意思呢?...大哥 你最近能看到我发的信息,请跟我联系,我有个制...
ASP输出N行N列表格
编辑:dnawo 日期:2007-11-03
几乎在每个站点中我们都要使用程序来输出列表:新闻列表、产品列表等等,输出的方式也因内容的不同而不同,对于新闻列表,通常是一行一行的循环输出;对于产品列表,通常得一个单元格一个单元格的输出。下边我们就用ASP来输出一个五行四列的表格。
1.一行一行的输出
这没什么好说的了,大家都看得明白。
2.一个单元格一个单元格的输出
这边需要说明一下:网上很多的输出N行N列表格的ASP中都没有考虑最后一行的列数是否完整,即没有上边的补足部分,结果输出一个残缺的表格。细节上的问题,毛病虽不大,但还是希望大家注意下。
1.一行一行的输出
复制内容到剪贴板
程序代码

<%
Response.Write("<table border=""1"" width=""200"">")
For i=1 to 5
Response.Write("<tr><td> </td><td> </td><td> </td><td> </td></tr>")
Next
Response.Write("</table>")
%>
Response.Write("<table border=""1"" width=""200"">")
For i=1 to 5
Response.Write("<tr><td> </td><td> </td><td> </td><td> </td></tr>")
Next
Response.Write("</table>")
%>
这没什么好说的了,大家都看得明白。
2.一个单元格一个单元格的输出
复制内容到剪贴板
程序代码

<%
Response.Write("<table border=""1"" width=""200"">")
For i=1 to 18
If i mod 4 = 1 Then Response.Write("<tr>")
Response.Write("<td> </td>")
If i mod 4 = 0 Then Response.Write("</tr>")
Next
'补足单元格
i = i - 1
If i mod 4<>0 Then
For j=1 to 4-i mod 4
Response.Write("<td>补</td>")
Next
Response.Write("</tr>")
End If
Response.Write("</table>")
%>
Response.Write("<table border=""1"" width=""200"">")
For i=1 to 18
If i mod 4 = 1 Then Response.Write("<tr>")
Response.Write("<td> </td>")
If i mod 4 = 0 Then Response.Write("</tr>")
Next
'补足单元格
i = i - 1
If i mod 4<>0 Then
For j=1 to 4-i mod 4
Response.Write("<td>补</td>")
Next
Response.Write("</tr>")
End If
Response.Write("</table>")
%>
这边需要说明一下:网上很多的输出N行N列表格的ASP中都没有考虑最后一行的列数是否完整,即没有上边的补足部分,结果输出一个残缺的表格。细节上的问题,毛病虽不大,但还是希望大家注意下。
评论: 0 | 引用: 0 | 查看次数: 3717
发表评论
请登录后再发表评论!