求助:vb写入word以后另存为时出现问题
以下是本人写的一段代码,我的程序是用vb计算一些数据,自己编辑一个word作为模板,然后用vb把计算的数据写入word对应位置。之前的代码基本实现,但是在写入word之后另存为时遇到问题了。
以下是我代码的另存为部分,我的目的是不让用户修改我的模板,所以无论用户是否另存为我的word文档都会关掉。但是在选择另存为的时候可以点击,但是就是没有文件生成....不知道什么原因,求指导!先谢谢了
Dim savedocuments As SaveFileDialog
savedocuments = New SaveFileDialog
savedocuments.FileName = "系统CAD设计"
savedocuments.Filter = "Word Document(*.docx)|*.doc"
savedocuments.DefaultExt = "Word Document(*.docx)|*.doc"
If savedocuments.ShowDialog = Windows.Forms.DialogResult.OK Then
WordDocument.SaveAs2(filename, missing, missing, missing, missing, missing, missing, missing, missing, missing, missing, missing, missing, missing, missing, missing, missing)
WordDocument.Close()
WordAPP.Quit()
Else
WordDocument.Close()
WordAPP.Quit()
End If
[解决办法]
Dim v As Object = System.Reflection.Missing.Value
WordDocument.SaveAs(filename, v, v, v, v, v, v, v, v, v, v, v, v, v, v, v)
WordDocument.Close(False, v, v)
WordAPP.Quit(False, v, v)
我用上面这个代码,是可以另存的啊