在有些时候我们无法控制乱码的出现, 比如发送邮件的时候有些邮件显示乱码, 比如Ajax返回数据总是乱码. 怎么办? 前些天我就碰到了用Ajax提交表单, 然后发送邮件的情况. 于是写出了下面的两个函数来解决这两个问题. 之一个函数把HTML中的数据转成HTML实体, 而HTML标签则自动不转, 这样无论到哪里都不会乱码, 可以在发送邮件时选择发送HTML格式的邮件. 第二个函数把 *** 数据同样是换成转义字符, 同样避开了 *** 关键词等字符的转换, 不管网页是什么编码它都不会乱码. 废话少说, 看下面的代码. Function htmlentities(str) Dim a,i,char For i = 1 to Len(str) char = mid(str, i, 1) a=Ascw(char) If a 128 Or a 0 then htmlentities = htmlentities # clng(h hex((Ascw(char)))) ; Else htmlentities = htmlentities char End if Next End Function Function Unicode(str1) Dim str,temp str = For i=1 To Len(str1) temp = Hex(AscW(Mid(str1,i,1))) If len(temp) 5 Then temp = Right(0000 temp, 4) str = str u temp Next Unicode = str End Function 如果你是抱着拿着就用的态度那么可以什么也不管直接用, 当然很多时候我们为了满足特殊情况的需要, 会改写一些代码, 如果你报着学习与研究的态度, 那么这里需要注意的是 Ascw(char) 函数有可能返回长整型值, 而ASP把它当成整型看待, 需要做些小的处理.
本文目录一览: 1、求黑客帝国3和源代码高清下载资源...谢谢 2、电影 黑客帝国全集下载,要带字幕 3、求好心人给黑客帝国3BD中英双字1280高清种子下载,跪谢 4、黑客帝国3:矩阵革...
怎么查看女朋友跟别人的微信聊天记录-免费接单黑客QQ 网络投资平台之上常常会发生“高阶理财师教你融资”、“低门槛低收益”、“随进随出速度慢”等字眼,这些洋溢诱惑的词汇常常让投资者蠢蠢欲动,不过这动机...
QQ是腾讯企业发布的一款及时通讯互联网专用工具,目前为止早已有8亿人到应用。坚信有许多 人与小编一样,以前为了更好地QQ升级快而开展各种各样放置挂机,只不过是那时候用的還是赛班系统软件的Noki...
这些兼职都是我自己了解得来的,也做过一段时间了,不是大钱,都是由小钱积少成多的,还算安全可靠的。 一、做悬赏任务得赏金。去浏览器下载“众人帮”、“牛帮”这样的app,是做悬赏任务得赏金的,赏金有高有...
小學生搞笑小品劇本《新學生》讀書啊,我信赖但有朗朗書聲出破廬,遲早有一日有萬鯉躍龍門之奇象。 某班來瞭個新生。 一天,老師問他:你多大瞭? 學生:請問老師是問我哪裡多大?...
本文导读目录: 1、黑客如何DDOS攻击Windows系统 2、所谓的黑客攻防是通过什么实现的呢? 3、网络安全和黑客攻防有什么区别? 4、如何构建无法被攻破黑客防御系统 5、关于黑客...