Chris came up with the [idea] and sample code for adding a version checker webservice.
This service will enable the projectchefs to add a simple agent to their template which allows users to check whether a newer version is availlable.

I created the webservice today and allthough it's not 100% finished yet, but feel free to check it out:

http://www.openntf.org/projects/pmt.nsf/CheckVersion?WSDL

Example codesnippet to consume this webservice below:

sWSDL = "http://www.openntf.org/projects/pmt.nsf/CheckVersion?WSDL" Set Client = CreateObject("MSSOAP.SoapClient") Call Client.mssoapinit(sWSDL) wsTemplateBuildNumber = Client.getLatestBuildNumber(_ thisProject, thisTemplateBuildNumber, thisTemplateBuildName, thisURL) '=> check if we got a valid response If wsTemplateBuildNumber = 0 Then Msgbox "Unable to determine the latest version" Exit Sub End If '=> compare the buildnumbers If wsTemplateBuildNumber > thisTemplateBuildNumber Then wsTemplateBuildName = Client.GetLatestBuildName(thisProject) Messagebox "There is a newer version available: "_ & wsTemplateBuildName, MB_OK, "Update check" '=> Open the new release document for download. projURL$ = Client.GetLatestURL(thisProject) w.URLOpen(projURL$) Else Messagebox "Your are using the latest version.", MB_OK, "Update check" End If

Note: thisProject is the OpenNTF projectname, theTemplateBuildNumber/name and thisURL are variables for request logging (not implemented yet) and should reflect the current buildname & number



comments powered byDisqus