Foxtable(狐表)用户栏目专家坐堂 → 窗口报表打印


  共有1980人关注过本帖树形打印复制链接

主题:窗口报表打印

帅哥哟,离线,有人找我吗?
sysckj
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:132 积分:1651 威望:0 精华:0 注册:2014/6/9 14:21:00
窗口报表打印  发帖心情 Post By:2017/6/30 18:07:00 [只看该作者]

根据客户要求,进行标签套打,我把客户的标签打描成图像,在窗口("标签")中做为背景,插入相应表(A)的字段,预览成功!

 

 

现在我新建一个窗口("查询"),添加一个TABLE控件,连接上SQL查询表,添加打印按钮,针对这个表(A)查询出符合条件的若干条记录,点击打印,就调用标签套打格式(”标签"),打印出所有记录的标签,应该要如何遍历SQL查询表的记录,如何针对每条记录调用套打窗口?

[此贴子已经被作者于2017/6/30 18:10:06编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/6/30 18:21:00 [只看该作者]

 循环每一行,然后打印,如代码

 

For Each r As Row In Tables("表A").rows
    r.Table.Position = r.Index
    Dim doc As PrintDoc = e.Form.GernatePrintDoc()
    doc.Preview()
Next


 回到顶部