VB.net Save File Dialog Fehler - kann nicht spezielles Verzeichnis ‚Desktop‘ finden

Question

Ich habe ein recht geradlinig peice Code, der das gespeicherte Standardverzeichnis für einen Standard zu setzen gerade versucht .net Dialog in einen bestimmten Ordner zu speichern. Wenn dieser Ordner nicht vorhanden ist, setzt es auf den Desktop.

Dies funktioniert gut für alle, aber ein Benutzer, den die folgenden Fehler bekommen:

Could not find special directory 'Desktop'

Wie ist das überhaupt möglich?

        'Check if folder exists
        If Not IO.Directory.Exists(strDirectory) Then
            strDirectory = FileIO.SpecialDirectories.Desktop
            If Not IO.Directory.Exists(strDirectory) Then
                strDirectory = IO.Directory.GetCurrentDirectory
            End If
        End If


    'Show save file dialogue.
    Dim folderDlg As New Windows.Forms.FolderBrowserDialog
    folderDlg.RootFolder = Environment.SpecialFolder.Desktop
    folderDlg.SelectedPath = strDirectory
    folderDlg.ShowNewFolderButton = True

Answer 1

Wie wäre:

strDirectory = _
    Environment.GetFolderPath(Environment.SpecialFolder.Desktop).ToString()

Ich benutze GetFolderPath () zu erhalten „My Documents“ und es funktioniert gut (ich muss darüber nicht immer denken).