我想问一个问题,如果我定义 ipagesize=3,也就是在表中每次输出3条,并且表的最上面带有标题,我想同时输出此标题,每次三个记录输出。这是我写的语句,不行,请问该怎么写?
<%if i/ipagesize=0 then%>
,最上面是标题栏(带颜色的),但是它是每一条就有一个标题栏输出,现在我的目的是要输出三条后在加一标题栏在接着输出。
我的语句是
dim iPageSize '数据页面大小
iPageSize = 3
<table style="border-bottom-style: solid; border-bottom-width: 1" border="0" cellpadding="0" cellspacing="0" width="100%" id="Table18">
<% do while not rsFile.EOF%>
<%for i=1 to rsFile.RecordCount%>
<tr>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1" colspan="4" rowspan="2"> <p align="center" style="margin-top: 3"> <font class="wordblack" color="#FFFFFF"> 归 档 文 件 目 录</font></td>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1" height="39"> <p align="center" style="margin-top: 3"> <font class="wordblack" color="#FFFFFF">年 度</font></td>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1"> <p align="center" style="margin-top: 3"> <p align="left" style="margin-top: 3"><font class="wordblack" color="#FFFFFF"> 期 限</font></td>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1"> <p align="center" style="margin-top: 3"> <font class="wordblack" color="#FFFFFF">机 构</font></td>
</tr>
<tr>
<td style="border-bottom-style: solid; border-bottom-width: 1" width="10%" height="20" align="middle"> <p align="center" style="margin-top: 3"><font class="wordblack" color="#FFFFFF"></font> <%=rsFile.fields("年度号")%></td>
<td style="border-bottom-style: solid; border-bottom-width: 1" width="8%"> <p align="center" style="margin-top: 3"> <font class="wordblack" color="#FFFFFF"></font>
<%if rsFile.fields("案卷保存类型")="1" then response.Write " 永久" %>
<%if rsFile.fields("案卷保存类型")="2" then response.Write " 长期" %>
<%if rsFile.fields("案卷保存类型")="3" then response.Write " 短期" %>
</td>
</tr>
<tr>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1" width="11%"> <p align="center" style="margin-top: 3"> <font class="wordblack" color="#FFFFFF"> 件 号</font></td>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1" width="15%">
<p align="center" style="margin-top: 3"><font class="wordblack" color="#FFFFFF"> 责 任 者</font></td>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1" width="21%"><font color="#FFFFFF"> </font><font class="wordblack" color="#FFFFFF">文 号</font></td>
<td bgcolor="#336699" width="25%" style="border-bottom-style: solid; border-bottom-width: 1"> <p align="center" style="margin-top: 3"><font class="wordblack" color="#FFFFFF"> 题 目</font></td>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1" > <p align="center" style="margin-top: 3"><font class="wordblack" color="#FFFFFF"> 日 期</font></td>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1"> <p align="center" style="margin-top: 3"> <font class="wordblack" color="#FFFFFF">页 数</font></td>
<td bgcolor="#336699" style="border-bottom-style: solid; border-bottom-width: 1"> <p align="center" style="margin-top: 3"> <font class="wordblack" color="#FFFFFF">备 注</font></td>
</tr>
<tr>
<td style="border-bottom-style: solid; border-bottom-width: 1" width="11%" align="middle">
<%=i%>
</td>
<td style="border-bottom-style: solid; border-bottom-width: 1" width="15%" align="middle"><%=rsFile.Fields("发起部门")%></td>
<td style="border-bottom-style: solid; border-bottom-width: 1" width="21%" align="middle">
<%=rsFile.Fields("公文文号")%></td>
<td style="border-bottom-style: solid; border-bottom-width: 1" width="25%" align="middle"><%if isprint=true then%>
<a href="#" onClick="seeDocDetail('<%=rsFile.Fields("公文ID")%>')" ><%=rsFile.Fields("公文标题")%></a>
<%else%>
<a href="#" onClick="viewFile('<%=rsFile.Fields("公文ID")%>')" ><%=rsFile.Fields("公文标题")%></a>
<%end if%>
</td>
<td style="border-bottom-style: solid; border-bottom-width: 1" align="middle">
<%=month(rsFile.Fields("归档时间"))&"月"&day(rsFile.Fields("归档时间"))&"日"%>
</td>
<td style="border-bottom-style: solid; border-bottom-width: 1" ></td>
<td style="border-bottom-style: solid; border-bottom-width: 1"></td>
</tr>
<%
rsFile.MoveNext
next
loop
%>
</table>
烦请各未给我看看。