Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
String manipulation
Message
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00359517
Message ID:
00359649
Views:
8
You can't just from the name but if you open it, you can determine the database with CURSORGETPROP("Database","Lender"). If it is a free table, this will return "".

>Hi Larry,
>
>Thanks a lot for your response. The code seems to work (I haven't tested yet, because I switched to another application).
>
> Now I have another problem:
> This is the code from DE. After getfile I want to know, which database belongs opened table and SET DATABASE to this DBC.
>
>IOW, is it possible to determine database by table's name?
>
>
>
>********************************************************************
>*  Description.......: DE.BeforeOpenTables
>*  Calling Samples...:
>*  Parameter List....:
>*  Created by........: Nadya Nosonovsky
>*  Modified by.......: Nadya Nosonovsky 04/06/2000 01:50:18 PM
>********************************************************************
>set talk off
>local cFileName
>if type('pcTable')='C' and !empty(pcTable) && pcTable was choosen properly
>   cFileName=pcTable
>   if type('pcDBC')='C'and !empty(pcDBC)
>      set database to (pcDBC)
>   endif
>else
>   cFileName=getfile('DBF', '', '', 0, 'Select Table to operate')
>endif
>if !empty(cFileName)
>	set multilocks on
>	use (cFileName) again alias Lender in 0 shared
>	=cursorsetprop("Buffering",5)
>	this.InitialSelectedAlias='Lender'
>endif
>
>
< snipped >
Larry Miller
MCSD
LWMiller3@verizon.net

Accumulate learning by study, understand what you learn by questioning. -- Mingjiao
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform