VBS 16進(jìn)制驗(yàn)證特定字符
更新時(shí)間：2011年01月11日 23:22:07 作者：
閑來無事發(fā)個(gè)VBS 16進(jìn)制驗(yàn)證特定字符 例子驗(yàn)證VBS自身(紅色部分fastslz)
復(fù)制代碼 代碼如下:
'驗(yàn)證字符：fastslz
file=Wscript.ScriptFullName
Dim slz
set slz = CreateObject("Adodb.Stream")
slz.Type = 1
slz.Mode = 3
slz.Open
slz.Position = 0
slz.Loadfromfile file
Bin=slz.read(18)
if AscB(MidB(Bin,12,1))=&H66 and AscB(MidB(Bin,13,1))=&H61 and AscB(MidB(Bin,14,1))=&H73 and AscB(MidB(Bin,15,1))=&H74 and AscB(MidB(Bin,16,1))=&H73 and AscB(MidB(Bin,17,1))=&H6C and AscB(MidB(Bin,18,1))=&H7A Then
WScript.echo "通過驗(yàn)證"
else
WScript.echo "非法修改"
end if
您可能感興趣的文章:
- C# VB 實(shí)現(xiàn)10進(jìn)制 16進(jìn)制之間互相轉(zhuǎn)換
- JavaScript中的16進(jìn)制字符(改進(jìn))
- JavaScript中的16進(jìn)制字符介紹
- php中將圖片gif,jpg或mysql longblob或blob字段值轉(zhuǎn)換成16進(jìn)制字符串
- vbs sendKeys 16進(jìn)制的結(jié)合使用(打開IE，靜音，打開播放器等)
- asp.net(c#)下各種進(jìn)制間的輕松轉(zhuǎn)換(2進(jìn)制、8進(jìn)制、10進(jìn)制、16進(jìn)制)
- vbscript語句中“&H”專用于16進(jìn)制數(shù)表示
- exe轉(zhuǎn)換16進(jìn)制的html保存的hta實(shí)現(xiàn)代碼
- C# 16進(jìn)制與字符串、字節(jié)數(shù)組之間的轉(zhuǎn)換
- 文本和16進(jìn)制UltraEdit-32 v13.20+3 官方簡體中文版+破解補(bǔ)丁 提供下載
- 16進(jìn)制的轉(zhuǎn)換之javascript運(yùn)行時(shí)會自動轉(zhuǎn)碼
- c#實(shí)現(xiàn)16進(jìn)制和字符串之間轉(zhuǎn)換的代碼
- 16進(jìn)制顯示字節(jié)流技巧分享
相關(guān)文章
在一個(gè)vbs中包含其他vbs文件的方法...2007-03-03
VBS教程：VBscript語句-Dim 語句...2006-11-11
vbs整人代碼大集合，收集的比較全，喜歡的朋友可以參考下。不要搞破壞，學(xué)習(xí)vbs的朋友非常有幫助，死循環(huán)的使用比較多。2011-02-02
VBS調(diào)用Windows API函數(shù)的代碼
結(jié)合兩篇文章（請先閱讀這兩篇文章），寫了一個(gè)示例程序，效果是移動鼠標(biāo)至桌面左上角。2011-01-01
VBS教程：VBScript 語句-Randomize 語句
VBS教程：VBScript 語句-Randomize 語句...2006-11-11
用vbs實(shí)現(xiàn)重新啟動 Internet Explorer
用vbs實(shí)現(xiàn)重新啟動 Internet Explorer...2007-03-03
VBS教程：函數(shù)-CLng 函數(shù)...2006-11-11
修復(fù)Windows上面的WScript的腳本(.vbs)不能執(zhí)行了
修復(fù)Windows上面的WScript的腳本(.vbs)不能執(zhí)行了...2007-03-03
用vbs確定可移動驅(qū)動器的連接時(shí)間...2007-03-03
首先要說的是，VBS是由腳本宿主解釋執(zhí)行的未經(jīng)編譯的明文代碼。連exe的加密免殺都十分困難，大家也不必報(bào)用VBS挑戰(zhàn)殺軟的幻想2012-12-12