Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
GetAppPathStart
Message
General information
Forum:
Visual FoxPro
Category:
The Mere Mortals Framework
Title:
Miscellaneous
Thread ID:
00458779
Message ID:
00459215
Views:
16
cAppPathStart = JPATH(SYS(16))


FUNCTION JPATH && Provides compatibility with VFP5
LPARAMETER lcFullName
lnOccurence = OCCURS("\", lcFullName)
lcPath = SUBSTR(lcFullName, 1, AT("\", lcFullName, lnOccurence))
RETURN lcPath
ENDFUNC
Joe Mamokan
Database Specialist
Email Address: mamokan@eudoramail.com
Url Address: http://visnet_dd.tripod.com
"Can you VISUALIZE Quick Data Access"
Cell # +639172482033
Previous
Reply
Map
View

Click here to load this message in the networking platform