 |
| Example 2: Scale a PDF file (ASP) |
|
 |
<%
Dim NVresize : Set NVresize = Server.CreateObject("Neevia.PDFresize")
NVresize.Paper = "letter"
NVresize.Orientation = 2
NVresize.Scale = true
Dim retVal : retVal = NVresize.ResizePDF("c:\in.pdf","c:\out.pdf")
If retVal <> 0 Then
Response.Write "Error code=" & CStr(retVal)
Else
Response.Write "Done"
End If
%>
|
|
 |
|