Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Database, Environment, etc.
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Database, Environment, etc.
Environment versions
Visual FoxPro:
VFP 6 SP5
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01135434
Message ID:
01135434
Views:
61
Is the below code ridiculous? Is there a better way? I keep getting an error that asks me to find the particular tabels in the dbc file.

* Actual code in BeforeOpenTables() event:
SET PATH TO E:\PRODDATA
wait window nowait "Setting database to E:\ProdData\ProdSchd.dbc"
This.Cursor1.Database="e:\proddata\prodschd.dbc"
This.Cursor1.cursorsource ="E:\ProdData\Desc.dbf"

This.Cursor2.Database="e:\proddata\prodschd.dbc"
This.Cursor2.cursorsource ="E:\ProdData\IPWirSer.dbf"

This.Cursor3.Database="E:\ProdData\ProdSchd.dbc"
This.Cursor3.cursorsource ="E:\ProdData\IPWirDta.dbf"

This.Cursor4.Database="E:\ProdData\ProdSchd.dbc"
This.Cursor4.cursorsource ="E:\ProdData\FabPNDta.dbf"

This.Cursor5.Database="E:\ProdData\ProdSchd.dbc"
This.Cursor5.cursorsource ="E:\ProdData\IPFormat.dbf"

This.Cursor6.Database="E:\ProdData\ProdSchd.dbc"
This.Cursor6.cursorsource ="E:\ProdData\WkOrd.dbf"

This.Cursor7.Database="E:\ProdData\ProdSchd.dbc"
This.Cursor7.cursorsource ="E:\ProdData\Emprpfmt.dbf"

This.Cursor8.Database="E:\ProdData\ProdSchd.dbc"
This.Cursor8.cursorsource ="E:\ProdData\IPSerial.dbf"

This.Cursor9.Database="E:\ProdData\ProdSchd.dbc"
This.Cursor9.cursorsource ="E:\ProdData\Fabformt.dbf"

This.Cursor10.Database="E:\ProdData\ProdSchd.dbc"
This.Cursor10.cursorsource="E:\ProdData\Emprpdta.dbf"
Cecil T. Champenois, Jr., MSCS

http://www.champenois.com
http://www.iedotnetug.org/sf
http://www.atoutfox.org
Next
Reply
Map
View

Click here to load this message in the networking platform