2019-09-19 17:23:23 +02:00
|
|
|
; Copyright (c) uib gmbh (www.uib.de)
|
|
|
|
|
; This sourcecode is owned by uib gmbh
|
|
|
|
|
; and published under the Terms of the General Public License.
|
|
|
|
|
; credits: http://www.opsi.org/en/credits/
|
|
|
|
|
|
|
|
|
|
[Actions]
|
|
|
|
|
requiredWinstVersion >= "4.11.4.6"
|
|
|
|
|
ScriptErrorMessages=off
|
|
|
|
|
|
|
|
|
|
DefVar $MsiId$
|
|
|
|
|
DefVar $UninstallProgram$
|
|
|
|
|
DefVar $LogDir$
|
|
|
|
|
DefVar $ExitCode$
|
|
|
|
|
DefVar $ProductId$
|
|
|
|
|
DefVar $InstallDir$
|
|
|
|
|
DefVar $LicenseRequired$
|
|
|
|
|
DefVar $LicensePool$
|
|
|
|
|
|
|
|
|
|
Set $LogDir$ = "%opsiLogDir%"
|
|
|
|
|
|
|
|
|
|
; ----------------------------------------------------------------
|
|
|
|
|
; - Please edit the following values -
|
|
|
|
|
; ----------------------------------------------------------------
|
|
|
|
|
Set $ProductId$ = "opsi-template"
|
|
|
|
|
Set $InstallDir$ = "%ProgramFiles32Dir%\<path to the product>"
|
|
|
|
|
Set $LicenseRequired$ = "false"
|
|
|
|
|
Set $LicensePool$ = "p_" + $ProductId$
|
|
|
|
|
; ----------------------------------------------------------------
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
comment "Show product picture"
|
|
|
|
|
ShowBitmap "%ScriptPath%\" + $ProductId$ + ".png" $ProductId$
|
|
|
|
|
|
|
|
|
|
Message "Uninstalling " + $ProductId$ + " ..."
|
|
|
|
|
|
|
|
|
|
if FileExists("%ScriptPath%\delsub32.opsiscript")
|
|
|
|
|
comment "Start uninstall sub section"
|
|
|
|
|
Sub "%ScriptPath%\delsub32.opsiscript"
|
|
|
|
|
endif
|
|
|
|
|
|
|
|
|
|
if $LicenseRequired$ = "true"
|
|
|
|
|
comment "Licensing required, free license used"
|
|
|
|
|
Sub_free_license
|
|
|
|
|
endif
|
|
|
|
|
|
|
|
|
|
[Sub_free_license]
|
|
|
|
|
comment "License management is enabled and will be used"
|
|
|
|
|
|
|
|
|
|
comment "Trying to free license used for the product"
|
|
|
|
|
DefVar $result$
|
|
|
|
|
Set $result$ = FreeLicense($LicensePool$)
|
|
|
|
|
; If there is an assignment of a license pool to the product, it is possible to use
|
|
|
|
|
; Set $result$ = FreeLicense("", $ProductId$)
|
|
|
|
|
;
|
|
|
|
|
; If there is an assignment of a license pool to a windows software id, it is possible to use
|
|
|
|
|
; DefVar $WindowsSoftwareId$
|
|
|
|
|
; $WindowsSoftwareId$ = "..."
|
|
|
|
|
; set $result$ = FreeLicense("", "", $WindowsSoftwareId$)
|
|
|
|
|
|
