<% Response.Buffer=True %>
<%
set PDF = server.createobject("aspPDF.EasyPDF")
PDF.SetMargins 20,20,20,20
PDF.AddGraphicPos 0,0, Server.MapPath("PAttyMain_BG.Jpg")
PDF.SetFont "F1", "25", "Black"
PDF.AddTextPos 100, 150, "aspEasyPDF (" & PDF.NVersion & ") from MITData"
' Print user debug
response.Write "Some user debug print from the asp sample:" & "
"
response.Write "X Cursor : " & PDF.GetProperty(csPropPosX) & "
"
response.Write "Y Cursor : " & PDF.GetProperty(csPropPosY) & "
"
response.Write "Page Height: " & PDF.GetProperty(csPageHeight) & "
"
response.Write "Page Width : " & PDF.GetProperty(csPageWidth) & "
"
' Generate the PDF document
PDF.Save Server.MapPath("pdf_Sample.pdf")
set pdf = nothing
%>
See the results