87,914
社区成员
发帖
与我相关
我的任务
分享
'vbs的pow函数,这里只实现了ExpNum为整数的
Function pow(baseNum,ExpNum)
If baseNum=0 Then
pow="NaN":Exit Function
End If
ExpNum=CInt(ExpNum)
If ExpNum=0 Then
pow=1
ElseIf ExpNum>0 Then
pow=baseNum
For i=2 To ExpNum
pow=pow*baseNum
Next
Else
pow=1/baseNum
For i=2 To Abs(ExpNum)
pow=pow*(1/baseNum)
Next
End If
End Function
'转换16进制中对应的高位到数字
Function alphaTOnum(alpha)
alpha=LCase(alpha)
Select Case alpha
Case "a" alphaTOnum=10
Case "b" alphaTOnum=11
Case "c" alphaTOnum=12
Case "d" alphaTOnum=13
Case "e" alphaTOnum=14
Case "f" alphaTOnum=15
End select
End function
'将16进制数转换为10进制数
Function u16ToInt(u16Str)
u16Str=Trim(u16Str&"")
If u16Str="" Then
u16ToInt="":Exit Function
End If
Dim num,tmpNum:num=0
For i=1 To 4
tmpNum=Mid(u16Str,i,1)
If IsNumeric(tmpNum) Then
num=num+CInt(tmpNum)*pow(16,4-i)
Else
num=num+alphaTOnum(tmpNum)*pow(16,4-i)
End If
Next
u16ToInt=num
End Function
'解密函数
Function Decode(eStr)
dim str,re:str=""
Set re=New RegExp
re.Global=True
re.IgnoreCase=True
re.Pattern="\u([0-9a-f]{4})"
Set ms=re.Execute(estr)
For Each m In ms
str=str+chrw(u16ToInt(m.submatches(0)))
Next
Set re=Nothing
Decode=str
End Function
'下面测试用的,如果是asp,需要把msgbox更改为response.write就可以看到结果了
encodeStr="\u5317\u4eac\u6b22\u8fce\u4f60"
MsgBox encodeStr&vbNewLine&"===>"&vbNewLine&Decode(encodeStr)
encodeStr="\u767d\u72d0"
MsgBox encodeStr&vbNewLine&"===>"&vbNewLine&Decode(encodeStr)
encodeStr="\u6cbf\u6d77\u516c\u8def\u7684\u51fa\u53e3"
MsgBox encodeStr&vbNewLine&"===>"&vbNewLine&Decode(encodeStr)
<textarea id="test" rows="6" cols="60">var queries = [ ["\u5317\u4eac\u6b22\u8fce\u4f60","0","","","http://laiba.tianya.cn/laiba/Community?cmm\x3d0000043637"], ["\u7231\u4f60\u7231\u7684\u597d\u75b2\u60eb","0","","",""], ["\u7231\u4e0a\u4f60\u662f\u4e00\u4e2a\u9519","0","","",""], ["\u6211\u548c\u4f60","1","","",""], ["\u6211\u4eec\u7684\u7eaa\u5ff5","1","","",""], ["\u7231\u4e0d\u80fd\u505a\u4e3b","-1","","",""], ["\u4e00\u4e2a\u4eba\u7684\u5c4b\u9876","-1","","",""], ["\u6c5f\u6e56\u4eba\u6b4c\u66f2","-1","","",""], ["\u82b1\u5bb9\u7626","1","","",""], ["\u5f69\u8679","-1","","",""], ["\u81ea\u7531\u98de\u7fd4","1","","",""], ["\u767d\u72d0","-1","","",""], ["\u751c\u871c\u871c","-1","","","http://laiba.tianya.cn/laiba/Community?cmm\x3d0000000711"], ["\u5de6\u8fb9","1","","",""], ["\u505a\u4f60\u7684\u7231\u4eba","-1","","",""], ["\u6d77\u9614\u5929\u7a7a","1","","","http://laiba.tianya.cn/laiba/Community?cmm\x3d0000029600"], ["\u7b49\u7231\u7684\u73ab\u7470","1","","",""], ["\u65e5\u4e0d\u843d","1","","",""], ["\u653e\u7f8a\u7684\u661f\u661f\u6b4c\u66f2","1","","",""], ["\u9690\u5f62\u7684\u7fc5\u8180","0","","",""], ["\u9047\u4e0a\u4f60\u662f\u6211\u7684\u7f18","-1","","",""], ["\u611f\u52a8\u5929\u611f\u52a8\u5730","0","","",""], ["\u4e0d\u8981\u5728\u6211\u5bc2\u5bde\u7684\u65f6\u5019\u8bf4\u7231\u6211","1","","",""], ["\u753b\u5fc3","-1","","",""], ["\u4f60\u7684\u627f\u8bfa","1","","",""], ["\u611f\u6069\u7684\u5fc3","-1","","",""], ["\u98de\u5411\u522b\u4eba\u7684\u5e8a","1","","",""], ["\u7231\u60c5\u91cc\u6ca1\u6709\u8c01\u5bf9\u8c01\u9519","-1","","",""], ["\u6700\u540e\u4e00\u6b21\u7684\u6e29\u67d4","-1","","",""], ["\u505a\u6211\u8001\u5a46\u597d\u4e0d\u597d","1","","",""], ["\u660e\u6708\u51e0\u65f6\u6709","-1","","",""], ["\u5373\u4f7f\u77e5\u9053\u8981\u89c1\u9762","1","","",""], ["\u5929\u57df","-1","","",""], ["\u6447\u554a\u6447","1","","",""], ["\u600e\u4e48\u4f1a\u72e0\u5fc3\u4f24\u5bb3\u6211","-1","","",""], ["\u6625\u6c5f\u82b1\u6708\u591c","-1","","",""], ["\u83ca\u82b1\u53f0","-1","","",""], ["\u7b49\u4e00\u5206\u949f","1","","",""], ["\u6cbf\u6d77\u516c\u8def\u7684\u51fa\u53e3","1","","",""], ["\u7231\u4e0a\u4f60\u662f\u6211\u7684\u9519","1","","",""], ["\u6709\u6ca1\u6709\u4eba\u544a\u8bc9\u4f60","1","","",""], ["\u8fb9\u505a\u8fb9\u7231","1","","",""], ["\u51e4\u821e\u4e5d\u5929","-1","","",""], ["\u6000\u5ff5\u8fc7\u53bb","1","","",""], ["\u6211\u4eec\u7684\u7231","-1","","",""], ["\u548c\u68a6\u4e00\u8d77\u98de","-1","","",""], ["\u4e01\u9999\u82b1","1","","",""], ["\u4e0b\u8f88\u5b50\u4e0d\u505a\u5973\u4eba","-1","","",""], ["\u8eb2\u907f\u7684\u7231","1","","",""], ["\u73ab\u7470\u82b1\u7684\u846c\u793c","1","","",""], ];
</textarea>
<input type="button" value="反编码" onclick="jiemi()"/>
<script language="javascript">
function jiemi(){
var t=document.getElementById("test").value;
var t=eval('\''+t.replace(/\\u/g, '%u')+'\'');
document.write(unescape(t))
}
</script>
<textarea id="test" rows="6" cols="60">var queries = [ ["\u5317\u4eac\u6b22\u8fce\u4f60","0","","","http://laiba.tianya.cn/laiba/Community?cmm\x3d0000043637"], ["\u7231\u4f60\u7231\u7684\u597d\u75b2\u60eb","0","","",""], ["\u7231\u4e0a\u4f60\u662f\u4e00\u4e2a\u9519","0","","",""], ["\u6211\u548c\u4f60","1","","",""], ["\u6211\u4eec\u7684\u7eaa\u5ff5","1","","",""], ["\u7231\u4e0d\u80fd\u505a\u4e3b","-1","","",""], ["\u4e00\u4e2a\u4eba\u7684\u5c4b\u9876","-1","","",""], ["\u6c5f\u6e56\u4eba\u6b4c\u66f2","-1","","",""], ["\u82b1\u5bb9\u7626","1","","",""], ["\u5f69\u8679","-1","","",""], ["\u81ea\u7531\u98de\u7fd4","1","","",""], ["\u767d\u72d0","-1","","",""], ["\u751c\u871c\u871c","-1","","","http://laiba.tianya.cn/laiba/Community?cmm\x3d0000000711"], ["\u5de6\u8fb9","1","","",""], ["\u505a\u4f60\u7684\u7231\u4eba","-1","","",""], ["\u6d77\u9614\u5929\u7a7a","1","","","http://laiba.tianya.cn/laiba/Community?cmm\x3d0000029600"], ["\u7b49\u7231\u7684\u73ab\u7470","1","","",""], ["\u65e5\u4e0d\u843d","1","","",""], ["\u653e\u7f8a\u7684\u661f\u661f\u6b4c\u66f2","1","","",""], ["\u9690\u5f62\u7684\u7fc5\u8180","0","","",""], ["\u9047\u4e0a\u4f60\u662f\u6211\u7684\u7f18","-1","","",""], ["\u611f\u52a8\u5929\u611f\u52a8\u5730","0","","",""], ["\u4e0d\u8981\u5728\u6211\u5bc2\u5bde\u7684\u65f6\u5019\u8bf4\u7231\u6211","1","","",""], ["\u753b\u5fc3","-1","","",""], ["\u4f60\u7684\u627f\u8bfa","1","","",""], ["\u611f\u6069\u7684\u5fc3","-1","","",""], ["\u98de\u5411\u522b\u4eba\u7684\u5e8a","1","","",""], ["\u7231\u60c5\u91cc\u6ca1\u6709\u8c01\u5bf9\u8c01\u9519","-1","","",""], ["\u6700\u540e\u4e00\u6b21\u7684\u6e29\u67d4","-1","","",""], ["\u505a\u6211\u8001\u5a46\u597d\u4e0d\u597d","1","","",""], ["\u660e\u6708\u51e0\u65f6\u6709","-1","","",""], ["\u5373\u4f7f\u77e5\u9053\u8981\u89c1\u9762","1","","",""], ["\u5929\u57df","-1","","",""], ["\u6447\u554a\u6447","1","","",""], ["\u600e\u4e48\u4f1a\u72e0\u5fc3\u4f24\u5bb3\u6211","-1","","",""], ["\u6625\u6c5f\u82b1\u6708\u591c","-1","","",""], ["\u83ca\u82b1\u53f0","-1","","",""], ["\u7b49\u4e00\u5206\u949f","1","","",""], ["\u6cbf\u6d77\u516c\u8def\u7684\u51fa\u53e3","1","","",""], ["\u7231\u4e0a\u4f60\u662f\u6211\u7684\u9519","1","","",""], ["\u6709\u6ca1\u6709\u4eba\u544a\u8bc9\u4f60","1","","",""], ["\u8fb9\u505a\u8fb9\u7231","1","","",""], ["\u51e4\u821e\u4e5d\u5929","-1","","",""], ["\u6000\u5ff5\u8fc7\u53bb","1","","",""], ["\u6211\u4eec\u7684\u7231","-1","","",""], ["\u548c\u68a6\u4e00\u8d77\u98de","-1","","",""], ["\u4e01\u9999\u82b1","1","","",""], ["\u4e0b\u8f88\u5b50\u4e0d\u505a\u5973\u4eba","-1","","",""], ["\u8eb2\u907f\u7684\u7231","1","","",""], ["\u73ab\u7470\u82b1\u7684\u846c\u793c","1","","",""], ];
</textarea>
<input type="button" value="反编码" onclick="jiemi()"/>
<script language="javascript">
function jiemi(){
var t=document.getElementById("test").value;
var t=eval('\''+t.replace(/\\u/g, '%u')+'\'');
alert(unescape(t))
}
</script>
function doAntiJava() {
var str = dest.value;
var tmp1 = "";
for (var i = 0; i < str.length; i++) {
if (str.charCodeAt(i) == 10) {
tmp1 += " <br/>";
}
else if (str.charCodeAt(i) == 13) {
}
else if (str.charAt(i) == ' <') {
tmp1 += "<";
}
else if (str.charAt(i) == '\'') {
tmp1 += "\\\'";
}
else if (str.charAt(i) == '\\') {
if (i < (str.length - 1) && str.charAt(i + 1) != 'u') {
tmp1 += "\\\\";
}
else {
tmp1 += "\\";
}
}
else if (str.charAt(i) == '>') {
tmp1 += ">";
}
else {
tmp1 += str.charAt(i);
}
}
var dd = window.open("");
dd.document.write(" <script>document.write('"+tmp1+"');");
dd.document.write(" <");
dd.document.write("/script>");
}
JAVA Unicode编码:<textarea id="dest" rows="6" cols="60"></textarea></textarea> <input type="button" value="反编码" onclick="doAntiJava();"/>