<%@ Language=VBScript %>
<%
option explicit
dim pdfDoc
set pdfDoc = Server.CreateObject("PDFParser.Document")
if not pdfDoc.Open(Server.Mappath("in_sample.pdf")) then
Response.Write "
"
Response.Write "Could not open file." & " "
end if
Response.Write "