<%@ Page Language="VB" Debug="TRUE" %> <%@ import Namespace="FdfAcx_Net" %> <script runat="server"> ‘ Resume to next statement on error On error resume next ‘ Next we add our declare and set our FDF Objects, and set MIME Type(Output). Dim FDFApp As New FDFApp.FDFApp.FDFApp_Class Dim FDFDoc As New FDFApp.FDFApp.FDFDoc_Class ‘ Set the Output MIME Type to FDF before we write anything to buffer Response.ContentType = "application/vnd.fdf" ‘ Open From Buffer FDFDoc = FDFApp.FDFOpenFromBuf(Request.BinaryRead(Request.TotalBytes)) ‘ Set the PDF File URL to output the FDF to (Not needed for Importing FDF) ‘ Next we get values from the FDF Dim FieldValues(2) as String FieldValues(0) = FDFDoc.FDFGetValue(“Fieldname_One”) FieldValues(1) = FDFDoc.FDFGetValue(“Fieldname_Two”) ‘ Write the Status to show user the values are updated FDFDoc.FDFSetStatus(“Page Imported Success”) ‘ Next we write the response to the PDF File through FDF Response.BinaryWrite(FDFDoc.FDFSaveToBuf) </script>
