主要是对编程初学者提供资料
执行. 据个例子来说:
dim a '注意:常量不需要在dim里面声明,否则会引发错误
const pass="123456" '这是一个字符串 请用""包裹起来. 设定密码为常量, 不可变更 do
a=inputbox("请输入密码") if a=pass then
msgbox("密码校验成功") exit do end if loop
这个程序会一直不停的问你密码, 知道你输入了正确的密码为止.(if可以嵌套在另一个if当中, 也可以嵌套在循环体当中
, 所以一定要用缩进, 来分清楚程序的各个部分). 这个程序是很经典的, 早期的程序都是这么做的. 但是我们是Hacker, 所以
我们了解系统的安全性, 这种无限次认证程序很容易被穷举破解, 我们要来限定认证的次数. 修改程序如下
dim a,ctr
ctr=0 '设置计数器
const pass="pas123_" '上面的那个是弱密码, 这次改的强一点 do
if ctr=3 then
msgbox("已经达到认证上限, 认证程序关闭") exit do else
a=inputbox("请输入密码") if a=pass then msgbox("认证成功")
msgbox("(你可以在这里加一段成功后得到的信息)") exit do else
ctr=ctr+1 '如果密码出错就增加一次错误认证计数 msgbox("认证出错, 请检查密码") end if end if loop
运行这个程序试试看, 当你出了3此错误以后, 就会停止再次询问密码, 关闭程序. telnet认证用来限制次数的程序与此大
