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

[特效代码] [已解决]批处理加了隐藏运行还出现黑色的窗口

@echo off
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~nx0 h",0)(window.close)&&exit
:begin
@ping 127.0.0.1 -n 12 >nul
set NC=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\NetworkCards
for /f "tokens=3" %%i in ('"reg query "%NC%" /s|findstr/i "ServiceName""') do (
 set NetCardID=%%i
)
set showLink=HKLM\SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}\%NetCardID%\Connection
reg add %showLink% /v ShowIcon /t REG_DWORD /d 1 /f
reg add %showLink% /v IpCheckingEnabled /t REG_DWORD /d 1 /f

为什么加了  如下 隐藏代码 ,还会出现 黑色的窗口?
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~nx0 h",0)(window.close)&&exit
:begin

[ 本帖最后由 waa333 于 2009-11-21 11:01 编辑 ]
1

评分人数

    • batman: 感谢主动给标题标注[已解决]字样PB + 2

run("""%~nx0"" h",0)

TOP

黑色的窗口还是出现,只是看不到它运行程序。
我是想根本看不到黑色的窗口

TOP

回复 3楼 的帖子

如果是黑色窗口闪一下就消失了,那应当是正常的;如果不消失,就不对了……

TOP

窗口是闪了,又消失了
难道就没有不让黑色窗口出现的代码?
只能做成EXE?

TOP

你可以做个vbs来隐藏执行此bat,假设名为a.bat,则vbs代码可以是:
CreateObject("WScript.Shell").Run "a.bat", 0, False

TOP

返回列表