WIP: Comservice & Zugferd

2019-03-14 17:00:25 +01:00
parent c0d37ef789
commit 62d04a8c21
5 changed files with 109 additions and 39 deletions
--- a/ZUGFeRDTest/Form1.vb
+++ b/ZUGFeRDTest/Form1.vb
@@ -38,6 +38,11 @@ Public Class Form1
                Case ZUGFERD_ERROR
                    args.ErrorDirectory = row.Item("FOLDER_PATH")

+                Case ZUGFERD_EML
+                    args.OriginalEmailDirectory = row.Item("FOLDER_PATH")
+
+                Case ZUGFERD_REJECTED_EML
+                    args.RejectedEmailDirectory = row.Item("FOLDER_PATH")
            End Select
        Next