Ocultar ventana MS-DOS ó prompt ó cmd

Si su code es de algún virus, troyano o alguna aplicación que no sea necesaria la intervención de la molesta ventana negra este pequeño código les servirá para ocultarla, es un script que hace una llamada a su archivo para así ocultar esa ventana, estas líneas de código las guardaran con extensión .vbs y ya estuvo.

set cmd = createobject("wscript.shell")
set shell = CreateObject("Scripting.FileSystemObject")
cmd.run "archivo-escondido.bat", vbHide