返回狼盟编程首页
编程搜索 [狼盟旧档]
论坛统计


请输入搜索关键字：
├─◆ 狼盟首页 > 查看贴子 > 详细信息

楼主

[原创]用qbasic设计开机输入密码程序！（很诱人吧！其实很简单）


SORRY!本程序在win2000 不能起效，win98经测试可以，xp吗...没做过测试，希有兴趣的朋友们测一下。估计也不行。

-------------------------------------------------------------------------

qbasic中程序如下：

CLS

again:

INPUT "Please input the number!"; a

INPUT "Please input the number!"; b

DO UNTIL a = 12345 AND b = 12345

PRINT "Wrong! Wrong!Please input the number again!"

goto again

LOOP

PRINT "right!"

SYSTEM

---------------------------

保存为mima.bas

然后，将你的系统盘下的autoexec.bat文件打开，加入"qbasic/run x:xxxmima.bas" 这句话（引号不写），保存。大功告成！重起看看..

默认密码为：12345

谢谢！









rickone [ 1 楼 ]
2004-07-07 21:23:00
密码为什么要用数字呢？用字符更好啊
cls
repeat:
input "Password:",PW$
if not PW$="qbasic" then
print "Wrong!"
goto repeat
end if
system 

末日狂者 [ 2 楼 ]
2004-07-08 08:04:00
若是能以“*”显示那就更好了！可结合http://www.programfan.com/club/showbbs.asp?id=44198 

末日狂者 [ 3 楼 ]
2004-07-08 08:07:00
这样do until ...loop就有用了，就是繁了一点。
CLS
INPUT "Please input the number!"; a
INPUT "Please input the number!"; b
DO UNTIL a = 12345 AND b = 12345
PRINT "Wrong! Wrong!Please input the number again!"
INPUT "Please input the number!"; a
INPUT "Please input the number!"; b
LOOP
PRINT "right !"
SYSTEM 

qb阿菜 [ 4 楼 ]
2004-07-10 15:18:00
这个是好东东~~~~  

飞鸟12 [ 5 楼 ]
2004-10-31 13:04:00
以“*”显示密码参见http://www.programfan.com/club/showbbs.asp?id=45182 

faintzw [ 6 楼 ]
2004-10-31 15:52:00
唉
楼上的在干什么？每次都顶一大堆发霉的帖子上来干什么…… 

frost123 [ 7 楼 ]
2004-11-05 19:35:00
UP 

莫非白 [ 8 楼 ]
2005-04-20 16:08:00
靠~~~用个 Ctrl + Alt + Del 就破了，没用的拉  

litboat [ 9 楼 ]
2005-04-20 19:17:00
我在开机的时候狂按F4 F5 F7 F8(视操作系统不同)，可以直接bypass autoexec.bat
这些输入密码的程序就没有用了 

莫非白 [ 10 楼 ]
2005-05-06 14:41:00
就是,菜鸟都会揭开的  

啊远 [ 11 楼 ]
2005-05-06 15:05:00
这样的程序就叫开机密码程序吗？呵呵！  

def [ 12 楼 ]
2005-05-21 20:41:00
AUTOEXEC.BAT
WBAT BOX :PASSWORD
IF PWD=="QBASIC" GOTO A
RESTART
:A


WBAT.TXT:
:PASSWORD "Please input your password."
[PWD,20,PU                 ]
            [OK]
::