From e35a81c271a045cabeb7deb70450e9e73467b288 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Mon, 21 Oct 2024 11:46:53 +0200 Subject: [PATCH] Anhangsimport --- Aviso/Anhänge/frmSendungAnhangImport.vb | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/Aviso/Anhänge/frmSendungAnhangImport.vb b/Aviso/Anhänge/frmSendungAnhangImport.vb index 94024d4..b833911 100644 --- a/Aviso/Anhänge/frmSendungAnhangImport.vb +++ b/Aviso/Anhänge/frmSendungAnhangImport.vb @@ -143,11 +143,12 @@ Public Class frmSendungAnhangImport WebBrowser.Visible = False PdfViewer.Visible = (loc <> "") - - Dim data = File.ReadAllBytes(loc) - Dim pdfStream = New MemoryStream(data) - PdfViewer.LoadFromStream(pdfStream) - pdfStream.Close() + If doc <> "" Then + Dim data = File.ReadAllBytes(loc) + Dim pdfStream = New MemoryStream(data) + PdfViewer.LoadFromStream(pdfStream) + pdfStream.Close() + End If 'NOT WORKING