復(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 "通過(guò)驗(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é)合使用(打開(kāi)IE，靜音，打開(kāi)播放器等)
- asp.net(c#)下各種進(jìn)制間的輕松轉(zhuǎn)換(2進(jìn)制、8進(jìn)制、10進(jìn)制、16進(jìn)制)
- vbscript語(yǔ)句中“H”專(zhuān)用于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 官方簡(jiǎn)體中文版+破解補(bǔ)丁 提供下載
- 16進(jìn)制的轉(zhuǎn)換之javascript運(yùn)行時(shí)會(huì)自動(dòng)轉(zhuǎn)碼
- c#實(shí)現(xiàn)16進(jìn)制和字符串之間轉(zhuǎn)換的代碼
- 16進(jìn)制顯示字節(jié)流技巧分享
