我这样换了代码，显示还是找不到文件名
Dim dr As Row = Tables("事件登记").Current
Dim fl As String = ProjectPath & "Reports \ 文档资料 \" & dr("事件ID") & dr("姓名") & "登记表.doc" '指定模板文件
Dim fl1 As String = ProjectPath & "Reports \ 文档资料 \ " & dr("事件ID") & dr("姓名") & "登记表(已用印).doc" '指定目标文件
FileSys.CopyFile(fl, fl1, True)
Dim img As String = ProjectPath & "电子印章1.png"
Dim app As New MSWord.Application
Try
"事件ID"，相当于事件编号
[此贴子已经被作者于2022/5/26 17:32:33编辑过]
加好友 
发短信
Post By：2022/5/26 17:24:00 [只看该作者]
