Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Setup Wizard
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00228103
Message ID:
00228339
Views:
13
>
>I use the following code to prompt me that the app needs to be reinstalled:
>
> * Lets check to see to the user's exe is older than the CAB file that they install
> * from, if it is then the users application needs to be reinstalled
> LOCAL lcSetupDirectory, lcLocalExe, aMyLocalCopy, aNetCopy
> DIMENSION aMyLocalCopy(1)
> DIMENSION aNetCopy(1)
> =ADIR(aMyLocalCopy,'.\CODE40.EXE')
> * This is the location on the network where we keep the Net setup files
> =ADIR(aTheNetCopy,'\\402FS1\DATA\VFAPPS\VFPCODE40SETUP\NETSETUP\SETUP1.CAB')
> IF DTOS(aTheNetCopy[1,3])+aTheNetCopy[1,4] > DTOS(aMyLocalCopy[1,3])+ aMyLocalCopy[1,4]
> * Net copy is more recent
> * We will set flag then the main program can handle informing the user
> .lAppNeedsReinstalled = .T.
> ENDIF


So You're making your own setup program from scratch? I'm sorry, but I need more explaination as where, or when to put that code.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform