怎么改,才能将东西写进Doc
void COfficeView::OnFileSave()
{
// TODO: Add your command handler code here
TRY{
LPDISPATCH lpDisp;
lpDisp = m_pSelection->GetIDispatch();
Documents docs;
_Application app;
_Document mydoc;
Documents my;
Paragraphs pars;
Paragraph par;
mydoc.AttachDispatch (lpDisp,TRUE);
my.AttachDispatch(lpDisp,TRUE);
app=mydoc.GetApplication ();
pars = mydoc.GetParagraphs();
//i don't know how can i write things in my doc.
mydoc.Activate ();
BOOL password=mydoc.GetHasPassword ();
mydoc.SetPassword ("love");
password=mydoc.GetHasPassword ();
COleVariant vFalse((short)FALSE);
mydoc.SaveAs(COleVariant("c:\\love.doc"),vFalse,vFalse, COleVariant(""),vFalse,
COleVariant(""),vFalse,vFalse,vFalse,vFalse,vFalse);
}
CATCH(CException, e)
{
}
END_CATCH
}