Does anyone know how to get the system directory
f.e. "C:\Windows\System", or "C:\WINNT\System32"?

I know how to get the temp directory:

Code:
Declare Function GetTempPath Lib "kernel32" Alias _
"GetTempPathA" (ByVal nBufferLength As Long, ByVal _
lpBuffer As String) As Long

Public Const MAX_PATH = 260

Function GetTempDir()
On Error Resume Next
Dim TempDir As String
TempDir = String(MAX_PATH, 0)
If GetTempPath(MAX_PATH, TempDir) <> 0 Then
GetTempDir = Left(TempDir, InStr(TempDir, _
Chr(0)) - 1)
Else
GetTempDir = ""
End If
End Function
Any suggestions?

thx, vbzero