Comment enregistrer le document Word ouvert dans vb.net

Question

J'essayais juste de faire des compléments de mot qui allaient sauver document ouvert.J'ai fait le ruban et le bouton là-dessus.Below est le que j'utilise pour enregistrer le document Word sur certains emplacement:

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 

mais quand je clique sur ce bouton, je viens de faire email.doc mais ce document ne contient pas de contenu du document ouvert, il vient de faire nouveau fichier doc.

Qu'est-ce que je fais mal? L'événement sur ce bouton doit être identique à l'événement sur le bouton d'enregistrement de Word standard, alors comment puis-je faire cela?

Answer 1

Je peux seulement imaginer que vous ayez besoin de créer un objet pour représenter le document lui-même en premier. Essayez ce qui suit:

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