28,391
社区成员
发帖
与我相关
我的任务
分享
Function HTMLDecode(sText)
Dim I
sText = Replace(sText, """, Chr(34))
sText = Replace(sText, "<" , Chr(60))
sText = Replace(sText, ">" , Chr(62))
sText = Replace(sText, "&" , Chr(38))
sText = Replace(sText, " ", Chr(32))
For I = 1 to 255
sText = Replace(sText, "&#" & I & ";", Chr(I))
Next
HTMLDecode = sText
End Function
<div style="width:520px;border:1px solid #ccc;height:500px" >
<p><span style="FONT-SIZE: small"><font style="FONT-SIZE: 14px" color="#000000"> 让更多消费者提前拥有爱车,享受新生活。</font></span></p>
<p><span style="FONT-SIZE: small"><font color="#ff0000"><strong> </strong></font></span></p>
<font color="#ff0000">
<p align="center"><strong><img style="WIDTH: 224px; HEIGHT: 276px" src="http://localhost/admin123/Edit2/uploadfile/2013092751082237.jpg" width="331" height="250"></strong></p>
<p align="center"> </p>
<p align="left"><font style="FONT-SIZE: 14px" color="#000000"> 安徽<span style="BORDER-BOTTOM: 0px; BORDER-LEFT: 0px; PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-LEFT: 0px; WIDTH: auto; PADDING-RIGHT: 0px; DISPLAY: inline; FONT-FAMILY: inherit; FLOAT: none; COLOR: rgb(150,10,15); VERTICAL-ALIGN: baseline; BORDER-TOP: 0px; FONT-WEIGHT: 700; BORDER-RIGHT: 0px; PADDING-TOP: 0px">詹氏</span>食品有限公司成立于1998年,是涉足林业生态基地建设、优质农特食品精深加工、连锁加盟销售、电子商务等产业的 “全国经济林产业化龙头企业”、“农业产业化省级龙头企业”、“安徽省民营科技企业”。 公司下设七家子公司,八大职能部门,十余年来执着创新、恒久领跑,目标致力于锻造中国最完整的农特食品产业链,打造中国农特食品最专业化的生产商和连锁渠道商。</font></p>
</font>
<p><span style="FONT-SIZE: small"><strong><font color="#ff0000"> </font></strong></span></p>
</div>