当前位置: 代码迷 >> vbScript >> vbs达人帮忙看一下这道题~解决办法
  详细解决方案

vbs达人帮忙看一下这道题~解决办法

热度:6306   发布时间:2013-02-26 00:00:00.0
vbs达人帮忙看一下这道题~
考点:某编码、vbs

答案:
37,50,53,37,52,50,37,51,53,37,50,53,37,52,52,37,52,49,37,50,53,37,52,50,37,51,54,37,50,53,37,52,54,37,52,53,37,50,53,37,52,50,37,51,57,37,50,53,37,52,52,37,51,56,37,50,53,37,52,51,37,51,51,37,50,53,37,52,52,37,52,51,37,50,53,37,52,51,37,51,50,37,50,53,37,52,53,37,52,50,37,50,53,37,51,51,37,52,49,37,50,53,37,51,52,37,51,55,37,50,53,37,51,54,37,52,54,37,50,53,37,51,50,37,52,52,37,50,53,37,51,55,37,51,52,37,50,53,37,51,54,37,52,54,37,50,53,37,51,50,37,52,52,37,50,53,37,51,51,37,51,50

提示:
M = Split(str, ",", -1, 1):For each od in M:Nd=Nd&chr(od):Next



真实的答案应该是什么啊?

------解决方案--------------------------------------------------------
第二关密码:Go-to-2
------解决方案--------------------------------------------------------
xxx.vbs
VBScript code
str = "37,50,53,37,52,50,37,51,53,37,50,53,37,52,52,37,52,49,37,50,53,37,52,50,37,51,54,37,50,53,37,52,54,37,52,53,37,50,53,37,52,50,37,51,57,37,50,53,37,52,52,37,51,56,37,50,53,37,52,51,37,51,51,37,50,53,37,52,52,37,52,51,37,50,53,37,52,51,37,51,50,37,50,53,37,52,53,37,52,50,37,50,53,37,51,51,37,52,49,37,50,53,37,51,52,37,51,55,37,50,53,37,51,54,37,52,54,37,50,53,37,51,50,37,52,52,37,50,53,37,51,55,37,51,52,37,50,53,37,51,54,37,52,54,37,50,53,37,51,50,37,52,52,37,50,53,37,51,51,37,51,50"M = Split(str, ",", -1, 1)For Each od in M  Nd = Nd & chr(od)NextWScript.Echo unescape(unescape(Nd))
  相关解决方案