diff --git a/VERAGAddIn/VERAGAddIn.vbproj b/VERAGAddIn/VERAGAddIn.vbproj
index f200e43..bec699a 100644
--- a/VERAGAddIn/VERAGAddIn.vbproj
+++ b/VERAGAddIn/VERAGAddIn.vbproj
@@ -36,7 +36,7 @@
\\ftps.verag.ag\g\FTP\Programme\VeragAddin\
http://ftps.verag.ag/VERAGAddin/
de
- 1.0.1.139
+ 1.0.1.140
true
true
0
@@ -392,10 +392,11 @@
true
- AL20231110.pfx
+
+
- 75156A186435E8542612CE6E7E26CA9FCE0A5BAF
+ D21E170FE10FFCC8532FBDEFB75A35DB90661CC0
false
diff --git a/VERAGAddIn/app.config b/VERAGAddIn/app.config
index ac224fb..c96acaf 100644
--- a/VERAGAddIn/app.config
+++ b/VERAGAddIn/app.config
@@ -52,7 +52,7 @@
-
+
diff --git a/VERAGAddIn/rbnMailItem.Designer.vb b/VERAGAddIn/rbnMailItem.Designer.vb
index 093d550..e892df6 100644
--- a/VERAGAddIn/rbnMailItem.Designer.vb
+++ b/VERAGAddIn/rbnMailItem.Designer.vb
@@ -44,9 +44,6 @@
Me.components = New System.ComponentModel.Container()
Me.Tab1 = Me.Factory.CreateRibbonTab
Me.Group1 = Me.Factory.CreateRibbonGroup
- Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
- Me.btnInfo = Me.Factory.CreateRibbonButton
- Me.btnUnsichtbar = Me.Factory.CreateRibbonButton
Me.btnAVISOUnleashed = Me.Factory.CreateRibbonButton
Me.Button1 = Me.Factory.CreateRibbonButton
Me.btnAvisoMail2 = Me.Factory.CreateRibbonButton
@@ -54,6 +51,9 @@
Me.btnVollmachten = Me.Factory.CreateRibbonButton
Me.btnVertraege = Me.Factory.CreateRibbonButton
Me.btnGestellungsgarantien = Me.Factory.CreateRibbonButton
+ Me.btnInfo = Me.Factory.CreateRibbonButton
+ Me.btnUnsichtbar = Me.Factory.CreateRibbonButton
+ Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
Me.Tab1.SuspendLayout()
Me.Group1.SuspendLayout()
Me.SuspendLayout()
@@ -76,22 +76,6 @@
Me.Group1.Label = "AVISO"
Me.Group1.Name = "Group1"
'
- 'NotifyIcon1
- '
- Me.NotifyIcon1.Text = "NotifyIcon1"
- Me.NotifyIcon1.Visible = True
- '
- 'btnInfo
- '
- Me.btnInfo.Label = "?"
- Me.btnInfo.Name = "btnInfo"
- '
- 'btnUnsichtbar
- '
- Me.btnUnsichtbar.Label = "i"
- Me.btnUnsichtbar.Name = "btnUnsichtbar"
- Me.btnUnsichtbar.Visible = False
- '
'btnAVISOUnleashed
'
Me.btnAVISOUnleashed.ControlSize = Microsoft.Office.Core.RibbonControlSize.RibbonControlSizeLarge
@@ -145,6 +129,22 @@
Me.btnGestellungsgarantien.Name = "btnGestellungsgarantien"
Me.btnGestellungsgarantien.ShowImage = True
'
+ 'btnInfo
+ '
+ Me.btnInfo.Label = "?"
+ Me.btnInfo.Name = "btnInfo"
+ '
+ 'btnUnsichtbar
+ '
+ Me.btnUnsichtbar.Label = "i"
+ Me.btnUnsichtbar.Name = "btnUnsichtbar"
+ Me.btnUnsichtbar.Visible = False
+ '
+ 'NotifyIcon1
+ '
+ Me.NotifyIcon1.Text = "NotifyIcon1"
+ Me.NotifyIcon1.Visible = True
+ '
'rbnMailItem
'
Me.Name = "rbnMailItem"
diff --git a/VERAGAddIn/rbnVERAG.vb b/VERAGAddIn/rbnVERAG.vb
index d2c350c..000e1d6 100644
--- a/VERAGAddIn/rbnVERAG.vb
+++ b/VERAGAddIn/rbnVERAG.vb
@@ -801,7 +801,7 @@ Public Class AVISO_Mail_Functions
If String.IsNullOrWhiteSpace(linkRaw) Then Continue For
- If linkRaw.Contains("dfdsdocumentservice/download") Then
+ If linkRaw.Contains("dfdsdocumentservice/download") Or linkRaw.Contains("quadronet.dfds.com/link") Then
Dim link As String = linkRaw.Trim()
@@ -825,7 +825,7 @@ Public Class AVISO_Mail_Functions
Dim filename As String = sendungsNr & "_" & counter &
If(descr <> "", "_" & descr, "")
- Dim file = VERAG_PROG_ALLGEMEIN.cFormularManager.getFile_FromURLStream(link, filename,, False)
+ Dim file = VERAG_PROG_ALLGEMEIN.cFormularManager.getFile_FromURLStream_NEW(link, filename,, False)
If IO.File.Exists(file) Then
ATT.Add(file)