<%
Response.Buffer = TRUE
Response.ContentType = "application/pdf"
%>
<%
' Create the component
set PDF =
server.createobject("aspPDF.EasyPDF")
' Loads the VEP file
PDF.WEB_APP = True
PDF.LoadVEPFile( Server.MapPath("erp_group.vep")
)
' Sets the correct parameter for the year
PDF.SetParameter "YearID",
Request("YearID")
' Draw all pages from the VEP file definition
PDF.DrawVEP 0
PDF.BinaryWrite
set PDF = Nothing
%>