Moin!
ich habe folgenden Code:
Eigentlich müsste der Ordner erstellt werden können, weil dieser in der Zeile zuvor auf Exists getestet wurde.
und bekomme diese Meldung:
Kann man aus der Meldung irgendwie ableiten, was den Zugriff verweigert hat. Offene Datei, irgendetwas mit dem Ordner nicht OK .... ?
ich habe folgenden Code:
VB.NET-Quellcode
- Dim d As DirectoryInfo
- Dim f As FileInfo
- If System.IO.Directory.Exists(OutputFolder) = False Then
- System.IO.Directory.CreateDirectory(OutputFolder)
- If System.IO.Directory.Exists(OutputFolder) = False Then
- MsgBox("Ausgabeverzeichnis " & OutputFolder & "ist nicht vorhanden oder konnte nicht angelegt werden!")
- Exit Sub
- End If
- Else
- d = New DirectoryInfo(OutputFolder)
- If d.GetFiles("*.dwg").Count > 0 Then
- If MsgBox("Im Ausgabeverzeichnis befinden sich noch DWG-Dateien!" & vbCrLf & _
- "Sollen diese überschreiben werden?" & vbCrLf & vbCrLf & _
- "Ansonsten wird der Export vorzeitig beendet.", MsgBoxStyle.YesNo, k_CompanyName) = MsgBoxResult.No Then
- Exit Sub
- End If
- End If
- Try
- System.IO.Directory.Delete(OutputFolder, True)
- Catch ex As Exception
- _TryReport.Show("unerwarteter Fehler in EBL.FDO_Export > CreateKacheln - alte Kacheln löschen", ex.ToString)
- Exit Sub
- End Try
- If System.IO.Directory.Exists(OutputFolder) = False Then
- System.IO.Directory.CreateDirectory(OutputFolder) ' <<<<<<< ---- Zeile 1461
- If System.IO.Directory.Exists(OutputFolder) = False Then
- MsgBox("Ausgabeverzeichnis " & OutputFolder & "ist nicht vorhanden oder konnte nicht angelegt werden!")
- Exit Sub
- End If
- End If
- End If
Eigentlich müsste der Ordner erstellt werden können, weil dieser in der Zeile zuvor auf Exists getestet wurde.
und bekomme diese Meldung:
************** Ausnahmetext **************
System.UnauthorizedAccessException: Der Zugriff auf den Pfad "P:\KARTEN\Infopunkte_1000\Neu" wurde verweigert.
bei System.IO.__Error.WinIOError(Int32 errorCode, String maybeFullPath)
bei System.IO.Directory.InternalCreateDirectory(String fullPath, String path, Object dirSecurityObj, Boolean checkHost)
bei System.IO.Directory.InternalCreateDirectoryHelper(String path, Boolean checkHost)
bei EBL_FDOExport.lbl_LayerFile.CreateKacheln(String NameTBDM, Int64 AusgabeScale, String FilterAttribut) in X:\VB_NET_2015\Projects\tappenbeckja\EBL_FDOExport\EBL_FDOExport\frm_FDO_Export.vb:Zeile 1462.
Kann man aus der Meldung irgendwie ableiten, was den Zugriff verweigert hat. Offene Datei, irgendetwas mit dem Ordner nicht OK .... ?
