RosettaCodeData/Task/Execute-a-system-command/VBScript/execute-a-system-command.vb
2023-07-01 13:44:08 -04:00

2 lines
84 B
VB.net

Set objShell = CreateObject("WScript.Shell")
objShell.Run "%comspec% /K dir",3,True