28,390
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
leslielu 2000-08-10
- 打赏
- 举报
至少以我的经验是不行的，给你的建议是不要使用pre 标签，自己使用函数转换成，HTML
function ToHtml(strText)
dim strTemp,strBR
dim intPnt
dim intPrev
strBR=chr(10)
intPnt=1
intPrev=1
strTemp=Replace( strText,strBR,"<br>")
ToHtml=strTemp
end function
function ToHtml(strText)
dim strTemp,strBR
dim intPnt
dim intPrev
strBR=chr(10)
intPnt=1
intPrev=1
strTemp=Replace( strText,strBR,"<br>")
ToHtml=strTemp
end function
【转载】html标签
