这个JS特调皮 请施主速来降服她

伱那份暧昧ぺ

1. 
   

复制代码

JS代码用文本发出来后360提示对此网站造成威胁拦截，这哔哔的，我用上传文件代替。
js.txt (799 Bytes, 下载次数: 13)

2016-1-9 23:25 上传

点击文件名下载附件
js

JS代码如上 执行getHashCode('2[09b[checkCode[403430')，用浏览器调试结果为Ct.343ec，用调试工具和e语言脚本的结果是错误的bCt.343e

求解决，速来降服这个小妖精吧


补充内容 (2016-1-9 23:50):
楼下说“getHashCode('2[09b[checkCode[403430')   将那个零替换成空就行了 就是删掉” 我试了 浏览器调试的结果和易语言结果还是不一样

我妻由良

.版本 2

.子程序 getHashCode, 文本型
.参数 seed, 文本型
.局部变量 data, 文本型, , "4"
.局部变量 a, 整数型
.局部变量 b, 文本型
.局部变量 name, 文本型
.局部变量 time, 文本型
.局部变量 param1, 文本型
.局部变量 param2, 文本型
.局部变量 param3, 文本型
.局部变量 hashCode, 文本型

data ＝ 分割文本 (seed, “[”, )
a ＝ 到整数 (data [1])
b ＝ data [2]
name ＝ data [3]
time ＝ data [4]
param1 ＝ getPart (b, a, 3)
param2 ＝ getPart (time, a, 3)
param3 ＝ getPart (name, a, 3)
hashCode ＝ param1 ＋ “Ct.” ＋ param2 ＋ param3
hashCode ＝ getPart (hashCode, a, 8)
返回 (hashCode)

.子程序 getPart, 文本型
.参数 a, 文本型
.参数 b, 整数型
.参数 c, 整数型
.局部变量 start, 整数型
.局部变量 retn, 文本型

start ＝ getStartIndex (a, b)
.如果 (start ＞ 0)
    retn ＝ 取文本中间 (a, start ＋ 1, c)
.否则
    retn ＝ 取文本中间 (a, 取文本长度 (a) ＋ start ＋ 1, c)
.如果结束
返回 (retn)



.子程序 getStartIndex, 整数型
.参数 str, 文本型
.参数 a, 整数型
.局部变量 length, 整数型
.局部变量 start, 整数型

length ＝ 取文本长度 (str)
start ＝ a ％ length
返回 (选择 (start ＜ length ÷ 2, start, －start))

oldlee

有偿我来处理。。你懂的。。等人回答的话无视我~打扰了

伱那份暧昧ぺ

不用了

leiyh

getHashCode('2[09b[checkCode[403430')   将那个零替换成空就行了 就是删掉

leiyh

getHashCode('2[9b[checkCode[403430')

伱那份暧昧ぺ

leiyh 发表于 2016-1-9 23:40
getHashCode('2[09b[checkCode[403430')   将那个零替换成空就行了 就是删掉

不对 参数换成getHashCode('10[868[checkCode[403431') 浏览器调试和e语言调试结果还是不一样

oldlee

伱那份暧昧ぺ 发表于 2016-1-9 23:49
不对 参数换成getHashCode('10[868[checkCode[403431') 浏览器调试和e语言调试结果还是不一样

他这意思让你把所有带0的都弄成空，懂了吧

伱那份暧昧ぺ

不对

Hoibben

还是重写个吧~