LNNotesSession Session;
LNDatabase Db;
LNRichText RT, NewRT;
LNViewFolder Folder1, Folder2;
DBHANDLE hdb = NULL;
STATUS ret = Session.Init();
Session.GetDatabase("C:\\MyRichText.nsf", &Db, "");
Db.Open();
Db.GetViewFolder("First", &Folder1);
Db.CreateDocument(&NewDoc, MAIL_REPLY_FORM);
NewDoc.Open( LNNOTEOPENFLAGS_DEFAULT );
NewDoc.CreateItem("Body", &NewRT);
NewRT.GetCursor(&rtCursor);
NewRT.CreateAttachment("C:\\link1.txt",&rtCursor,"my text file",TRUE);
NewRT.CreateAttachment("C:\\link1.doc",&rtCursor,"my doc file",TRUE);
NewRT.CreateAttachment("C:\\link1.xls",&rtCursor,"my xls file",TRUE);
NewDoc.Save();
NewDoc.Close();
Folder1.FolderAddDocument(NewDoc);
Db.Close();
Session.Term();
|