Dim wShell, exec
Set wShell = CreateObject( "WScript.Shell" )
Set exec = wShell.Exec ("ipconfig /all")
print exec.StdOut.ReadAll
print exec.StdErr.ReadAll
wait(5)
Dim wShell, exec
Set wShell = CreateObject( "WScript.Shell" )
Set exec = wShell.Exec ("ipconfig /all")
print exec.StdOut.ReadAll
print exec.StdErr.ReadAll
wait(5)