essensbestellungen

VERAG_PROG_ALLGEMEIN/Classes/Essensbestellung.vb

@@ -23,6 +23,7 @@ Public Class cEssensbestellung
     Property eb_anmerkung As Object = Nothing
     Property eb_gesendet_am As Object = Nothing
     Property eb_gesendet As Boolean
+    Property eb_firma As Object = Nothing
 
 
     Public hasEntry = False
@@ -72,6 +73,7 @@ Public Class cEssensbestellung
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("eb_anmerkung", eb_anmerkung))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("eb_gesendet", eb_gesendet))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("eb_gesendet_am", eb_gesendet_am))
+        list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("eb_firma", eb_firma))
 
 
         Return list

VERAG_PROG_ALLGEMEIN/DATENSERVER/cDATENSERVER.vb

@@ -12,7 +12,7 @@ Imports Spire.Pdf.HtmlConverter
 Imports System.Threading
 Imports System.Net
 Imports Spire.Pdf.Tables
-
+Imports System.Windows.Forms.VisualStyles
 
 Public Class cDATENSERVER
 
@@ -1374,9 +1374,16 @@ Public Class cFormularManager
 
 
 
-    Public Shared Function getPDFViaSpirePDF_FromURLStream(URL As String, Optional targetPath As String = "", Optional openFileAfterDownload As Boolean = True) As String
+    Public Shared Function getPDFViaSpirePDF_FromURLStream(URL As String, Optional filename As String = "", Optional targetPath As String = "", Optional openFileAfterDownload As Boolean = True) As String
         Try
-            If targetPath = "" Then targetPath = getTMPPath_PDF()
+            If targetPath = "" Then
+                If filename <> "" Then
+                    targetPath = System.IO.Path.GetTempPath() & filename & ".pdf"
+                Else
+                    targetPath = getTMPPath_PDF()
+                End If
+            End If
+
 
             VERAG_PROG_ALLGEMEIN.cProgramFunctions.spireLoadLicense()