- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]合同报表完善 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=178759)
-- 发布时间：2022/7/19 16:03:00
-- [求助]合同报表完善
以上是操作窗口图片与代码，另是合同报表格式。问题是如果才能让报表中的填写内容提取来源是窗口内容。
[此贴子已经被作者于2022/7/19 16:07:13编辑过]
-- 发布时间：2022/7/19 16: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.ReplaceOne("[合同编号]",e.Form.Controls("合同编号").text)
wrt.ReplaceOne("[姓名]",e.Form.Controls("姓名").text)
……
wrt.BuildOne(Tables("基础信息.签订合同").current)
wrt.Show() \'显示报表
-- 发布时间：2022/7/23 12:31:00
--
感谢有点蓝老师的帮助，但我报表中的数据来自不同的两个表，这个应该如何写呢？
如：报表中的[性别]、[住址]、[联系电话]是来自表“基础数据”，而[合同起始日]、[合同终止日]等又是来自表“签订合同”；而这些数据正好也是两个表中都没有的。都是独立存在各自的表中的。当然两表是关系表，但只关联了姓名与身份证号码。
[此贴子已经被作者于2022/7/23 12:33:30编辑过]
-- 发布时间：2022/7/23 13:51:00
--
这个直接填充的是窗口控件输入的值，和表格有什么关系？
如果要从表里获取数据，参考：
| GetChildRows | 返回一个DataRow集合，集合中包括指定子表中和该行对应的全部关联行 |
| GetParentRow | 返回该行在指定父表中对应的关联行 |