edv/VERAGAddin
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gesamtsicherheiten, Ref, Mail, etc.

Browse Source
This commit is contained in:
d.breimaier
2026-04-09 13:01:47 +02:00
parent 0a66718faa
commit da8c599ec3
4 changed files with 26 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
VERAGAddIn/rbnVERAG.vb
View File

@@ -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)