Option Explicit
Dim pName, pVersion, pLang, pRevision

pName = 	"Audi_JavaSecurityConfig"
pVersion = 	"4.01"
pLang =		"NTR"
pRevision = "91"

'----- 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

DeleteReg "KEY","HKLM\Software\AudiAG\InstalledProducts\" & pName & "\",32

VbsLog "----- Ende Deinstallation"

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