[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
coolmir2

Rank: 2

帖子
4 
积分
180 
技术
0  
捐助
0  
注册时间
2009-1-21 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2009-1-30 01:36 | 只看该作者

[其他] 【已结】怎样关闭VBS运行后弹出的框

因为我在网吧工作，有客人要求安装QQ2009，但是QQ2009只能在本机安装运行，用讯闪对比下去后运行不了，所以，我就做了个绿色版的。利用vbs与bat安装。现在的问题是运行vbs后有个框框，我想让他在QQ运行后自动关闭。。
vbs代码如下：
set ws=createobject("wscript.shell")
ws.run"install.bat",x,ture
MsgBox "正在更新，请稍等..."

install.bat代码如下：
@echo off
call vcredist.msi /passive /quiet
call bin\qq.exe
exit

这样就可以运行QQ了，但是vbs运行后出现一个框框不会自动关闭。我不要删除最后一行来实现。有什么代码可以让他关闭吗？我第一次写这个，呵呵，让各位见笑了。

[ 本帖最后由 coolmir2 于 2009-1-30 02:18 编辑 ]
收藏 分享

BBCC

Rank: 5Rank: 5

帖子
245 
积分
914 
技术
1  
捐助
0  
注册时间
2008-10-25 
2楼
发表于 2009-1-30 08:30 | 只看该作者
taskkill?
为什么不在bat里echo?
for /f "delims=" %%a in ('%0') do (echo %%a)

TOP

fastslz

Rank: 8Rank: 8

帖子
296 
积分
1212 
技术
41  
捐助
0  
注册时间
2008-1-7 
3楼
发表于 2009-1-30 11:43 | 只看该作者
vbs代码如下：
set ws=createobject("wscript.shell")
ws.run"install.bat",0
ws.popup "正在更新，请稍等...",5,"更新提示",4128


install.bat代码如下：
@echo off
call vcredist.msi /passive /quiet
call bin\qq.exe
exit

TOP

defanive

Rank: 7Rank: 7Rank: 7

帖子
957 
积分
4938 
技术
72  
捐助
0  
注册时间
2008-10-31 
4楼
发表于 2009-1-30 12:09 | 只看该作者
那用bat的msg也可以啊！

msg %usernane% /t:10 "正在更新，请稍等..."

TOP

coolmir2

Rank: 2

帖子
4 
积分
180 
技术
0  
捐助
0  
注册时间
2009-1-21 
5楼
发表于 2009-1-30 13:42 | 只看该作者
呵呵，谢谢各位了。。。。

TOP

返回列表