systeminfo |find "Time Zone" > c:\trash\data.txt
I have attempted to achieve the same results with the following VBA code which I derived from here in the post by 'Billy Yao [MSFT]' dated 28th Jan 2004:
Code: Select all
Option Explicit
Public Sub dos()
Dim MyCommand As String
Dim TaskId As Long
MyCommand = "cmd /c systeminfo | ""Time Zone"" > c:\Trash\data.txt"
TaskId = Shell(MyCommand, 1)
End Sub
Many thanks in advance.