网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

在B/S下如何保持RTF域格式

这篇文章主要为大家展示了“在B/S下如何保持RTF域格式”,内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下“在B/S下如何保持RTF域格式”这篇文章吧。

创新互联建站从2013年开始,是专业互联网技术服务公司,拥有项目网站设计、网站制作网站策划,项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命,1280元固阳做网站,已为上家服务,为固阳各地企业和个人服务,联系电话:18982081108

在B/S下保持RTF域格式的方法

在Lotus b/s程序的开发中,经常要使用到RTF域,而Lotus提供的RTF虽然可以使用applet来显示并可以编辑文本文字的格式,但其功能有限,而且显示速度比较慢.也并不是所有的IE都支持.那么现在开发中用的最多的还是自已来处理RTF域的格式.目前使用最多的应该是基于DHTML编写的网页编辑器,它最终产生的是HTML代码,而在Lotus中HTML代码在RTF域中默认是把标签显示给了用户,这不是我们所想要的效果.解析后的效果才是我们所想要的. 现在总结一下显示RTF域中输入的文字的格式应该有三个不同的方法.看情况而定.


1.在RTF域中输入HTML代码,想保持HTML网页的格式.
解决方法如下:
Sub Initialize    
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Set db = session.CurrentDatabase
   Dim doc As New NotesDocument(db)
   Call doc.AppendItemValue("From", session.UserName)
   Call doc.AppendItemValue("Subject", _
   "Meeting time changed")
   Dim richStyle As NotesRichTextStyle
   Set richStyle = session.CreateRichTextStyle
   Dim richText As New NotesRichTextItem(doc, "Body")
   richStyle.PassThruHTML= True
   Call richText.AppendStyle(richStyle)
   Call richText.AppendText("Hello")
   Call doc.Save(True, False)
End Sub

以上代码显示的最后效果是Hello而不是Hell,这段代码的关键是richStyle.PassThruHTML= True这句,它把RTF域的PassThruHTML属性设为了TRUE这时候RTF就会完全解析HTML标签并显示成网页的格式.

但是我好像发现在用代理来创建一个新文档时并不能直正的创建出一个richStyle.PassThruHTML= True的RTF域.有时候并不是很灵.特别是在当代理产生了多个同名的RTF域时这种情况出现的更多.

2.当RTF域中输入的是文本文字不带 HTML标签时,这时如果要在IE下保持格式需要把回车符换成HTML标签即:
或者是

标签.并把空格符换成 
又因为在dominoR5下lotusScript没有提供replace函数(Domino R6下自带了)所以我们必须要自已写一个replace函数来处理回车换行符.

以上是“在B/S下如何保持RTF域格式”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!


网页题目:在B/S下如何保持RTF域格式
转载源于:http://bjjierui.cn/article/gppsse.html

其他资讯