Visual Basic Programming Code Examples Visual Basic > Code Snippets Get windows system directory Get windows system directory Public Const MAX_PATH = 260 Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long Dim strBuffer As String Dim lngReturn As Long Dim strWindowsSystemDirectory As String strBuffer = Space$(MAX_PATH) lngReturn = GetSystemDirectory(strBuffer, MAX_PATH) strWindowsSystemDirectory = Left$(strBuffer, Len(strBuffer) - 1)
