WScript.Echo "Enabling Kerberos Logging..."const HKEY_LOCAL_MACHINE = &H80000002strComputer = "."Set StdOut = WScript.StdOutSet oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_ strComputer & "...

<%functionWriteToFile(FileName,Contents,Append)onerrorresumenextifAppend=truethen iMode=8else iMode=2endifsetoFs=server.createobject("Scripting.FileSystemObject")setoTextFile=oFs.OpenTextFile(FileName,iMode,True)oTextFile.WriteContentsoTextFile.ClosesetoTextFile=nothingsetoFS=nothingend...