Jack,

Sub test()
MsgBox (Environ("WINDIR") & _
Application.PathSeparator & _
IIf(InStr(1, Application.OperatingSystem, "32"), "System32",
"System"))
End Sub

Rob

"Jack" wrote in message
...
Any ideas on how to determine what version of windows is
being run, and what the system root directory is?

e.g. c:\winnt OR c:\windows etc.

Thanks

Jack