This commit is contained in:
2026-04-27 16:56:15 +02:00

View File

@@ -514,9 +514,9 @@ Public Class frmLaufzettel
For Each p In paths
If p <> "" Then
If Not System.IO.Directory.Exists(p) Then Continue For
Dim fileInfo As New IO.FileInfo(p)
If Not fileInfo.Exists Then Continue For
'If Not System.IO.Directory.Exists(p) Then Continue For
'Dim fileInfo As New IO.FileInfo(p)
'If Not fileInfo.Exists Then Continue For
VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({p}, cboPrinter.SelectedItem.ToString)
End If
@@ -543,11 +543,11 @@ Public Class frmLaufzettel
Else
Dim path = SDL.FormularManagerNEU.LaufzettelZollDE(AvisoID, False,, digitalDruck)
If path <> "" Then
Dim fileInfo As New IO.FileInfo(path)
If fileInfo.Exists Then
'Process.Start(path)
VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({path}, cboPrinter.SelectedItem.ToString)
End If
'Dim fileInfo As New IO.FileInfo(path)
'If fileInfo.Exists Then
'Process.Start(path)
VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({path}, cboPrinter.SelectedItem.ToString)
'End If
End If
End If