Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Search VFP Path and Subfolders for DOC files.
Message
De
09/03/2002 23:36:35
Dragan Nedeljkovich
Now officially retired
Zrenjanin, Serbia
 
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00630625
Message ID:
00630673
Vues:
19
>I have the following code in Click event of a button
>
>lcDocument = "pcbOil.doc"
>ThisForm.Printdoc(lcDocument)
>
>The custom method PrintDoc on my form is as follows:
>
>PARAMETERS lcDocument
>oWord = CreateObject("Word.Application")
>oDoc = oWord.Documents.Open(lcDocument)
>oDoc.PrintOut()
>
>At the startup of my app, I establish the path in my Setup.prg file as follows:
>SET PATH TO &gcPath
>
>gcPath is assigned a value earlier of h:\labtemp;h:\upsi;h:\labnav
>
>How do I make the line:
>
>oDoc = oWord.Documents.Open(lcDocument)
>
>properly search a subfolder beneath the folder h:\labnav named \letters for the file pcbOil.doc.

Combine file() and fullpath():
if file(lcDocument)
   lcDocument=fullpath(lcDocument)
else
   do what you do when file isn't there
endif
File() function will find your document anywhere along VFP path, and fullpath() will give its absolute path, which you can then submit to oWord.Documents.Open(lcDocument).

back to same old

the first online autobiography, unfinished by design
What, me reckless? I'm full of recks!
Balkans, eh? Count them.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform