海陽(yáng)頂端網(wǎng)進(jìn)百度blog必須輸入密碼的vbscript代碼
更新時(shí)間：2008年06月14日 12:17:48 作者：
今天訪問haiyangtop官方網(wǎng)站，發(fā)現(xiàn)他的blog必須要輸入密碼所以我給出下面的代碼
要看懂下面的代碼，需要了解下面的函數(shù)
vbscript strreverse 函數(shù)
返回字符串，此字符串與指定字符串順序相反。
strreverse(string1)
string1 參數(shù)是要進(jìn)行字符反向的字符串。如果 string1 是零長(zhǎng)度字符串 ("")，則返回零長(zhǎng)度字符串。如果 string1 為 null，則會(huì)出現(xiàn)錯(cuò)誤。
說明
下面的示例利用 strreverse 函數(shù)返回按相反順序排列的字符串：
dim mystr
mystr = strreverse("vbscript") 'mystr 包含 "tpircsbv"。
復(fù)制代碼 代碼如下:
<script language=vbs>
function pass()
input=inputbox("請(qǐng)輸入密碼:","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?字符的反轉(zhuǎn)，即密碼為:"?yhw"
相關(guān)文章
有時(shí)候我們需要獲取當(dāng)前目錄下所有文件夾的名字，那么就可以參考下面的代碼了2013-09-09
使用vbscript腳本在表單中進(jìn)行選擇的代碼...2007-04-04
VBS教程：運(yùn)算符-運(yùn)算符概述...2006-11-11
用vbs列出注冊(cè)表中 Run 項(xiàng)中的所有項(xiàng)目
用vbs列出注冊(cè)表中 Run 項(xiàng)中的所有項(xiàng)目...2007-03-03
在實(shí)際應(yīng)用中，發(fā)現(xiàn)了一個(gè)問題，vbs跨盤移動(dòng)文件夾無權(quán)限，權(quán)限拒絕，但是copy就可以?？梢圆捎米兺ǖ霓k法先復(fù)制再刪除2008-10-10
使用 Iisext.vbs 添加Web服務(wù)擴(kuò)展文件的方法
這篇文章主要介紹了如何使用 iisext.vbs 在本地或遠(yuǎn)程計(jì)算機(jī)上添加 Web 服務(wù)擴(kuò)展文件,需要的朋友可以參考下2014-07-07
這篇文章主要為大家介紹了VBScript編寫Windows防止鎖屏腳本程序示例，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進(jìn)步，早日升職加薪<BR>2022-05-05
用來分割文本的vbs腳本，用來處理數(shù)據(jù)庫(kù)中的文本代碼，按行計(jì)算需要的朋友可以參考下。2010-11-11
利用vbs腳本實(shí)現(xiàn)設(shè)置IE的打印頁(yè)眉頁(yè)腳信息
這篇文章主要為大家分享下通過vbs腳本實(shí)現(xiàn)設(shè)置IE的打印頁(yè)眉頁(yè)腳信息的代碼，需要的朋友可以參考下2007-02-02
利用vbs寫的延時(shí)關(guān)閉ie進(jìn)程的腳本代碼
windows 利用vbs 寫的延時(shí)關(guān)閉ie進(jìn)程的腳本，需要的朋友可以參考下。2010-11-11