Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
SDT NeedUpdate/Update not working at client machine
Message
 
 
To
21/10/2000 21:54:07
Adam Skowronski
Custom Designed Systems
Miami, Florida, United States
General information
Forum:
Visual FoxPro
Category:
Stonefield
Miscellaneous
Thread ID:
00432554
Message ID:
00432610
Views:
19
Why are you creating oMeta again? You only need to have oMeta = Newobject() once. This is all you should need:

PRIVATE oMeta
>oMeta = NEWOBJECT('DBCXMgr', 'DBCXMGR.VCX')
>IF TYPE('oMeta') <> 'O' OR ISNULL(oMeta)
> * Error message would be here.
> * other code to deal with client.
> CLOSE DATABASE
> CLEAR EVENTS
> CLEAR ALL
> QUIT
>ENDIF
>oMeta.SetDatabase(DBC())

remove next line or use it to replace the first oMeta line.
** oMeta = NEWOBJECT('DBCXMgr', 'DBCXMGR.VCX', '', .F., JustPath(DBC()))

>IF oMeta.oSDTMgr.NeedUpdate()
> WAIT WINDOW "Updating your Application - Please Wait" NOWAIT
> oMeta.oSDTMgr.Update()
> WAIT CLEAR
>ENDIF oMeta.oSDTMgr.NeedUpdate()


>I am new to SDT and am testing the Update on a second machine which has the application installed. I am making changes to the tables on the development machine, and transfer them to the second machine as if it were a client. All of the necessary SDT files have been transferred along with the new VFP files and EXE. The following lines of code are in the MAIN startup program of the app, yet the Update does not run. Any help or suggestions here would be appreciated.
>
>Adam
>
>PRIVATE oMeta
>oMeta = NEWOBJECT('DBCXMgr', 'DBCXMGR.VCX')
>IF TYPE('oMeta') <> 'O' OR ISNULL(oMeta)
> * Error message would be here.
> * other code to deal with client.
> CLOSE DATABASE
> CLEAR EVENTS
> CLEAR ALL
> QUIT
>ENDIF
>oMeta.SetDatabase(DBC())
>oMeta = NEWOBJECT('DBCXMgr', 'DBCXMGR.VCX', '', .F., JustPath(DBC()))
>
>IF oMeta.oSDTMgr.NeedUpdate()
> WAIT WINDOW "Updating your Application - Please Wait" NOWAIT
> oMeta.oSDTMgr.Update()
> WAIT CLEAR
>ENDIF oMeta.oSDTMgr.NeedUpdate()
Mark McCasland
Midlothian, TX USA
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform