站长资源脚本专栏

要看懂下面的代码，需要了解下面的函数
vbscript strreverse 函数
返回字符串，此字符串与指定字符串顺序相反。
strreverse(string1)
string1 参数是要进行字符反向的字符串。如果 string1 是零长度字符串 ("")，则返回零长度字符串。如果 string1 为 null，则会出现错误。

说明
下面的示例利用 strreverse 函数返回按相反顺序排列的字符串：

dim mystr
mystr = strreverse("vbscript") 'mystr 包含 "tpircsbv"。

复制代码 代码如下:
<script language=vbs> 
function pass() 
input=inputbox("请输入密码:","hello",,300,300) 
if input=StrReverse("why?") then 
location.href=StrReverse("tpircsbvym/moc.udiab.ih//:ptth") 
else 
MsgBox "error" 
location.href=window.location.href 
end if 
end function 
</script>

下面我们分析下上面的vbs代码，高手飘过吧
if input=StrReverse("why?") then   密码就是why?字符的反转，即密码为:"?yhw"