PDF erstellen, PDF konvertieren, pdf-maker nutzt activePDF
KontaktPartner | WirJob |  Impressum | copyright by DataPerform |

PDF erstellen, PDF konvertieren, pdf-maker nutzt activePDF

 

Serverprodukte

activePDF Server

activePDF DocConverter

activePDF Printer

activePDF WebGrabber

activePDF Toolkit V.4

activePDF Portfolio


DataPerform JustPDF


 

Entwickler Tools, API, COM


activePDF Toolkit V.4

activePDF WebGrabber



 

Weitere PDF-Lösungen

im PDFStore


 

Bestell- und Info-Hotline:

 

+49 (0) 89 / 75 07 63 9 - 0

 



  

Suchen


  

 


 

Support


FAQ

 

Kontakt / Rückruf

 

Was ist ESD?

 

Installationsanleitungen

 

Beispiele / HowTo´s

 


Sonstiges


PDF-Maker Partner werden

 

Dokumentation

 

News und Events

 

Referenzen

 

Datenschutz



Navigation


Warenkorb

 

Home

 

 

 

Wir akzeptieren:

 

 

 


powered by

powered by Google




 

 


activePDF Toolkit - Beispiel-Code und HowTo's

 

Beispiel-Code:

  • Ausfüllen eines PDF-Formulars mit Daten aus einer Microsoft Access® Datenbank ASP / VBS
  • Visitenkarte aus einer HTML und einer PDF Vorlage erstellen ASP
  • activePDF Toolkit Beispiele CF
  • activePDF Toolkit Cold Fusion MX Wrapper CFMX
  • activePDF Toolkit .NET Wrapper  .NET

