根据字段内容选择WORD模板打印？ 只打印字段内容相同的多个记录没有问题，但是当打印字段内容不同的多个记录就存在问题，不能自动选择模板打印（批量打印）？例如：2条记录，设备品种有：电梯、自动扶梯，就不会选择相应的模板打印（不能连续打印，只能一个一个选择打印），下面的公式哪里出错？
打印记录按钮代码：
Dim dr As DataRow = Tables("电梯抽查").current.DataRow
If dr("设备品种")
Like "曳*"
Then
Dim tm As String = ProjectPath & "Attachments\电梯监督抽查原始记录0625.docx" '指定模板文件
Dim fl As String = ProjectPath
& "Reports\电梯监督抽查原始记录0625.docx"
'指定目标文件
Dim wrt As New WordReport(Tables("电梯抽查"),tm,fl) '定义一个WordReport
wrt.Build() '生成报表
wrt.Show() '显示报表
Else
Dim tm As String = ProjectPath & "Attachments\自动扶梯监督抽查原始记录0625.docx" '指定模板文件
Dim fl As String = ProjectPath
& "Reports\自动扶梯监督抽查原始记录0625.docx"
'指定目标文件
Dim wrt As New WordReport(Tables("电梯抽查"),tm,fl) '定义一个WordReport
wrt.Build() '生成报表
wrt.Show() '显示报表
End If
此主题相关图片如下：02.jpg
此主题相关图片如下：01.jpg
[此贴子已经被作者于2021/7/30 8:54:33编辑过]
加好友 
发短信
Post By：2021/7/30 7:25:00 [只看该作者]
