Retrieves The Default User's Directory Path
Introduction To receive the path of the user's default directory, the following function(s) may be applied. Public Shared Function GetDefaultDirectory() As String Dim txt As String = "" Dim paths As String() = Environment.GetFolderPath(Environment.SpecialFolder.Personal).Split(New Char() {"\"c}) For i As Integer = 0 To paths.Length - 2 txt = txt & paths(i) & "\" Next Dim defaultDirectory As String = Nothing Try If Not Directory.Exists(txt) Then Directory.CreateDirectory(txt) ...