HowTo`s:


 

Bild-Wasserzeichen auf einer einzelnen Seite

Dieser Beispiel-Code wird in einer fünfseitigen PDF-Datei ein Bild-Wasserzeichen an eine angegebene Stelle der vierten Seite platzieren.

 

<%
Set TK = Server.CreateObject("APToolkit.Object")

R = TK.OpenOutputFile(Server.MapPath("Output.pdf"))
R = TK.OpenInputFile(Server.MapPath("Input.pdf"))

'Copy the first 3 pages to the output
R = TK.CopyForm(1, 3)

'Add the header image, Set Header parameters
imagefile = Server.MapPath("image.jpg")
x = 0 '72 = 1 inch, 0 ,0 is bottom left of page
y = 0 '72 = 1 inch, 0 ,0 is bottom left of page
width = 0 '0 for no change
height = 0 '0 for no change
PersistRatio = True

TK.SetHeaderImage imagefile, x, y, width, height, True

'Copy Just the fourth page with the image to the output
R = TK.copyform(4, 4)

'Clear Header information so it will not appear subsequent pages
TK.ClearHeaderInfo

'Copy page 5 and on to the output
R = TK.copyform(5, 0)

R = TK.CloseOutputFile()

Response.Write "Finished"

Set TK = Nothing
%>

 

 

nach oben


 

 

Bild und Text in ein PDF einfügen

Dieses Beispiel wird in einem vorhandenen PDF-Dokument die Seitenzahl in der Mitte am unteren Seitenrand einfügen. Ausserdem wird ein Bild und weiterer Text im Fussbereich angedruckt.

 

<%
Set TK = Server.CreateObject ("APToolkit.Object")

'Specify the file that will be created
R = TK.OpenOutputFile (Server.MapPath("Output.pdf"))

'Page Number variables
'NumPages also acts as OpenInputFile
strTotalPages = TK.NumPages (Server.MapPath("Input.pdf"))

'Font variables
strFont = "Arial"
strFontSizeText = "16"
strFontSizePage = "12"

'Add the header image, Set Header parameters
imagefile = Server.MapPath("image.jpg")
x = 0 '72 = 1 inch, 0 ,0 is bottom left of page
y = 20 '72 = 1 inch, 0 ,0 is bottom left of page
width = 0 '0 for no change
height = 0 '0 for no change
PersistRatio = True


'Stamp Image on the page
TK.SetHeaderImage imagefile, x, y, width, height, True

'Set the font, Location and Text
TK.SetHeaderFont strFont, strFontSizeText
TK.SetHeaderText 15, 10, "activePDF, Inc."

'Set the PageNumber location and text
'Using GetTextWidth to stamp in the center of the page
TK.SetHeaderFont strFont, strFontSizePage
strPageNumberText = "Page %p of " & strTotalPages
strPageNumberWidth = TK.GetHeaderTextWidth(strPageNumberText)
xt = (612 - strPageNumberWidth) / 2
TK.SetHeaderWPgNbr xt, 10, "Page %p of " & strTotalPages, 1

'Copy the current page to OutputFile
R = TK.copyform(strPage, strPage)

'Clear the Header information beacuse we are stamping dynamic data
TK.ClearHeaderInfo

'All done close the outputFile
R = TK.CloseOutputFile()

Set TK = Nothing
%>

 

 

nach oben


 

 

 

Bild in ein Formfeld einfügen

Dieses Beispiel fügt in einem vorhandenen PDF-Dokument ein Bild in ein Formfeld ein.

 

<%
Set TK = Server.CreateObject ("APToolkit.Object")

R = TK.OpenOutputFile (Server.MapPath("Output.pdf"))
R = TK.OpenInputFile (Server.MapPath("Input.pdf"))

field = "image"
image = Server.MapPath("image.jpg")
'-996 Flatten field using an image file as named in field data.
'The image type is auto-determined. For more flags please
'consult the Toolkit Documentation.
flag = -996

TK.SetFormFieldData field, image, -996

R = TK.copyform(0, 0)
R = TK.CloseOutputFile()

Set TK = Nothing

Response.Write "Finished"
%>

 

 

nach oben


 

 

 

Logo in ein Dokument einfügen

 

Dieses Beispiel wird zwei Logos in ein vorhandens PDF-Dokument einfügen.

 

<%

Set TK = Server.CreateObject("APToolkit.Object")

' Open a handle to the output file
r = TK.OpenOutputFile(Server.MapPath("WithLogos.PDF"))
' Open the template
r = TK.OpenInputFile(Server.MapPath("10PAGEPDF.PDF"))

' Specify the first Logo
TK.AddLogo Server.MapPath("LOGO 1.PDF"), 1
' Apply it to pages 1 - 5
r = TK.CopyForm(0,5)
' Clear the Logo for the next round
TK.ClearLogosAndImages
' Specify the second Logo
TK.AddLogo Server.MapPath("LOGO 2.PDF"), 1
' Apply it to pages 6 - 10
r = TK.CopyForm(6, 10)
' Close the Output file
TK.CloseOutputFile

Set TK = Nothing

%>

 

 

nach oben


 

 

 

Erzeugen eines PDF-Dokument im Arbeitsspeicher und Ausgabe an den Browser

Dieses Beispiel soll zeigen wie ein PDF-Dokument dynamisch generiert wird. Der Toolkit wird das Dokument im Arbeitsspeicher generieren und an den Browser senden.

 

 

<%

'Tell ASP not to serve the page until entire page is processed
'Very Important
Response.Buffer = True

Set objTK = Server.CreateObject("APToolkit.Object")

'Tell Toolkit to create the PDF in memory
r = objTK.OpenOutputFile("MEMORY")

'SetFont will create a new blank page and set the font to be used
'PrintText adds text to our new page
objTK.SetFont "Helvetica", 15
objTK.PrintText 15, 760, "activePDF Memory Example"

'Close our created PDF
objTK.CloseOutputFile

'Write the output to memory as a BinaryImage
zz = objTK.binaryImage

'Tell the browser not to cache PDF
Response.Expires = 0

'Clear response buffer
Response.Clear

'Tell browser what type of file it is opening
Response.ContentType = "application/pdf"
Response.AddHeader "Content-Type", "application/pdf"
Response.AddHeader "Content-Disposition", _
"inline;filename=Example.pdf"

'Write the PDF in memory to the browser
Response.BinaryWrite zz 'now let's write to the browser

Set objTK = Nothing

%>

 

 

nach oben


 

 

 

Seitenzahlen in ein PDF-Dokument einfügen

Dieses Beispiel zeigt die Seitennummerierung mit dem Toolkit und der SetHeaderWPgNbr Methode. Ausserdem zeigt es, wie die erste und letzte Seite nicht nummeriert wird mit Hilfe der ClearHeaderInfo Methode.


<%

' Create the Toolkit Object
Set objTK = Server.CreateObject("APToolkit.Object")

' Create the memory space for our output file
r = objTK.OpenOutputFile("Numbering.pdf")
If r <> 0 Then
    Response.Write "error opening outputfile: " & r
End If

' NumPages opens file as an input file
totPages = objTK.NumPages("10PAGEPDF.PDF")

' Copy page 1 and 2 from the input to the output without numbering
r = objTK.CopyForm(1,2)
If r <> 0 Then
    Response.Write "error on CopyForm: " & r
End If

' Must set a font to write the page numbers with
objTK.SetHeaderFont "Times-Bold", 24

' write page numbers at bottom left,
' write the page/total, and start with page 3
objTK.SetHeaderWPgNbr 10, 10, "Page %p of " & totPages, 3

' Copy pages 3 - 8 with page numbers
r = objTK.CopyForm(3, 8)
If r <> 1 Then
    Response.Write "error on copyform: " & r
End If

' Clear out the numbering for the remaining pages
objTK.ClearHeaderInfo

' Copy page 9 & 10
r = objTK.CopyForm(9, 10)
If r <> 1 Then
    Response.Write "error on copyform: " & r
End If

' Let's write the output file to disk
objTK.CloseOutputFile

' Finally, we dispose of the Toolkit object.
Set objTK = Nothing

%>

 

 

 

nach oben

 


 


powered by activePDF:

activePDF

 

Wer nutzt activePDF?

PDF bearbeiten PDF erstellen PDF konvertieren

Die Besten der Welt nutzen activePDF! Profitieren auch Sie davon. Das iPaper spart Ihnen in der täglichen Arbeit viel Zeit und macht Ihre Prozesse effizienter.

Individuelle PDF Lösungen 

powered by ASP.NET

Sie suchen nach speziellen Lösungen?  Wir entwickeln Software nach Ihren Anforderungen! PDF-Formulare, Plug-Ins, Datenbankgestützte Intra- und Internet Anwendungen, C/S Lösungen,...

Profitieren auch Sie von unserer Kompetenz und Erfahrung - nehmen Sie einfach unverbindlich Kontakt auf!

 

 

 


 

Seitenanfang pdf-maker ist ein Service der DataPerform GmbH  · Webdesign: INCREON · Update: 29.5.2020
"It's everybody's PDF" sowie Namen der activePDF-Produkte sind Marken von activePDF, alle anderen Marken sind Eigentum Ihrer jeweiligen Inhaber.