Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Adobe Acrobat document
Message
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Produits tierce partie
Divers
Thread ID:
00794952
Message ID:
00795037
Vues:
23
Hi Rex,

You can use FindExecutable Win API to get program associated with PDF files and act accordingly.
DECLARE INTEGER FindExecutable IN Shell32;
  STRING lpFile, STRING lpDirectory, STRING @lpResult

lcfile = ADDBS(SYS(2023)) + SYS(2015) + ".PDF"
STRTOFILE("TEMP FILE", lcfile)
lcbuffer = SPACE(200)
lnresult = FindExecutable(lcfile, "", @lcbuffer)
ERASE (lcfile ) 
lcExe = ""
DO CASE
CASE lnresult = 31
	* No program is associated with PDF files	
CASE lnresult < 32
	* Some other error 
OTHERWISE	
	* Extract executable associated with PDF file
	lcExe = LEFT(lcBuffer, RAT(CHR(0), lcbuffer )-1)
ENDCASE
? lcExe
>Hi Sergey,
>
>Thank you most sincerely. What you sent me works perfectly!!
>
>In case my user doesn't have Adobe Acrobat Reader on their system, will you please advise me if you know of a way of checking if the reader is loaded onto the users machine?
>
>Regards...Rex
>
--sb--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform