Article View: adobe.acrobat.sdk
Article #246Re: AcroExch.AVDoc.FindText()
From: Reinhard_Franke
Date: Fri, 20 Mar 2009 19:32
Date: Fri, 20 Mar 2009 19:32
22 lines
1150 bytes
1150 bytes
Mmmh,
I get true or false, but bothersome is, that when OK = false a msgbox appears and says "couldn't find".
You may play a little bit with that and perhabs use JSO for find/highlite in order to avoid that msgbox.
best regards, Reinhard
TestFind.vbs
---------------------------
Dim acrApp, acrAVDoc
Set acrApp = CreateObject("AcroExch.App")
Set acrAVDoc = CreateObject("AcroExch.AVDoc")
acrApp.Show
If acrAVDoc.Open ("c:\Test.pdf","") Then
Ok = acrAVDoc.FindText("SomeWhat", 0, 1, 1)
msgbox(Ok)
end if
set acrAvDoc = Nothing
set acrApp = Nothing
Technical Details
Message-ID:
<59b85c6e.1@webcrossing.la2eafNXanI>Path:
arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!newshub.sdsu.edu!webcrossingReferences:
<59b85c6e.-1@webcrossing.la2eafNXanI>Show Full Headers
Complete Article Headers
X-Google-Thread: 10177e,2f91b3743d53ea47 X-Google-Attributes: gid10177e,domainid0,public,usenet X-Google-Language: ENGLISH,ASCII-7-bit From: Reinhard_Franke@adobeforums.com Path: arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!newshub.sdsu.edu!webcrossing Newsgroups: adobe.acrobat.sdk Subject: Re: AcroExch.AVDoc.FindText() Message-ID: <59b85c6e.1@webcrossing.la2eafNXanI> Date: Fri, 20 Mar 2009 12:32:08 -0700 References: <59b85c6e.-1@webcrossing.la2eafNXanI> Lines: 24 MIME-Version: 1.0 Content-Type: text/plain; charset="ISO-8859-1" Content-Transfer-Encoding: 8bit