Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共2 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助]Word模板

1楼
wldhj 发表于:2024/11/20 16:08:00
怎样根据已勾选的行生成Word报表每一个都单独存放在指定的文件夹里?比如勾选10行,就生成10个Word存放在指定的文件夹里。

2楼
有点蓝 发表于:2024/11/20 16:23:00
使用代码处理:http://www.foxtable.com/webhelp/topics/2890.htm

Dim rs As List(Of Row) = Tables("出库").GetCheckedRows
If rs.Count > 0 Then '如果存在符合条件的行
    Dim tm As String = ProjectPath & "Attachments\出库单.doc" '指定模板文件
    For Each r As Row In rs '逐行生成报表
        Dim fl As String = ProjectPath & "Reports\出库单" & r("编号") & ".doc" '指定目标文件
        Dim wrt As New WordReport(Tables("出库"), tm, fl) '定义一个WordReport
        wrt.BuildOne(r)
        wrt.Quit
    Next
End If
共2 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01563 s, 2 queries.