Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Database Versions?
Message
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Miscellaneous
Thread ID:
00675528
Message ID:
00676063
Views:
19
Hi Caroline,

Download this file.
Using:
SET PROCEDURE TO DFO.PRG
#INCLUDE "dbc.h"
LOCAL lcAlias,liID,luValue

* Open DBC as table
lcDBC="c:\temp\xxd001.dbc"
lcAlias=SYS(2015)
USE (lcDBC) IN 0 ALIAS (lcAlias)

* Return ID database
liID=DBC_GetIDObject(lcAlias,_DBC_DataBase,"Database")

* Return property Version
=DBC_GetProperty(lcAlias,liID,_DBCID_Version,@luValue)
?luValue

* Set property Version
* 10 - VFP 3.0 - VFP 6.0
* 11 - VFP 7.0
=DBC_SetProperty(lcAlias,liID,_DBCID_Version,10)

* Return property Version
=DBC_GetProperty(lcAlias,liID,_DBCID_Version,@luValue)
?luValue

USE IN (lcAlias)
MartinJ

>>>Hello all,
>>>
>>>I've just discovered that you can get the version number of a database with DBGetProp. Does anyone know if this is automatically incremented or if it has to always be set manually?
>>>I'm getting a value of 10 back which seems a strange number to start at :)
>>>
>>>Thanks in anticipation
>>>
>>>I've just discovered that this is a ReadOnly property so what causes it to increment?
>>>Thanks
>>
>>I think this property is for internal use from VFP. AFAIK it increments with dfferent FoxPro versions.
>>See Error 1750 from VFP help
>>
>>http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fox7help/html/err1750.asp
>>
>>HTH
>Thanks Zlatin, I was afraid that would be the answer.
>
>Any ideas how other people determine if a local database (just containing views) needs to be updated to the most recent version?
"Navision is evil that needs to be erazed... to the ground"

Jabber: gorila@dione.zcu.cz
Jabber? Jabbim
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform