Vbs exec hidden

Set oShell = CreateObject("WScript.Shell")

' If running under wscript.exe, relaunch under cscript.exe in a hidden window
If InStr(1, WScript.FullName, "wscript.exe", vbTextCompare) > 0 Then
  cmd = "cscript.exe """ & WScript.ScriptFullName & """"
  oShell.Run cmd, 0, False
  WScript.Quit
End If

' We can now read the output from an Exec in the background
strOutput = CreateObject("WScript.Shell").Exec("tasklist.exe").StdOut.ReadAll()
MsgBox strOutput

Similar codes

0 vote353 views1 answer
How to get value from clipboard in vbnet
VBA
1 vote374 views1 answer
Shortcut to apply a formula to an entire column in excel
VBA
0 vote440 views1 answer
Visual basic cmd
VBA
0 vote339 views1 answer
Excel vba disable copy paste
VBA
4 votes352 views1 answer
Excel vba check cell not empty
VBA
0 vote369 views1 answer
Worksheet.pastespecial textbox
VBA
0 vote366 views1 answer
Vba range clear formatting
VBA
3 votes388 views1 answer
Excel insert blank row for value change in column
VBA
0 vote366 views1 answer
Vbs expand env var
VBA
1 vote335 views1 answer
Excel vba hide zero values
VBA