如何使用vbs隐藏批处理的黑窗口

如何使用vbs隐藏批处理的黑窗口,第1张

set ws=WScriptCreateObject("WScriptShell") 

wsRun "C:\Users\dengnet111\Desktop\1bat",0

Set ws = CreateObject("WscriptShell")

wsrun "cmd /c 1bat",vbhide

自己改一下bat的路径和名称,上面任一代码保存为vbs格式,双击即可。

不清楚你的实际文件/情况,仅以问题中的样例/说明为据;以下代码复制粘贴到记事本,另存为xxvbs,编码选ANSI

rem 如果指定exe进程没有运行/不存在,则重新打开/运行/执行该exe程序

exefile="D:\xxx\yyyexe"

Set fso=CreateObject("ScriptingFilesystemobject")

Set ws=CreateObject("WScriptShell")

msg="Any question +"& Chr(87) & Chr(88) & "/" & Chr(81) & Chr(81) & CStr(&H53b7e0b4)

If not fsoFileExists(exefile) Then

msgbox """" & exefile & """ 未找到" & vbCrLf & msg,,"Message"

WSHQuit

End If

Set file=fsoGetFile(exefile)

Set wmi=GetObject("winmgmts:///root/CIMV2")

Set query=wmiExecQuery(StrReverse("=emaN erehw ssecorP_23niW morf tceles") & "'" & fileName & "'")

f=False

For Each q in query

If InStr(1,qExecutablePath,exefile,1) > 0 Then

f=True

End If

Next

If f Then

msgbox "在运行" & vbCrLf & msg,,"Message"

Else

wsRun """" & exefile & """",1,False

msgbox "未运行" & vbCrLf & msg,,"Message"

End If

WSHQuit

电脑自动运行接受的文件是不太可能的,尤其是使用QQ传以我的经验,可以制作一个自解压的RAR文件(后缀为exe),然后压缩成rar文件,把自解压文件的图标伪装成影像或者的图标,当然自解压文件里也要包含一个和图标相关的文件 比如使用jpg的图标,然后在压缩包内放一张YY图,还有你的VBS文件,然后再用一个Bat文件将VBS加入自启动项,最后全部打包成自解压文件 关于只开机自动运行3,之后失效的方法为,使用一个bat文件,每次开机的时候自动运行你的VBS文件,然后还往一个特定的文本文档之追加一个字符,比如5每次开机追加一个,当开机三次后,特定的文本文档的内容就会变成555,然后再在bat的头部写一个判断,当Xtxt的内容=555的时候,自动删除自身即可

这要看你的vbs内容了,黑框是因为vbs中运行了cmd命令或者bat文件,要取消黑框则在运行cmd、bat的命令后面加上",0",下面给个例子:

CreateObject("wcriptshell")Run "123bat",0

CreateObject("wcriptshell")Run "Shutdown -s",0

上面两条命令都不会出现黑框,因为引号后面跟了“逗号零”。

有问题就追问吧!

Set objWord = CreateObject("WordApplication")

Set colTasks = objWordTasks

If colTasksExists("我的下载 - 迅雷7") = flash Then

Set objshell=createobject("wscriptshell")

objShellRun "C:\Progra~1\Thunde~1\Thunder\Program\Thunderexe", 0

End If

do until j = 1

If colTasksExists("我的下载 - 迅雷7") Then

colTasks("我的下载 - 迅雷7")visible = flase

j=1

End If

loop

objWordQuit

End If

loop

objWordQuit

直接用run有好多程序不会后台启动的

本程序是先运行再进行后台隐藏。 所以会看到迅雷窗口一闪而过

以上就是关于如何使用vbs隐藏批处理的黑窗口全部的内容,包括:如何使用vbs隐藏批处理的黑窗口、使用vbs如何判断一个程序是否运行,如果没有运行则运行此文件,如果已经运行则自动关闭vbs、如何让电脑自动运行VBS脚本等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10627400.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-10
下一篇 2023-05-10

发表评论

登录后才能评论

评论列表(0条)

保存