Mit dem Aloaha ZUGFeRD Toolkit ist es möglich, ein Winword-DOCX-Template mit Werten aus dem ZUGFeRD-XML zu “befüllen” und danach in ein ZUGFeRD PDF/A umzuwandeln. Das kann zum Beispiel auch interessant sein, wenn man ZUGFeRD/XRechnungs-XML drucken möchte.
Der Code dazu ist denkbar einfach:
Private Sub Test1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Test1.Click
Test1.Enabled = False
'Please change Path to match your doucments!
Dim DOCXTemplate As String = "c:\ZUGFeRD\TemplateEUR_VAT.docx"
Dim XMLFile As String = "c:\ZUGFeRD\ZUGFeRD-invoice.xml"
Dim OutputDOCX As String = "c:\ZUGFeRD\DOCXInvoice.docx"
Dim OutputPDF As String = "c:\ZUGFeRD\PDFInvoice.pdf"
Dim FinalInvoice As String = "c:\ZUGFeRD\ZUGFeRD-invoice.pdf"
Dim OptionalAttachment = "c:\AGB\AGB.pdf" ' optional - kann leer bleiben
'Please contact info@aloaha.com for your own evaluation key
Dim ZUGFeRD_License As String = "TFATI2WHIZPITHOGSZQHJM4VZA"
Dim alo As New Aloaha_ZUGFeRD.XML(ZUGFeRD_License)
If alo.CreateDocFromXML(XMLFile, OutputDOCX, DOCXTemplate, ZUGFeRD_License, True) = True Then
If alo.ConvertDOCX2PDF(OutputDOCX, OutputPDF, True, ZUGFeRD_License) = True Then
If alo.MergeXMLIntoPDF(XMLFile, OutputPDF, FinalInvoice, True, OptionalAttachment, ZUGFeRD_License) = True Then
End If
End If
End If
Test1.Enabled = True
End Sub