读书人

domino开发 :RTF域施用总结

发布时间: 2012-11-20 09:55:43 作者: rapoo

domino开发 :RTF域使用总结
假定 A为可编辑RTF域,B为计算型RTF域,用户在A中输入数据,保存后在B中展示。
(一)、如果A中包含html代码,在B中显示html的显示结果。如果想要在B中展示html源代码,需要在代理中调用下面的方法。

Private Function removeHTML(txt As String) As String'/**' * Convert HTML tags the user enters to escaped entities' * @param String mark-up to parse' * @return String parsed mark-up' */On Error Goto StackError' Clunky I know...removeHTML = Replace(txt, "&", "~AMPERSAND~")removeHTML = Replace(removeHTML, "&", "&")removeHTML = Replace(removeHTML, "<", "<")removeHTML = Replace(removeHTML, ">", ">")removeHTML = Replace(removeHTML, "~AMPERSAND~", "&")Exit Function

(二)、如果A中包含换行符(windows下为回车+换行,即“\r\n”),如果要想在B中显示出换行效果,需要做如下处理。
s1 = Replace(s1, Chr(13) & Chr(10), "<br>")



读书人网 >编程

热点推荐