我在代码中打开了一个WORD文档，然后写了一行文本，然后另存后发现另存的始终是空的！请帮忙看看代码！谢谢了！

// Convenient values declared as ColeVariants.
COleVariant vTrue((short)TRUE),
vFalse((short)FALSE), 
vOpt((long)DISP_E_PARAMNOTFOUND, VT_ERROR); _Application objWord;
// Get the IDispatch pointer and attach it to the objWord object.
if (!objWord.CreateDispatch("Word.Application"))
{
AfxMessageBox("Couldn't get Word object.");
return;
} objWord.SetVisible(FALSE);  //ÏÔʾӦÓóÌÐò
Documents Docs(objWord.GetDocuments());
_Document Doc;
LPDISPATCH lpDispOpen=Docs.Open(COleVariant("C:\\Test.doc"),vOpt,vOpt,vOpt,vOpt,vOpt,
vOpt,vOpt,vOpt,vOpt,vOpt,vOpt,vOpt,vOpt,vOpt);
Doc.AttachDispatch(lpDispOpen);

Docs = objWord.GetDocuments();
Doc = Docs.Add(vOpt, vOpt,vOpt,vOpt); Selection Sel;
Sel = objWord.GetSelection(); Sel.SetText("FFFFFFFFFFF"); _Document ActiveDoc;
ActiveDoc = objWord.GetActiveDocument();
ActiveDoc.SaveAs(COleVariant("c:\\test1.doc"),    
COleVariant((short)0),
vFalse, COleVariant(""), vTrue,COleVariant(""),
vFalse, vFalse, vFalse, vFalse,vFalse,vFalse,vFalse,
vFalse,vFalse,vFalse);

    objWord.Quit(vFalse, vTrue, vFalse );