Option Explicit
Dim pValidity, pName, pVersion, pOSValidity, pLang, pRevision

pValidity		= "INA"
pName			= "Apple_QuicktimeUninstaller"
pVersion 		= "1.0"
pOSValidity 	= "ALL"
pLang 			= "ZXX"
pRevision 		= "0001"

'----- Functions.vbs einbinden
Dim olibfso : Set olibfso = CreateObject("Scripting.FileSystemObject")
ExecuteGlobal olibfso.OpenTextFile(olibfso.GetParentFolderName(Wscript.ScriptFullName) + "\_Functions.vbs", 1, false).ReadAll
Set olibfso = nothing

LogEnabled = True

'----- START Uninstallation -----

VbsLog "----- Start Deinstallation " & pName & " " & pVersion

'---- delete branding -----
DeleteBranding pValidity, pName, pVersion, pOSValidity, pLang, pRevision

VbsLog "----- Ende Deinstallation"

'----- ENDE Uninstallation -----
FinishScript()