Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Changing database property in run time
Message
From
07/05/1998 09:44:18
Elyse Pomerantz
Dynamic Data Concepts, Inc.
Brooklyn, New York, United States
 
 
To
07/05/1998 08:07:20
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00097613
Message ID:
00097649
Views:
20
>Hi All!
>
> My question is that how can I change the cursor's database (path) property in run time.
>I have an application where there can be many subdirectories but the table names are same.
>
> Thanks IVAN

I call this procedure from the BeforeOpenTables event of the DataEnvironment.

PROCEDURE NewDataPath
PARAMETERS toDataEnv && reference to DataEnvironment
set library to foxtools additive
if AMEMBERS(aCursors,toDataEnv,2)>0
for each cCursor in aCursors
if upper(toDataEnv.&cCursor..class)="CURSOR"
if !empty(JustPath(toDataEnv.&cCursor..cursorsource)) toDataEnv.&cCursor..cursorsource=;
ForcePath(toDataEnv.&cCursor..cursorsource,gcMyNewPath)
endif
if !empty(JustPath(toDataEnv.&cCursor..database)) toDataEnv.&cCursor..database=;
ForcePath(toDataEnv.&cCursor..database,gcMyNewPath)
endif
endif
endfor
endif
Elyse Pomerantz
Previous
Reply
Map
View

Click here to load this message in the networking platform