麻烦老师帮我看看 为什么word生成文件会导致保存两次呢？经常提示文件为只读，有没有办法强制覆盖文件？

当前代码如下：

Public Sub form319_word1_Ajax(rq as Request) 
 Dim e As RequestEventArgs = rq.e
Dim cmd As SQLCommand = rq.cmd 
Dim time As String =Format(Date.now,"yyyyMMddHHmmss")
Dim tm As String  = ProjectPath & "Attachments\\讯问通知书存根联.doc" \'指定模板文件
Dim f1 As String = ProjectPath & "Reports\\讯问通知书存根联"& e.Values("创建人") & e.Values("guid") & time &".doc" \'指定目标文件
Dim f2 As String = ProjectPath & "Reports\\讯问通知书存根联"& e.Values("创建人") & e.Values("guid") & time &".pdf" \'指定目标PDF文件
Dim wrt As New WordReport(tm,f1)
wrt.AddDataTable("讯问通知书","主数据源","S elect * from {讯问通知书} where guid = \'" & e.Values("guid") & "\' ")
wrt.Build()
\'wrt.SaveToPDF(f2) \'保存为PDF文件
\'wrt.Quit() \'退出 
wrt.Show()
 \'返回生产的报表路径
 e.WriteString("\\Reports\\讯问通知书存根联"& e.Values("创建人") & e.Values("guid") & time &".doc")
End Sub