海阳顶端网进百度blog必须输入密码的vbscript代码

所属分类: 脚本专栏 / vbs 阅读数: 440
收藏 0 赞 0 分享

要看懂下面的代码,需要了解下面的函数
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"

更多精彩内容其他人还在看

VBS教程:函数-Chr 函数

VBS教程:函数-Chr 函数
收藏 0 赞 0 分享

VBS教程:函数-CDbl 函数

VBS教程:函数-CDbl 函数
收藏 0 赞 0 分享

VBS教程:函数-CDate 函数

VBS教程:函数-CDate 函数
收藏 0 赞 0 分享

VBS教程:函数-CCur 函数

VBS教程:函数-CCur 函数
收藏 0 赞 0 分享

VBS教程:函数-CByte 函数

VBS教程:函数-CByte 函数
收藏 0 赞 0 分享

VBS教程:函数-CBool 函数

VBS教程:函数-CBool 函数
收藏 0 赞 0 分享

VBS教程:函数-Atn 函数

VBS教程:函数-Atn 函数
收藏 0 赞 0 分享

VBS教程:函数-Asc 函数

VBS教程:函数-Asc 函数
收藏 0 赞 0 分享

VBS教程:函数-Array 函数

VBS教程:函数-Array 函数
收藏 0 赞 0 分享

VBS教程:函数-Abs 函数

VBS教程:函数-Abs 函数
收藏 0 赞 0 分享
查看更多