28 lines
769 B
Plaintext
28 lines
769 B
Plaintext
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() |