Moin !
ich wollte ein Verzeichnis aussuchen und habe dafür folgendes codiert:
In der Zeile mit
steigt das Programm mit der Meldung
aus!
Der Wert für _DateiBasisVerzeichnis ist dabei
Nun habe ich mir das nochmal näher angesehen und dabei festgestellt, dass die Konvertierung versuchen würde in ein Integer umzuwandeln. Das verursacht den Fehler. Wenn ich aber nur
schreibe wird angemerkt das eine
vorgenommen werden muss. Das ist auch wieder nicht richtig!
Kann mir einer weiterhelfen ?
Gruß Jan
ich wollte ein Verzeichnis aussuchen und habe dafür folgendes codiert:
VB.NET-Quellcode
- Private Sub bt_VerzeichnisWählen(sender As Object, e As EventArgs) Handles bt_setFolder.Click
- Dim TryReport As New EBL.Service.TryCatchReport
- Try
- With FolderBrowserDialog
- ' Ermöglicht es neue Verzeichnisse anzulegen
- .ShowNewFolderButton = True
- 'Kurzbeschreibung für den Dialog
- .Description = "_VerzeichnisAuswahlTitel"
- ' wenn eine Verzeichnisangabe vorhanden ist, dann prüfen ob verfügbar und als Default setzen
- If Me.txt_Ausgabedatei.Text.Length > 0 Then
- .RootFolder = CType(Me.txt_Ausgabedatei.Text, System.Environment.SpecialFolder)
- Else
- ' wenn der Vorgabepath nicht vorhanden ist, dann wird der Tmp-Ordner des Anwenders als Root gesetzt
- If My.Computer.FileSystem.DirectoryExists(_DateiBasisVerzeichnis) Then
- .RootFolder = CType(_DateiBasisVerzeichnis, System.Environment.SpecialFolder)
- Else
- .RootFolder = CType(IO.Path.GetTempPath, System.Environment.SpecialFolder)
- End If
- End If
- If .ShowDialog = Windows.Forms.DialogResult.OK Then
- Me.txt_Ausgabedatei.Text = .SelectedPath
- End If
- End With
- 'ToDo - Überwachungsfunktion für weitere Schaltflächen etc.
- 'CheckDateiName()
- Catch ex As Exception
- TryReport.Show("unerwarteter Fehler in EBL.Vermessung > Form > bt_VerzeichnisWählen", ex.ToString)
- End Try
- End Sub
In der Zeile mit
steigt das Programm mit der Meldung
System.InvalidCastException: Ungültige Konvertierung von der Zeichenfolge c:\temp\trimble\ in Typ Integer. ---> System.FormatException: Die Eingabezeichenfolge hat das falsche Format.
bei Microsoft.VisualBasic.CompilerServices.Conversions.ParseDouble(String Value, NumberFormatInfo NumberFormat)
bei Microsoft.VisualBasic.CompilerServices.Conversions.ToInteger(String Value)
--- Ende der internen Ausnahmestapelüberwachung ---
bei Microsoft.VisualBasic.CompilerServices.Conversions.ToInteger(String Value)
bei EBL.Vermessung.frm_Vermessung_Export.bt_VerzeichnisWählen(Object sender, EventArgs e) in X:\VB_NET_2015\Projects\tappenbeckja\EBL.Vermessung\EBL.Vermessung\frm_Vermessung_Export.vb:Zeile 474.
aus!
Der Wert für _DateiBasisVerzeichnis ist dabei
"c:\temp\trimble\"
Nun habe ich mir das nochmal näher angesehen und dabei festgestellt, dass die Konvertierung versuchen würde in ein Integer umzuwandeln. Das verursacht den Fehler. Wenn ich aber nur
schreibe wird angemerkt das eine
Implizite Konvertierung von "String" in "System.Environment.SpecialFolder"
vorgenommen werden muss. Das ist auch wieder nicht richtig!
Kann mir einer weiterhelfen ?
Gruß Jan