首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

vb写入word以后另存为时出现有关问题

2012-01-05 
求助:vb写入word以后另存为时出现问题以下是本人写的一段代码,我的程序是用vb计算一些数据,自己编辑一个wo

求助: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)

我用上面这个代码,是可以另存的啊

热点排行