|
We start by creating a PDF document. We use two transforms to
apply a generic 90 degree rotation around the center of the
document and rotate the drawing rectangle by the same amount. After
applying our rotation, we add some text to the page.
Set theDoc = Server.CreateObject("ABCpdf13.Doc")
' apply a rotation transform
w = theDoc.MediaBox.Width
h = theDoc.MediaBox.Height
l = theDoc.MediaBox.Left
b = theDoc.MediaBox.Bottom
theDoc.Transform.Rotate 90, l, b
theDoc.Transform.Translate w, 0
' rotate our rectangle
theDoc.Rect.Width = h
theDoc.Rect.Height = w
' add some text
theDoc.Rect.Inset 50, 50
theDoc.FontSize = 96
theDoc.AddText "Landscape Orientation"
|