返回列表 发帖

[原创] 隐藏运行Hide_Run.vbs

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

呵呵,怎么样啊

TOP

返回列表