其实谈不上什么原创,只不过感觉还算实用,封装了,可以当做一个命令工具来用。不过慎用~
Hide_Run.vbs [command1] …
-
- on error resume next
- Set objArgs=WScript.Arguments
- For I=0 to objArgs.Count-1
- strArgs=objArgs(I)
- if strArgs<>"" then HideRun(strArgs)
- Next
- function HideRun(h)
- set oWSl=WScript.CreateObject("WScript.Shell")
- rtn=oWSl.run(h,0,false)
- end function
复制代码
|