- 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=67062)
-- 发布时间：2015/4/18 13:51:00
-- word报表中窗口引用
怎么才能将窗口上的两个字段引用到word报表的指定地方。谢谢
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:attachments.zip |
-- 发布时间：2015/4/18 14:03:00
--
用Repalce功能 http://www.foxtable.com/help/topics/2890.htm
-- 发布时间：2015/4/18 14:09:00
--
还是不明白，能帮我把传上去的报表和窗体写好代码，我参考下，可以吗，谢谢了
-- 发布时间：2015/4/18 14:18:00
--
不明白,说明你没有真的去看帮助. 其实很简单的.帮助代码原版复制.更改一下字符串就好的了
比如在模版里输入 [测试]
下面是帮助的代码
Dim tm As String = ProjectPath & "Attachments\\订单.doc" \'指定模板文件
Dim fl As String = ProjectPath & "Reports\\订单.doc" \'指定目标文件
Dim wrt As New WordReport(Tables("订单"),tm,fl) \'定义一个WordReport
wrt.Replace("[测试]",forms("窗口名").controls("textbox1").text) \'用代码计算出总的销售数量并替换模板中的合计标记
wrt.Build() \'生成报表
wrt.Show() \'显示报表
Dim fl As String = ProjectPath & "Reports\\订单.doc" \'指定目标文件
Dim wrt As New WordReport(Tables("订单"),tm,fl) \'定义一个WordReport
wrt.Replace("[测试]",forms("窗口名").controls("textbox1").text) \'用代码计算出总的销售数量并替换模板中的合计标记
wrt.Build() \'生成报表
wrt.Show() \'显示报表
-- 发布时间：2015/4/18 14:45:00
--
4楼，非常感谢您，字段是引用过来了，但是一执行代码就项目锁死，要强制退出再进去，而直接打开word报表却可以，这是什么原因
-- 发布时间：2015/4/18 14:52:00
--
把你做的锁死的例子发上来,不要发个窗口模版,而是可运行的例子
-- 发布时间：2015/4/18 15:04:00
--
是这个吗
-- 发布时间：2015/4/18 15:05:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.zip |
-- 发布时间：2015/4/18 15:12:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.rar |
测试完全没问题,是不是你路径没设置对. 我改了一下例子为正确的相对路径.
或者你没有以管理员权限运行,或者你OFFICE安装的不是完整版本