Rick ,
This is the code I am using
set path to data, c:\stonefield\,c:\stonefield\source, c:\stonefield\dbcx
set classlib to dbcxmgr
release oMeta
public oMeta
oMeta = createobject('MetaMgr')
if type('oMeta') # 'O' or isNull(oMeta)
=Messagebox('unable to instantiate MetaMgr class.')
return .F.
endif
if not oMeta.oSDTMgr.OpenData('\test\client\data2')
=Messagebox('Unable to open the database.')
return .F.
endif
if not oMeta.oSDTMgr.OpenAllTables()
=Messagebox('Unable to open one or more tables.')
return .F.
endif
close database
open database \test\client\data2 exclusive
oMeta.oSDTMgr.Reindex()
op=oMeta.oSDTMgr.NeedUpdate()
?op
oMeta.oSDTMgr.Update()
close all
return
Thanks
Previous
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only