PDF file's current page No. ? Topic is solved

[IMEime]

I'd like to grab "the number of current page" of active pdf file.
I found this code.
But, it emits error only.

Code: Select all

ob := ComObjCreate("AcroExch.App")    ; error comes here.
ad := ob.GetActiveDoc
pd := ad.GetPDDoc
js := pd.GetJSObject
MsgBox % js.Path      ; first step only. My goal it to know the current Pg. No.

What do I have to do ?

Adobe Reader X
AHK 64 Unicode
Win 8.1

Regards

[Exaskryz]

I have Adobe Reader XI (on Win 8.1; AHK 32 Unicode I believe), so this may need to be adjusted for you.

I retrieve the pagenumber by using ControlGetText. I use this line in one of my scripts:

Code: Select all

ControlGetText, reader_page, Edit2, % "ahk_id " Reader%A_Index%

So the control Edit2 is what contains the value of the page number for me.

---

One thing I will note is that if you need the active PDF file and still want to try to use it as a COM Object (in case of other manipulation beyond just getting a page number), do you want ComObjCreate() or ComObjActive()? I've seen Active used when taking control of something already open.

[IMEime]

Hooo.
It works.
This is a nice workaround.

thanks

[FanaticGuru]

If you want to do it through COM along the lines of original post, you can try this:

Code: Select all

App := ComObjCreate("AcroExch.App")
AVDoc := App.GetActiveDoc()
AVPageView := AVDoc.GetAVPageView()

MsgBox % AVPageView.GetPageNum

It is important to realize that Acrobat uses a zero index for page numbers internally, meaning that the first page is zero. So for most cases you would add +1 to this number to get the page numbers that most would expect.

This is for the full Adobe Acrobat. I do not believe the free Reader has full COM support that would allow this method.

FG

[Lisa19]

@FanaticGuru thanks a lot!

I'm trying to understand how this work, could you please show me how I could highlight a selected text?

I tried to add this line just after your code (it did not work)

Code: Select all

        page= % AVPageView.GetPageNum +1 ; first page is  0
        AVDoc.PDTextSelect.highlight

Thank you

For those looking for the API docs:
https://www.adobe.com/content/dam/acom/en/devnet/acrobat/pdfs/iac_developer_guide.pdf