LotusScript处理特殊字符

最新推荐文章于 2021-04-30 17:27:42 发布

dengweitao

最新推荐文章于 2021-04-30 17:27:42 发布

阅读量343

点赞数

分类专栏： Domino 文章标签： qt

本文链接：https://blog.csdn.net/dengweitao/article/details/105708766

版权

Domino 专栏收录该内容

16 篇文章

订阅专栏

if instr(xmlStr,"<") > 0 then
     xmlStr = replace(xmlStr,"<","&lt;")
end if
if instr(xmlStr,"&") > 0 then
     xmlStr = replace(xmlStr,"<","&amp;")
end if
if instr(xmlStr,">") > 0 then
     xmlStr = replace(xmlStr,"<","&gt;")
end if
'注意：英文双引号替换时为4个英文双引号
if instr(xmlStr,"""") > 0 then
     xmlStr = replace(xmlStr,"""","&quot;")
end if
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
if instr(xmlStr,"'") > 0 then
     xmlStr = replace(xmlStr,"'","&apos;")
end if