This problem concerns *only* customers running Glink in a web controlled
environment who have *already* upgraded to 8.1.3 (or are thinking of
upgrading to 8.1.4).

In the web controlled environment Glink is downloaded from a web server
by clients needing to use it, but installed locally for efficiency.
There is an option that enables the locally installed Glink to
automatically check on each startup if there is an updated version on
the web server and if so, replace itself with the newer version.

The /VER option to perform automatic update of Glink does
not work for upgrades from version 8.1.3 (and will not work for
8.1.4). The upgrade is collected but never installed.

Workaround:

If you are running a version *prior* to 8.1.3 and are using automatic
update then do *not* upgrade to 8.1.3 or 8.1.4 but go to 8.1.5 or 8.2.0
(or better) immediately and you will sidestep the problem.

If you have *already* installed 8.1.3 or 8.1.4 on the clients you can
use the script provided here to provide an automatic update that works.

First remove the /VER command from the .glink file you are using.
Replace it with:

   /S update.scrgl

and save the script below as update.scrgl. You must also provide the URL
of the file from which Glink 8.1.5 or 8.2.0 is to be collected in the
Assign %WebFile statement in the script. If you are already using /S in
your .glink file you will also need to provide that in the next to last
line of the script.

Script follows:

*-------------------------------------------------------

Define 1 TempDir
Define 2 BatFile
Define 3 UpgradeFile
Define 4 WebFile
Define 5 Data

** You must insert the location of the upgrade package here

Assign %WebFile "http://mysite.com/glink/upgrade.exe"

GetEnv %TempDir "TEMP"
Assign %BatFile     (%TempDir "GlinkUpdate.bat")
Assign %UpgradeFile (%TempDir "GlinkUpgrade.exe")

If ($VERSION gtn 813) Goto Done

Dbox Center 160 50 "Upgrade"
 Ctext 5  5 150 10 "A newer version of Glink is available"
 Ctext 5 16 150 10 "Would you like to upgrade now?"
 DefPushButton 20 32 50 14 "Yes" 1
 PushButton    90 32 50 14 "No"  2
EndDbox
If ($DBOX nen 1) Goto Done

Set Istatus Show

Fopen #1 input %WebFile
If not OK begin
  Dbox Center 160 40 "Upgrade"
  Ctext 5  5 150 10 "Unable to access the upgrade file!"
  DefPushButton 55 20 50 14 "OK" 1
  EndDbox
  Goto Done
EndIf

Fopen #2 output %UpgradeFile
While not eof #1
  Frdb #1 %Data
  Fwtb #2 %Data
EndWhile

Fclose #1
Fclose #2

Fopen #1 Output %BatFile
Fwtline #1 %UpgradeFile
Fwtline #1 ":Repeat"
Fwtline #1 ("del " %UpgradeFile)
Fwtline #1 ("if exist " %UpgradeFile " goto Repeat")
Fwtline #1 ("del " %BatFile)
Fclose #1

Set DosShow Hide
Set DosWait No
Exec %BatFile
Halt

:Done

* Modify the following line if you already use a startup
* script in your .glink file. Don't forget to remove the '*'
* before 'chain' or it won't happen!

* chain myscript.scr
Return