摘要: 1 Function HtmlDecode(ByVal s) 2 If Has(s) Then 3 s = regReplace(s, "", vbCrLf) 4 s = Replace(s, " ", Chr(9)) 5 s = Replace(s, """, Chr(34... 阅读全文
posted @ 2016-07-20 11:14 Bit5566 阅读(425) 评论(0) 推荐(0) 编辑