| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- word模板 怎么在代码中设置只打印一条数据呢？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=169449) |
||
| -- 作者：cnsjroom -- 发布时间：2021/6/17 10:58:00 -- word模板 怎么在代码中设置只打印一条数据呢？ word模板 怎么在代码中设置只打印一条数据呢？ Dim tm As String = ProjectPath & "Attachments\\议程.doc" Dim fl As String = ProjectPath & "Reports\\议程.doc" Dim wrt As New WordReport(tm,fl) \'注意这里无需指定表名 wrt.AddDataTable("党史教育学习台账","智慧党建","Sel ect * from {党史教育学习台账}") wrt.Build() wrt.Show() 当前模板内容如下： [单位] 党史学习教育和“牢记殷切嘱托、 忠诚干净担当、喜迎建党百年”专题教育 [学习方式]议程 时间：[时间] 地点：[地点] 主持：[主持人] 参会人员：[参加人员] 主题：[主题] 内容： [内容] |
||
| -- 作者：有点蓝 -- 发布时间：2021/6/17 12:05:00 -- 只返回一条数据 |
||
| -- 作者：cnsjroom -- 发布时间：2021/6/17 12:16:00 -- 回复：（有点蓝）只返回一条数据wrt.AddDataTable("党... 老师 这个方式的话 跟单个选择打印模板是一样的效果 我想实现的是每一个word模板指定的页 只有一条数据 第一条数据显示完毕之后 不足一页就翻页 如果超过一页 就继续显示 显示完毕后再翻页 然后对应的议程标题 下一页显示并显示下一条数据
|
||
| -- 作者：有点蓝 -- 发布时间：2021/6/17 12:47:00 -- Dim tm As String = ProjectPath & "Attachments\\议程.doc" Dim fl As String = ProjectPath & "Reports\\议程.doc" Dim wrt As New WordReport(tm,fl) \'注意这里无需指定表名 wrt.AddDataTable("党史教育学习台账","智慧党建","Sel ect * from {党史教育学习台账}") wrt.RecordsOnEachPage = 1 wrt.Build() wrt.Show()
|
||
| -- 作者：cnsjroom -- 发布时间：2021/6/17 14:50:00 -- 回复：（有点蓝）Dim tm As String = ProjectPa... 谢谢老师 |