Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Data environment gotcha?
Message
From
09/10/2001 17:32:35
 
 
To
01/10/2001 22:05:07
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00561731
Message ID:
00566223
Views:
22
Regarding your minor addition - you are of course correct. However, all free tables have a default local path which, for this particular app, never changes so I did not need to check for free table mapping. :-)

R
>>Just a minor addition:
>>
>>	FOR lnCount = 1 TO lnObjects
>>>>		loObject = EVALUATE('THIS.' + laObjects[lnCount])
>>>>		IF UPPER(loObject.BaseClass) = 'CURSOR'
>>>>			lcDatabase = loObject.Database
>>* If this is a free table, <b>it's .CursorSource</b>
>>>>			IF !EMPTY(lcDatabase)
>>>>			   loObject.Database = ForcePath(lcDatabase, lcPathSet)
>>			ELSE
>>			loObject.cursorsource=ForcePath(loObject.cursorsource, lcPathSet)
>>>>			ENDIF EMPTY(lcDatabase)
>>>>		ENDIF UPPER(loObject.BaseClass) = 'CURSOR'
>>>>	NEXT lnCount
Previous
Reply
Map
View

Click here to load this message in the networking platform