Erstellen des ZUGFeRD Objektes in VB.NET

Thema: CreateInvoice
SDK-Mitglieder: CreateInvoice() Licensed TodayDate
Codebeispiele: VB.NET
Veröffentlicht: 24. Oktober 2014

Sie erstellen das ZUGFeRD Object mit einer Codezeile:

Dim alo As New Aloaha_ZUGFeRD.XML

Sollte die Erstellung fehlschlagen bedeutet das das Objekt noch nicht im System registriert ist. Das machen Sie mit RegASM.exe (32 Bit):

regasm Aloaha_ZUGFeRD.dll /codebase

Falls Sie das Objekt direkt mit Daten “befüllen” möchten laden Sie bitte das Objekt so:

Dim ZUG As Aloaha_ZUGFeRD.iXML.ZUGFeRD = Nothing

Dim key As String

'bitte neuen Testkey von info@aloaha.com anfordern
key = "IHR-LIZENZSCHLUESSEL"  

If alo.Licensed(key) = True Then

     ZUG = alo.CreateInvoice("INV0815", "Rechnung gemäß Bestellung", alo.TodayDate.Document_Date, alo.TodayDate.Document_DateFormat, , , "EUR")

end if

Bitte nehmen Sie zur Kenntnis das für VB6/COM die Funktion Create_Invoice besser geeignet ist!

Es gibt auch ein komplettes Codebeispiel für VB6/VBA/COM auf: https://www.zugferdpro.com/erstellung-einer-zugferd-x-rechnung-xml-datei-via-com-schnittstelle-vb6-vba/