ASP控制每页打印行数(3)

  else            
  moncount3=Csng(rs1("lirun1"))            
  moncount2=moncount2+moncount3            
  end if 
%>     
    <tr>            
      <td height="18" width="70"> <%=rs1("sellautoid")%></td>            
      <td height="18" width="168"><%=Decode(rs1("productname"))%> <%=rs1("productsize")%></td>            
      <td height="18" width="121"><%=left(rs1("gongshang"),9)%></td>           
      <td height="18" width="30" align="center"><%=rs1("productnum")%></td>           
      <td height="18" width="24" align="center"><%=rs1("productdan")%></td>           
      <td height="18" width="50" align="right"><%=formatNumber(rs1("chaoshi"),varnum,-1)%></td>           
      <td height="18" width="23" align="center"><%=rs1("youhui")%></td>           
      <td height="18" width="52" align="right"><%=formatNumber(rs1("productjia"),varnum,-1)%></td>           
      <td height="18" width="55" align="right"><%=formatNumber(rs1("moncount1"),varnum,-1)%></td>           
      <td height="18" width="45" align="right"><%=formatNumber(rs1("lirun1"),varnum,-1)%></td>           
      <td align="center" height="18" width="25"><%if trim(rs1("fukuan"))="欠款" then%><font color=blue><%=rs1("fukuan")%></font><%else%><%=rs1("fukuan")%><%end if%></td>           
      <td height="18" width="61"><%=rs1("indate")%></td>           
    </tr>
<%
rs1.movenext
end if
next
%>
</table>