Happy Codings - Programming Code Examples
Html Css Web Design Sample Codes CPlusPlus Programming Sample Codes JavaScript Programming Sample Codes C Programming Sample Codes CSharp Programming Sample Codes Java Programming Sample Codes Php Programming Sample Codes Visual Basic Programming Sample Codes


Visual Basic Programming Code Examples

Visual Basic > Code Snippets Code Examples

Get windows system directory

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
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)