'''' This code is part of Document Solutions for PDF .NET demos.'' Copyright (c) MESCIUS inc. All rights reserved.''Imports System.IOImports System.Collections.GenericImports System.LinqImports GrapeCity.Documents.PdfImports GrapeCity.Documents.Text
'' This sample provides a number of forms that can be filled'' And saved Or printed right in the sample browser'' using the 'save' or 'print' buttons in DsPdfViewer.'''' Note that if you print the filled form, everything Is done'' in the client browser, no data Is sent to our demo server.'' But if you click the 'save' button, the entered data along with'' the original form are sent to the demo server. The server uses DsPdf'' to insert the data into the PDF, And sends the filled PDF form'' back to the client. The demo server neither stores nor analyzes'' the data.'''' Note also that the viewer's 'download' button will only download'' the original form without the data. Unlike the 'save' button, 'download''' does Not access the server, it only gets the original PDF that was loaded'' into the viewer.Public Class FillForms    '' By default, generate the first form:    Public Sub CreatePDF(ByVal stream As Stream, Optional ByVal paramsIdx As Integer = 0)        CreatePDF(stream, GetSampleParamsList()(paramsIdx))    End Sub
    Public Sub CreatePDF(ByVal stream As Stream, ByVal sampleParams As String())        Dim fn = sampleParams(3)        Dim pn = Path.Combine("Resources", "PDFs", "Forms", "misc", fn)        Using fs = File.OpenRead(pn)            fs.CopyTo(stream)        End Using    End Sub
    Public Shared Function GetSampleParamsList() As List(Of String())        '' Strings are name, description, info, rest are arbitrary strings:        Return New List(Of String()) From            {                New String() {"@us-tax-forms/Form W-7", "Application for IRS Individual Taxpayer Identification Number", Nothing, "fw7-demo.pdf"},                New String() {"@us-tax-forms/Form SS-4", "Application for Employer Identification Number", Nothing, "fss4-demo.pdf"},                New String() {"@e-com-forms/Goods Return", "Goods Return and Exchange Form", Nothing, "goods-return-form.pdf"},                New String() {"@hr-forms/Time Sheet", "Time Sheet Form", Nothing, "time-sheet-form.pdf"},                New String() {"@hr-forms/Trip Permission", "Offsite field trip permission slip", Nothing, "offsite-field-trip-form.pdf"},                New String() {"@member-forms/Health Info", "Health Info Intake Form", Nothing, "health-intake-form.pdf"},                New String() {"@event-forms/Event Feedback", "Event Feedback Form", Nothing, "event-feedback-form.pdf"}            }    End FunctionEnd Class