| 以文本方式查看主题 - 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=109046) |
| -- 作者：victor_lin33 -- 发布时间：2017/11/3 10:27:00 -- [求助]如何指定word报表模版 老师: 我在出货单打印时，需要实现某些客户用指定的出货单，我的想法是 1.在客户资料档设有列 "出货单别" 用于指定该客户的出货单模版 2.在word模版我设计了3种出货单格式-- 1通用 2.A客户专用 3.B客户专用 我想实现 在该列指定word模版编号(有指定的引用该模版，空白没指定的用通用模版) 然后在打印出货单报表时自动产生对应的出货单...
目前我都还没有用窗口，这样能实现吗? 还是就得设计一个打印出货单的窗口?如果是这样 代码如何写... 找了论坛 没能找到类似的案例...只好请老师指导..!谢谢 |
| -- 作者：有点蓝 -- 发布时间：2017/11/3 11:23:00 -- 参考：http://www.foxtable.com/webhelp/scr/2890.htm 类似 dim r as row = tables("客户资料").current if r isnot nothing then Dim tm As String = ProjectPath & "Attachments\\" & r("出货单别") & ".doc" \'指定模板文件 Dim fl As String = ProjectPath & "Reports\\" & r("出货单别") & ".doc" \'指定目标文件 Dim wrt As New WordReport(Tables("出库"),tm,fl) \'定义一个WordReport wrt.Build() \'逐行生成报表 wrt.Show() \'显示报表 end if
|