|
We start by creating a PDF document. We 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("ABCpdf5.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"
|