Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
A better set path to...
Message
De
16/04/1998 09:24:22
 
 
À
16/04/1998 00:31:41
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00092371
Message ID:
00092479
Vues:
27
Here is how we do it. The EXE is in a subdirecotry off the main and all the support files are in subdirectories under that so the MAIN.EXE sets up the path like this.

LOCAL lc_path, ln_cntr, ln_numfiles, la_dir
lc_path = SYS(5)+CURDIR()
*&& put the directories in an array
ln_numfiles = ADIR(la_dir,"",'D')
*&& loop though the array and add them to the path
FOR ln_cntr = 1 TO ln_numfiles
lc_path = lc_path + ';'+ la_dir[ln_cntr,1]
ENDFOR

SET PATH TO &lc_path

RELEASE lc_path, ln_cnt;r, ln_numfiles, la_dir

{My Two Cents}

Charles
Charles

"The code knows no master." - Chuck Mautz
"Everybody is ignorant, only on different subjects." - Will Rogers
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform