The following code adds a document information section to an
existing PDF document. First, it adds an empty dictionary and
references it from the document trailer. Then, it adds an Author,
Title and Subject before saving.
Set theDoc = Server.CreateObject("ABCpdf12.Doc")
theDoc.Read "c:\mypdfs\sample.pdf"
theID = theDoc.AddObject("<<>>")
theDoc.SetInfo -1, "/Info", theID & " 0 R"
theDoc.SetInfo theID, "/Author", "(Arthur Dent)"
theDoc.SetInfo theID, "/Title", "(Musings on Life)"
theDoc.SetInfo theID, "/Subject", "(Philosophy)"
theDoc.Save "c:\mypdfs\docaddobject.pdf"
|
|
|