Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Data environment gotcha?
Message
De
09/10/2001 17:32:35
 
 
À
01/10/2001 22:05:07
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00561731
Message ID:
00566223
Vues:
23
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
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform