AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Interfaces/Zugferd: Extension With ToUpper() and Substring(1)

Browse Source
This commit is contained in:
PitzM 2024-01-15 10:26:34 +01:00
parent 9f11b2b7bc
commit 38f330b94b
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Interfaces/ZUGFeRDInterface/PDFEmbeds.vb
View File

@ -169,8 +169,11 @@ Public Class PDFEmbeds
Dim oExtension As String = oFileInfo.Extension Dim oExtension As String = oFileInfo.Extension
If String.IsNullOrWhiteSpace(oExtension) Then If String.IsNullOrWhiteSpace(oExtension) Then
Logger.Error("The embedded file [{0}] does not have any extension. Skipping.") Logger.Error("The embedded file [{0}] does not have any extension. Skipping.", oFileName)
Continue For Continue For
Else
' Jetzt wissen wir, das es eine Extension gibt!
oExtension = oFileInfo.Extension.ToUpper.Substring(1)
End If End If
If pExtensions.Contains(oExtension) Then If pExtensions.Contains(oExtension) Then