如何在vb.net中保存打開的word文檔

Question

我只是想讓保存打開的文檔的單詞加載項保存。我在上面製作了功能區和按鈕。以下是我用於在某個位置保存word文檔的地方：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As Microsoft.Office.Tools.Ribbon.RibbonControlEventArgs) Handles Button1.Click 
     Dim ThisApplication As Word.Application 
     ThisApplication.ActiveDocument.SaveAs("C:\email") 
     ThisApplication.Quit() 
     ThisApplication= Nothing 
     End Sub 

但當我這個按鈕我只是做了email.doc點擊，但該文件不包含打開的文檔中的任何內容，它只是提出了新的doc文件。

我在做什麼錯了？此按鈕上的事件需要與標準Word保存按鈕上的事件相同，所以我該如何做到這一點？

Answer 1

我只能想象，也許你需要先創建一個對象來表示文檔本身。請嘗試以下操作：

Dim ThisApplication As Word.Application 
Dim oDoc As Word.Document = ThisApplication.ActiveDocument 
oDoc.SaveAs("C:\email") 
oDoc.Close()   
ThisApplication.Quit() 
oDoc = Nothing 
ThisApplication = Nothing