Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
A better set path to...
Message
From
16/04/1998 09:24:22
 
 
To
16/04/1998 00:31:41
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00092371
Message ID:
00092479
Views:
26
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
Previous
Reply
Map
View

Click here to load this message in the networking platform