07 2016 档案

ASP 转换HTML特殊字符
摘要：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 阅读(437) 评论(0) 推荐(0)
ASP汉字转拼音函数的方法
摘要：<% 'ASP汉字转拼音函数 Set d = CreateObject("Scripting.Dictionary") d.add "a",-20319 d.add "ai",-20317 d.add "an",-20304 d.add "ang",-20295 d.add "ao",-20292 阅读全文
posted @ 2016-07-15 18:16 Bit5566 阅读(627) 评论(0) 推荐(0)
用ASP实现文件下载
摘要：<% '**************************************************************'**使用方法： **'**在点击下载处加连接<a href="load.asp?filename=文件名"></a> **'**阳光白雪——2005年11月21日 * 阅读全文
posted @ 2016-07-14 19:53 Bit5566 阅读(3425) 评论(0) 推荐(0)