关于VC编写的OCX对word操作过程中的模板的问题

Question

我们在VC中写了一个ocx用来对word进行操作，在打开word的时候，自动加载我指定的模板。在使用的过程中出现点一点问题:
 
   在word软件关闭的时候，有的时候系统会提示 是否保存 normail.dot 文件的对话框，此对方框需要点击多次关闭才能正常关闭。  在vba中，有 下面的方法，但在vc中不知如何处理Sub SaveYN() 'ActiveDocument.AttachedTemplate.Save '主动保存关联模板 'ActiveDocument.AttachedTemplate.Saved = True '不保存关联模板 End Sub '----------------------

Answer 1

其实应该让所有的模板保存属性都设置为TRUE，VB代码如下：
Public Sub SetTemplateSaved(ByRef oDoc As Object)
    On Error Resume Next
    Dim oT As Object
    
    oDoc.Application.NormalTemplate.saved = True
    oDoc.AttachedTemplate.saved = True
    
    For Each oT In oDoc.Application.Templates
        oT.saved = True
    Next
    
End Sub单独让normal.dot保存，VB代码：
oDoc.Application.NormalTemplate.saved = True

Answer 2

VC代码：
Word::_DocumentPtr m_spDoc;
...............
m_spDoc->GetApplication()->GetNormalTemplate()->put_Saved(VARIANT_TRUE);

Answer 3

VC代码：
Word::_DocumentPtr m_spDoc;
...............
m_spDoc->GetApplication()->GetNormalTemplate()->put_Saved(VARIANT_TRUE);