当前位置: 首页 > 图文教程 > 网络编程 > ASP > 水晶报表打印单据时增加空行或空白行的示例脚本

ASP
[原创]本人常用的asp代码
asp防止刷新功能
生成所有页面的效果+分页生成
ASP在SQL Server 2000中新建帐号和权限
PR值查询代码制作
GetRows的用法详解!
ASP简洁的多重查询的解决方案
ASP实现SQL备份、恢复
用ASP写组件
ASP中Request对象获取客户端数据的顺序(容易忽略)
利用Adodb.Stream制作彩色验证码
ASP 类 Class入门 推荐
asp数据库防下载处理
浏览文件夹下面所有图片
结合asp和存储过程做的搜索程序
实现支持逻辑搜索/单词搜索/词组搜索+支持OR/AND关键字的VBS CLASS!
支持加号空格的查询
取得表单提交的所有数据
发邮件的asp(CDONTS.NewMail)
使用FSO把文本信息导入数据库

ASP 中的 水晶报表打印单据时增加空行或空白行的示例脚本


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 230 ::
收藏到网摘: n/a

 

假设我们的单据每张共打印五行,则最多会增加空白行4行,
在重复出现的表体中定义四个空白节。
我们首要的任务是根据记录数来确定这四个节什么时候显示,什么时候不显示。
我们定义的节的抑制显示脚本为:
节1,只有当记录数等于1时才需要显示第一个空白节。
if onlastrecord=false then
    FORMULA = TRUE
else

if (COUNT({销售单表体.商品代码}) mod 5 > 1) then
    FORMULA = TRUE
else
    if (COUNT({销售单表体.商品代码}) mod 5 = 0) then
     FORMULA = TRUE
    else   
    FORMULA = FALSE
end if
end if
end if

节2,只有当记录数等于1或等于2时才需要显示第二个空白节。
if onlastrecord=false then
    FORMULA = TRUE
else
if (COUNT({销售单表体.商品代码}) mod 5 > 2) then
    FORMULA = TRUE
else
    if (COUNT({销售单表体.商品代码}) mod 5 = 0) then
     FORMULA = TRUE
    else   
    FORMULA = FALSE
end if
end if
end if

其它两个节,以此类推是很简单的。
注意的是分界条件是 完全求模后 返回 0 和记录数本身就为零的情况的处理。