RosettaCodeData/Task/Execute-a-system-command/VBScript/execute-a-system-command.vb

3 lines
84 B
VB.net
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Set objShell = CreateObject("WScript.Shell")
objShell.Run "%comspec% /K dir",3,True