首页
社区
课程
招聘
轻松一下,一个 VBS 的 crackme
发表于: 2006-5-19 01:16 11439

轻松一下,一个 VBS 的 crackme

2006-5-19 01:16
11439
收藏
免费 7
支持
分享
最新回复 (32)
雪    币: 110
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
26
确实是有意思的crackme
2009-9-26 23:16
0
雪    币: 76
活跃值: (27)
能力值: ( LV4,RANK:50 )
在线值:
发帖
回帖
粉丝
27
VBS,听说熊猫烧香就有这个
2009-9-27 00:14
0
雪    币: 204
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
28
dim v
dim s
Randomize timer
s=Int(Rnd() * 99999999)
v = Inputbox( "Tell me the Registration key :" & vbcrlf & vbcrlf & "sn" & s)

if v = "sn" & s then
Msgbox "Registration successful !!"
else
Msgbox "Wrong key !"
end if

喜欢这样!
2009-9-27 08:55
0
雪    币: 9
活跃值: (142)
能力值: ( LV12,RANK:200 )
在线值:
发帖
回帖
粉丝
29
什么东西?????????
2009-9-27 11:21
0
雪    币: 9
活跃值: (142)
能力值: ( LV12,RANK:200 )
在线值:
发帖
回帖
粉丝
30
dim v

v = Inputbox( "Tell me the Registration key :")

Randomize 200605

if v <> "sn" & Int(Rnd() * 99999999) then
Msgbox "Registration successful !!"
else
Msgbox "Wrong key !"
end if

随便输入注册码既可注册成功
2009-9-27 11:29
0
雪    币: 238
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
31
哈哈,直接改源码吧
if v = 1 then
输入1就可以了!!
上传的附件:
  • .JPG (9.01kb,17次下载)
2009-9-28 21:18
0
雪    币: 238
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
32
你也可以这样修改,来爆出注册码

dim v
dim m
v = Inputbox( "Tell me the Registration key :")

Randomize 200605
m="sn" & Int(Rnd() * 99999999)
if v = m then
Msgbox "Registration successful !!"
else
Msgbox "Wrong key !"+m
end if
2009-9-28 21:29
0
雪    币: 129
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
33
一个字节爆破不了了
防爆效果显著
2009-9-28 22:48
0
游客
登录 | 注册 方可回帖
返回
//