Blog Main用 Script 实现 UrlEncode 和 UrlDecode网络开发images/icons/14.gif<script language="vbscript">
Function str2asc(strstr)
str2asc = Hex(asc(strstr))
End Function
Function asc2str(ascasc)
asc2str = Chr(ascasc)
End Function
</script>
<script language="javascript">
function UrlEncode(str){
var ret = "";
var strSpecial = "!\"#$%&'()*+,/:;<=>?[]^`{|}~%";
for (var i=0; i<str.length; i++) {
var chr = str.charAt(i);
var c = str2asc(chr);
if (parseInt("0x"+c) > 0x7f) {
ret += "%" + c.slice(0,2) + "%" + c.slice(-2);
} else {
if (chr == " ")
ret += "+";
else if (strSpecial.indexOf(chr) != -1)
ret += "%" + c.toString(16);
else
ret += chr;
}
}
return ret;
}
function UrlDecode(str) {
var ret = "";
for (var i=0; i<str.length; i++) {
var chr = str.charAt(i);
if (chr == "+") {
ret+=" ";
} else if(chr=="%") {
var asc = str.substring(i+1,i+3);
if (parseInt("0x"+asc)>0x7f) {
ret+=asc2str(parseInt("0x"+asc+str.substring(i+4,i+6)));
i+=5;
} else {
ret+=asc2str(parseInt("0x"+asc));
i+=2;
}
} else {
ret+= chr;
}
}
return ret;
}
alert(UrlDecode(UrlEncode("计算机")));
</script>
下面是另外一段 vbs 的 UrlEncode
]]>2007-07-21 16:31:022008-08-17 19:37:0003487常用数据库JDBC连接写法郁闷，ArcGIS 装了不能用Category日志分类Archive日志归档User Panel控制面板Recent Article最新日志Search查询搜索Recent Comments最新评论Statistics统计信息3false