ViewPreference

Skip Navigation LinksHome  /  Support  /  Forums  /  DynamicPDF Merger for COM/ActiveX (v4.x)  /  Display Thread

DynamicPDF Merger for COM/ActiveX (v4.x) Forum

 Oct 23 2008 1:48 PM
How do I set the initial view properites for zoom for "Fit to Width" and for navigation bookmarks?  I am using the professional version.

From the VB merge example, I tried the following, and it did not work.

Private Sub DrawMergePDF()
    Dim objDoc As DynamicPDF.Document   
    Set objDoc = New DynamicPDF.Document

    '***************************************
    ' my changes
    objDoc.InitialZoom = DPDF_Zoom_FitWidth
    objDoc.ViewerPreferences.HideWindowUI = False
    '***************************************
    
    objDoc.Creator = "MergePDFs.asp"
    objDoc.Author = "Your Name"
    objDoc.Title = "Merge PDFs"
    
    objDoc.LoadPdf App.Path & "/PDFs/DocumentA.pdf"

    ' Append additional PDF
    objDoc.AppendPdf App.Path & "/PDFs/DocumentB.pdf"
    objDoc.AppendPdf App.Path & "/PDFs/DocumentC.pdf"
    ' Append 3 MyPages from an aditional PDF
    objDoc.AppendPdf App.Path & "/PDFs/DocumentD.pdf", 1, 3

    ' Outputs the merged document to the current web MyPage
    objDoc.DrawToFile (App.Path & "\MergePDFs.pdf")

    MergePDF.Navigate (App.Path & "\MergePDFs.pdf")

End Sub


Thanks,
GA
 Oct 23 2008 5:08 PM
Posted by a ceTe Software moderator
Hello GA,

Try adding the following line of code and see if that helps fixing the problem.

<!-- METADATA TYPE="typelib" UUID="{DF9225FE-94A4-490D-8CAD-E8366CE621D3}"-->

Thanks,
ceTe Software Support Team
 Oct 23 2008 6:22 PM
I apologize for the confusion.  I am not running VBScript; I am using VB6.  I just clipped the code from the example project.

Thanks,
GA

All times are US Eastern Standard time. The time now is 2:05 PM.