Məlumat bazası

Sample Code for ASPPDF.NET

                                                         1 
 2 
 3 <%@ Assembly name="ABCpdf, Version=5.0.0.6, Culture=neutral, PublicKeyToken=a7a0b3f5184f2169" %>
 4 <!--- The above line can be omitted, if you load the assembly in the application web.config file.  See KB article 10239 for details -->
 5 <%@ import Namespace="WebSupergoo.ABCpdf5" %>
 6 
 7 
 8 <script runat="server" Language="VB">
 9 
10 
11     Sub page_load()
12     
13         Dim theID As Integer = 0
14         Dim theText As String = "This PDF file is generated by WebSupergoo ABCpdf.NET on the fly"
15 
16         Dim theDoc As Doc = New Doc()
17         theDoc.Width = 4
18         theDoc.FontSize = 32
19         theDoc.Rect.Inset(20, 20)
20 
21     
22         theDoc.FrameRect()
23         theID = theDoc.AddHTML(theText)
24         While theDoc.GetInfo(theID, "Truncated") = "1"
25             theDoc.Page = theDoc.AddPage()
26             theDoc.FrameRect()
27             theID = theDoc.AddHTML("", theID)
28         End While
29     
30         theDoc.Save(Server.MapPath("textflow.pdf"))
31         theDoc.Clear()
32      response.write ("PDF file written
")
33      response.write ("View PDF File")
34     
35     End Sub
36 script>
37 
38