Planet PDF Forum Archive

Planet PDF ForumWowsers! This is page is old, head to the LIVE Planet PDF Forum. It features more than 10 conferences, covering everything from beginner to in-depth developer and pre-press discussions. If you wish to continue... one & two archive covers 1999-2011 (160,000 pages).


New Forum | Previous | Next | (P-PDF) Developers


Topic: Opening a PDF from VB6
Conf: (P-PDF) Developers, Msg: 104844
From: breid
Date: 1/29/2004 04:10 AM

I am having trouble opening a PDF from my VB6 App. Using Acrobat Professional 6
Developing on Win2K - testing on Windows XP.

I will paste the code I am using below.

If Acrobat is open, the form will open and display fine.
However, if Acrobat is not open, Acrobat.exe is called, and it appears in
the task manager, but it never opens a window.

I posted this question to another list, and they said to use maximize, which
I did, with no change in the results.

Am I doing something wrong in my code ?
Many thanks.

Brent

Private Sub command1_click()

Dim AcroApp As CAcroApp
Dim AVDoc As CAcroAVDoc
Dim PDDoc As CAcroPDDoc
Dim IsSuccess As Boolean

Set AcroApp = CreateObject("AcroExch.App")
Set AVDoc = CreateObject("AcroExch.AVDoc")

Call AVDoc.Open("c:\temp\1234a.pdf", "")
Set AVDoc = AcroApp.GetActiveDoc
bOK = AVDoc.Maximize(1)
If AVDoc.isValid Then

Set PDDoc = AVDoc.GetPDDoc

' Fill in pdf properties.
PDDoc.SetInfo "Title", "My Title"
PDDoc.SetInfo "Author", "The Author"
PDDoc.SetInfo "Subject", "The Subject"
PDDoc.SetInfo "Keywords", "Keywords"

If PDDoc.save(1 Or 4 Or 32, _
"c:\temp\convertedfile.pdf") <> True Then
MsgBox "Failed to save " & FileName
End If
End If
End Sub


PDF In-Depth Free Product Trials Ubiquitous PDF

Debenu Aerialist

The ultimate plug-in for Adobe Acrobat. Advanced splitting, merging, stamping, bookmarking, and link...

Download free demo

Debenu PDF Tools Pro

It's simple to use and will let you preview and edit PDF files, it's a Windows application that makes...

Download free demo

Back to the past, 15 years ago! Open Publish 2002

Looking back to 2002, it's amazing how much of the prediction became a reality. Take a read and see what you think!

September 14, 2017
Platinum Sponsor





Search Planet PDF
more searching options...
Planet PDF Newsletter
Most Popular Articles
Featured Product

Debenu PDF Aerialist

The ultimate plug-in for Adobe Acrobat. Advanced splitting, merging, stamping, bookmarking, and link control. Take Acrobat to the next level.

Features

Adding a PDF Stamp Comment

OK, so you want to stamp your document. Maybe you need to give reviewers some advice about the document's status or sensitivity. This tip from author Ted Padova demonstrates how to add stamps with the Stamp Tool along with related comments.