PDA

View Full Version : WEB Deploy in Clarion



NewsArchive
10-17-2009, 03:14 AM
I know i have got an answer on this before SV's newsserver breakdown, but i
have no records of it.

How to get a Clarion APP to check for updates on the web.
Its something with calling WUUPDATE.EXE or perhaps WUCHECK.EXE.

Any who will supply a code snippet.

Thanks on the beforehand

Edvard Korsbæk

NewsArchive
10-18-2009, 03:47 AM
Hi Edvard,

> Any who will supply a code snippet.

This is what I use in Build Automator:

CheckforWebUpdates ROUTINE
Data
Rc Long
Ec Long
PP CString(2049)
pF CString(50)
Code
pF = 'autoupdate.exe'
PP = Upper(ShortPath(ITU.ProgPath & '\' & pF))
If Exists(PP)
PP = '"' & ITU.ProgPath & '\' & pF & '"'
RC = ITU.ITRun(PP,true,'/C /S',,True) !! Elevate
If RC = 1
If Message('There are new updates to the Build Automator program
available for download. ' &|
'If you want to update the program, the program will shut
down automatically and ' &|
'run the web update wizard.' &|
'||Do you want to update the program now?',|
'Updates Available - download now?',|
'~RO-Mx1_internet-america.ico',|
Button:Yes+Button:No)=Button:Yes
ITU.ITRun(PP)
Halt()
End
Else
Message('No updates to download for the Build Automator','No new
updates','~RO-Mx1_internet-america.ico')
End
Else
If Message('The AutoUpdate.EXE file could not be found in the "' &
ITU.ProgPath & '" folder. ' &|
'Please download and install the latest build from
www.buildautomator.com. ' &|
'||Do you want to go to our download page now?',|
'Automatic update program not found.',|
'~RO-Mx1_internet-america.ico',|
BUTTON:Yes+BUTTON:No,BUTTON:Yes) = BUTTON:Yes
ITU.OpenUrl('http://www.buildautomator.com/downloads.php')
End
End

I haven't modified this to use wucheck.exe, but basically the first call
should be to wucheck.exe _without_ elevating it, since it doesn't require
it. Only if an update exists, should it call wupdate (or autoupdate.exe as
I call it) and then it _should_ elevate it (it should be automatic, but I
force it in the call to the ITrun method just to make sure:)

Best regards,

--
Arnór Baldvinsson - Icetips Alta LLC
Port Angeles, Washington
www.icetips.com - www.buildautomator.com - www.altawebworks.com

Icetips product subscriptions at http://www.icetips.com/subscribe.php

NewsArchive
10-18-2009, 03:48 AM
thanks again Arnor - Ithink it was this I got last time too!
Edvard

NewsArchive
10-19-2009, 02:03 AM
Hi Edvard,

> thanks again Arnor - Ithink it was this I got last time too!

I have posted it here a few times:)

Best regards,

--
Arnór Baldvinsson - Icetips Alta LLC
Port Angeles, Washington
www.icetips.com - www.buildautomator.com - www.altawebworks.com

Icetips product subscriptions at http://www.icetips.com/subscribe.php