程序中怎么得到windows的系统路径

Question

iProgram说的对，也可以用filesystemobject实现

Answer 1

Public Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

Answer 2

Declare Function GetSystemDirectory Lib "KERNEL32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
Declare Function GetWindowsDirectory Lib "KERNEL32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

Answer 3

Public Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long            flngtemp = 255
            fStrTemp = Space(flngtemp)
            fStrTmpInternet = "Temporary Internet Files"
            Call GetWindowsDirectory(fStrTemp, flngtemp)
            fStrTemp = Trim(fStrTemp)