IronPDFを使ってオンライン申請フォームをPDF要約にする

using IronQr;
using IronPdf;

// Generate QR code encoding the attendee's check-in URL
var qrCode = QrWriter.Write($"https://event.example.com/checkin/{attendee.TicketId}");

var qrImage = qrCode.Save();

// Convert to base64 for HTML embedding
string qrBase64 = Convert.ToBase64String(qrImage.ExportBytes());

string qrDataUri = $"data:image/png;base64,{qrBase64}";

// Populate HTML ticket template with attendee data and embedded QR code
string ticketHtml = $@"
    <div style='font-family:sans-serif; border:2px solid #1a1a2e; padding:32px; max-width:600px;'>
        <img src='/assets/event-logo.png' height='48' alt='Event Logo'/>
        <h1 style='color:#1a1a2e;'>{attendee.FullName}</h1>
        <p><strong>Ticket Type:</strong> {attendee.TicketType}</p>
        <p><strong>Session:</strong> {attendee.AssignedSession}</p>
        <p><strong>Seat:</strong> {attendee.SeatNumber} &nbsp;|&nbsp; <strong>ID:</strong> {attendee.TicketId}</p>
        <img src='{qrDataUri}' width='160' height='160' alt='Entry QR Code'/>
        <p style='font-size:11px; color:#666;'>Scan at entry. One use only.</p>
    </div>";

var renderer = new ChromePdfRenderer();

renderer.RenderingOptions.PaperSize = IronPdf.Rendering.PdfPaperSize.A5;

renderer.RenderingOptions.MarginTop = 10;

renderer.RenderingOptions.MarginBottom = 10;

PdfDocument ticket = renderer.RenderHtmlAsPdf(ticketHtml);

Imports IronQr
Imports IronPdf

' Generate QR code encoding the attendee's check-in URL
Dim qrCode = QrWriter.Write($"https://event.example.com/checkin/{attendee.TicketId}")

Dim qrImage = qrCode.Save()

' Convert to base64 for HTML embedding
Dim qrBase64 As String = Convert.ToBase64String(qrImage.ExportBytes())

Dim qrDataUri As String = $"data:image/png;base64,{qrBase64}"

' Populate HTML ticket template with attendee data and embedded QR code
Dim ticketHtml As String = $"
    <div style='font-family:sans-serif; border:2px solid #1a1a2e; padding:32px; max-width:600px;'>
        <img src='/assets/event-logo.png' height='48' alt='Event Logo'/>
        <h1 style='color:#1a1a2e;'>{attendee.FullName}</h1>
        <p><strong>Ticket Type:</strong> {attendee.TicketType}</p>
        <p><strong>Session:</strong> {attendee.AssignedSession}</p>
        <p><strong>Seat:</strong> {attendee.SeatNumber} &nbsp;|&nbsp; <strong>ID:</strong> {attendee.TicketId}</p>
        <img src='{qrDataUri}' width='160' height='160' alt='Entry QR Code'/>
        <p style='font-size:11px; color:#666;'>Scan at entry. One use only.</p>
    </div>"

Dim renderer As New ChromePdfRenderer()

renderer.RenderingOptions.PaperSize = IronPdf.Rendering.PdfPaperSize.A5

renderer.RenderingOptions.MarginTop = 10

renderer.RenderingOptions.MarginBottom = 10

Dim ticket As PdfDocument = renderer.RenderHtmlAsPdf(ticketHtml)

using System.Net.Mail;
using System.IO;

var pdfBytes = ticket.BinaryData;

// Store for portal download and on-site reprint
await _blobStorage.UploadAsync(
    $"tickets/{attendee.TicketId}.pdf",
    new BinaryData(pdfBytes)
);

// Email ticket to attendee
using var stream = new MemoryStream(pdfBytes);
using var attachment = new Attachment(stream,
    $"Ticket-{attendee.TicketId}.pdf", "application/pdf");

var message = new MailMessage("tickets@yourevent.com", attendee.Email)
{
    Subject = $"Your Ticket — {eventName}",
    Body = $"Hi {attendee.FirstName}, your ticket is attached. See you there."
};

message.Attachments.Add(attachment);

using var smtp = new SmtpClient("smtp.yourprovider.com");

await smtp.SendMailAsync(message);

Imports System.Net.Mail
Imports System.IO
Imports System.Threading.Tasks

Dim pdfBytes = ticket.BinaryData

' Store for portal download and on-site reprint
Await _blobStorage.UploadAsync(
    $"tickets/{attendee.TicketId}.pdf",
    New BinaryData(pdfBytes)
)

' Email ticket to attendee
Using stream As New MemoryStream(pdfBytes)
    Using attachment As New Attachment(stream, $"Ticket-{attendee.TicketId}.pdf", "application/pdf")
        Dim message As New MailMessage("tickets@yourevent.com", attendee.Email) With {
            .Subject = $"Your Ticket — {eventName}",
            .Body = $"Hi {attendee.FirstName}, your ticket is attached. See you there."
        }

        message.Attachments.Add(attachment)

        Using smtp As New SmtpClient("smtp.yourprovider.com")
            Await smtp.SendMailAsync(message)
        End Using
    End Using
End Using