domino中实现将本地文件放入数据库中的LS代码
Link URL: http://www.piikee.net/read.php/402.htm
Sub InitializeDim session As New NotesSessionDim db As NotesDatabaseDim doc As NotesDocumentDim rtitem As NotesRichTextItemDim object As NotesEmbeddedObjectSet db = session.CurrentDatabaseSet doc = New NotesDocument(db)Set rtitem = New NotesRichTextItem( doc, "Body" + i )Set bject = rtitem.EmbedObject _( EMBED_ATTACHMENT, "", "c:\test.txt")doc.Form. = "nup"doc.Subject = "Here's Jim's document, as an attachment"Call doc.Save( True, True )End Sub
该代码实现把本地文件c:\test.txt放入当前文档数据库。Tags - domino , ls代码
Link URL: http://www.piikee.net/read.php/402.htm
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/15647543/viewspace-674009/ ，如需转载，请注明出处，否则将追究法律责任。
上一篇：
domino文件拆离数据库，放入指定目录
下一篇：
domino中上传控件文件拆离的LS代码
请登录后发表评论
登录
全部评论
