Using fod As New OpenFileDialog
            With fod
                .Title = My.Application.Info.ProductName + Space(1) + "Pfad zum" & _
                  "Rechnungsscan auswählen"
                .Filter = "PDF-Datei (*.pdf)|*.pdf|JPEG-Datei (*.jpeg)|*.jp*"
                .Multiselect = False
                .InitialDirectory = loc_pfad_rechnung
                .FileName = loc_scandatei
            End With
  End Using