Hallo,
ich habe ein Problem und finde gerade keine Lösung.
Ich Erstelle wenn nicht Vorhanden in Appdata einen Ordner, (Das geht) wenn ich dann in diesen Ordner Schreiben will, wird mir der Zugriff verweigert. (Pfad wird Korrekt angegeben.) Wäre für Hilfe sehr Dankbar!!
Spoiler anzeigen
ich habe ein Problem und finde gerade keine Lösung.
Ich Erstelle wenn nicht Vorhanden in Appdata einen Ordner, (Das geht) wenn ich dann in diesen Ordner Schreiben will, wird mir der Zugriff verweigert. (Pfad wird Korrekt angegeben.) Wäre für Hilfe sehr Dankbar!!
Ausgeführt wird er hier:
Der Fehler:
Quellcode
-
- 'Hier werden der Pfad erstellt, der mittels mainPatch dann aufgerufen wird.'
- Private Filename As String = "Accountdaten.xml"
- Dim directoryName As String = "AndyNET"
- Dim appDataPath As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData)
- Dim mainPath As String = Path.Combine(appDataPath, directoryName)
Ausgeführt wird er hier:
Quellcode
-
- Private Sub Write()
- If File.Exists(Filename) Then
- File.Delete(Filename)
- End If
- If (Not Directory.Exists(mainPath) = True) Then
- Directory.CreateDirectory(mainPath)
- End If
- Dim Serializer As XmlSerializer = New XmlSerializer(Accountliste.GetType)
- Dim XStream As StreamWriter
- Dim EmptyNamespace As New XmlSerializerNamespaces()
- EmptyNamespace.Add("", "")
- Using FileStream As New FileStream(mainPath, FileMode.Create)
- XStream = New StreamWriter(FileStream, Encoding.UTF8)
- Serializer.Serialize(XStream, Accountliste, EmptyNamespace)
- FileStream.Close()
- End Using
- End Sub
Der Fehler:
System.UnauthorizedAccessException: "Der Zugriff auf den Pfad "C:\Users\info\AppData\Roaming\AndyNET" wurde verweigert."