如何保持从lotus富文本域导出的内容格式?【报酬】
各位,现有一个富文本域,里边的内容是用户以前用c/s的方式手工引入的doc文件,现在我想把富文本域中的内容导出到本地硬盘,但是要保持原有在lotus中内容的格式,比如 在富文本域中字体该加粗的还是保持加粗,该是红色字体的还是保持红色字体。高分求助!如果有示例代码最佳,并且可以行的话,可以考虑【报酬】。! --------------------编程问答-------------------- 你现在这个富文本域里面到底是一个doc附件,还是里面有字符串内容啊? --------------------编程问答-------------------- 目前的里边只是doc,但是肯定要考虑到有用户自己输入的字符串,或者继续添加的图片啊。如果是两个问题,一个是单纯的doc,另一个是字符串内容。
有解决办法吗? --------------------编程问答-------------------- 尝试将Body RTF转换成MIME格式看看
我设想,CS的邮件正文发送出去后接收方收到在IE下查看都能保持样式,也是RTF转换成MIME --------------------编程问答-------------------- 咋整啊? --------------------编程问答-------------------- 自己再顶一下,给个解决方案啊 --------------------编程问答-------------------- 引入的文件后,内容全在这个富文本域里面,后续会有修改的痕迹嘛? --------------------编程问答-------------------- Call uidoc.GotoField( "Body")
Call uidoc.SelectAll
Call uidoc.Copy
'Body 是word中的书签名
Call worddoc.Bookmarks.Item("Body").Select()
Call word.Selection.Paste
不知道是不是你想要的结果,表单中Body是富文本域,存的是用户输入的内容。 拷贝到word中,保持格式不变 --------------------编程问答-------------------- 确认可以吗?我试试 --------------------编程问答--------------------
不会有修改的。 --------------------编程问答-------------------- 假设富文本域只存附件 那么直接下载到本地硬盘就行了
假设是字符串那么直接转换成 Word ,再保存
不是很懂意思
--------------------编程问答-------------------- 如果是附件就直接下载如果是写在域中的那么就用一个函数直接导出来。这两天刚好在做这一块,我还曾经发愁怎么去掉那些标签呢。呵呵 --------------------编程问答-------------------- --------------------编程问答-------------------- 在RTF域中,您还要保留样式(您自己导出来,我可以帮您处理这个问题吧)
不管您这个RTF中有没有附件,还是插入的是文本
第一:您可以判断RTF中有没有附件,可以拆下来。
第二:把内容进行选择后,通过 Microsoft Word 对象导出。有一个公式FileExport(通过 SectionProperties 选择您的 RTF 域)
QQ: 495217965
补充:企业软件 , Lotus