Edit D:\xinhaisoft\crisis_new\student\login.asp

??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CCJCJC, CCJCCJ,CCJCCC, CCCJJJ, CCCJJC:Set CCJCJC = server.CreateObject(CJJJCCCJ("ps~sq]r@??64E:@?")):CCJCJC.open Application(CJJJCCCJ("r@??64E:@?$EC:?8")):Set CCJCCJ=CCJCJC::Function CCCCJCJ(CJJJCCCC):Dim str,CCCJCC:str = Trim(CJJJCCCC):If IsNull(str) Or str = "" Then
CCCCJCJ = ""
else
str=Replace(str, CJJJCCCJ("V"), "")
str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CJJJCCCJ("k:7C2>6"), CJJJCCCJ("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJJJCCCJ("kD4C:AE"), CJJJCCCJ("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CCCJCC=new RegExp:CCCJCC.Pattern=CJJJCCCJ("@?W,2\K.ZXl"):CCCJCC.IgnoreCase = True:CCCJCC.Global=True:str=CCCJCC.Replace(str,CJJJCCCJ("@?S`U6BF2=Dj")):set CCCJCC=nothing:CCCCJCJ=str
End If:End Function::Const CCJJCJJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$"::Function CCCCJCC():dim CCCCJJ:CCCCJJ = Cstr(Request.ServerVariables("HTTP_X_FORWARDED_FOR")):If CCCCJJ = "" Then CCCCJJ = Cstr(Request.ServerVariables(CJJJCCCJ("#t|~%t0pss#")))
if instr(CCCCJJ,CJJJCCCJ("i"))>0 then
CCCCJJ=left(CCCCJJ,instr(CCCCJJ,CJJJCCCJ("i"))-1)
elseif instr(CCCCJJ,CJJJCCCJ("["))>0 then
CCCCJJ=left(CCCCJJ,instr(CCCCJJ,CJJJCCCJ("["))-1)
end if:CCCCJCC=left(CCCCJJ,15):End Function:::Sub SetHttpOnlyCookie(CJJCJJJJ,CJJCJJJC):dim CCCCJC:CCCCJC=CJJCJJJJ & CJJJCCCJ("l") & CJJCJJJC & CJJJCCCJ("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJJJCCCJ("$6E\r@@<:6"),CCCCJC):End Sub:::::Sub CheckValidPost():dim CCCCCJ:CCCCCJ=false:Dim CCCCCC : CCCCCC=lcase(Request.ServerVariables(CJJJCCCJ("w%%!0#tut#t#"))):if(instr(CCCCCC,Application(CJJJCCCJ("s@>2:?(9:E6{:DE")))>0) then
CCCCCJ=true
else
Dim CJJJJJJ : CJJJJJJ=lcase(Request.ServerVariables(CJJJCCCJ("$t#'t#0}p|t"))):Dim CJJJJJC : CJJJJJC=Request.ServerVariables(CJJJCCCJ("{~rp{0pss#")):if Mid(CCCCCC,8,Len(CJJJJJJ))=CJJJJJJ or Mid(CCCCCC,9,Len(CJJJJJJ))=CJJJJJJ or CJJJJJJ=CJJJJJC then CCCCCJ=true
end if:if not CCCCCJ then Call RedirectMessage(CJJJCCCJ("????????,??????????????????????????,"))
end sub:sub ShowMessage(CJJCJJCJ):response.Charset=CJJJCCCJ("FE7\g"):Response.Write CJJJCCCJ("k3Cmk5:G ,2=:8?lV46?E6CVmk5:G ,DEJ=6lV4@=@CiC65j ,7@?E\H6:89Ei3@=5j ,E6IE\2=:8?i46?E6Cj ,3@C56Ci`AI ,D@=:5 ,Rrrrrrrj ,324<8C@F?5\4@=@CiRtgtgtgj ,A255:?8icAI ,aAI ,aAIj ,H:5E9ibd_AIj ,7@?E\D:K6i`aAIVm") & CJJCJJCJ & CJJJCCCJ("k^5:Gmk^5:Gmk3Cm")
end sub:Function CCCCCJJ(CJJJJCJ):if isnull(CJJJJCJ) or trim(CJJJJCJ)="" or not isnumeric(CJJJJCJ) then
CCCCCJJ=false
else
Dim CCCJCC:Set CCCJCC = New RegExp:CCCJCC.Pattern = CJJJCCCJ("/-5ZS"):CCCJCC.IgnoreCase = True:CCCCCJJ = CCCJCC.test(CJJJJCJ):set CCCJCC=nothing
end if:End Function:::::Sub ConnClose():On Error Resume Next:set CCCCCJC=nothing:set CCCCCCJ=nothing:set CCCCCCC=nothing:set CJJJJJJJ=nothing:CJJJJJJC.close : set CJJJJJJC=nothing:CCCJJJ.Close : Set CCCJJJ=Nothing:CCJCCC.Close : Set CCJCCC=Nothing:CJJJJJCJ.Close : Set CJJJJJCJ = Nothing:CCJCJC.Close : Set CCJCJC = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJJCJJCJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJJJCCCJ("!$*0|6DD286"),server.URLEncode(CJJCJJCJ)):Response.Redirect CJJJCCCJ("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::::::::::::Sub CheckQueryTime(CJJCJJCC,CJJCJCJJ):dim str,CJJJJCJ:str=CJJJCCCJ("!$*0") & Ucase(CJJCJJCC):if Session(str)<>"" then
CJJJJCJ=DateDiff(CJJJCCCJ("D"),Session(str),Time):if CJJJJCJ<CJJCJCJJ and CJJJJCJ>0 then
Call ConnClose:Call ShowMessage(CJJJCCCJ("??????????@?????? ,") & CJJCJCJJ & CJJJCCCJ(" ,????,???? ,") & CJJCJCJJ-CJJJJCJ & CJJJCCCJ(" ,????,")):response.End()
else
Session.Contents.Remove(str)
end if
end if:Session(str)=Time:End Sub::::::::::::Private Const CCJJCJC =8:Private Const CCJJCCJ =4:Private Const CCJJCCC =32:Private CJJJJCC(30):Private CJJJCJJ(30):Private Function CJJJJJCC(CJJCJCJC, CJJCJCCJ):If CJJCJCCJ = 0 Then
CJJJJJCC = CJJCJCJC:Exit Function
ElseIf CJJCJCCJ = 31 Then
If CJJCJCJC And 1 Then
CJJJJJCC = &H80000000
Else
CJJJJJCC = 0
End If:Exit Function
ElseIf CJJCJCCJ < 0 Or CJJCJCCJ > 31 Then
Err.Raise 6
End If:If (CJJCJCJC And CJJJCJJ(31 - CJJCJCCJ)) Then
CJJJJJCC = ((CJJCJCJC And CJJJJCC(31 - (CJJCJCCJ + 1))) * CJJJCJJ(CJJCJCCJ)) Or &H80000000
Else
CJJJJJCC = ((CJJCJCJC And CJJJJCC(31 - CJJCJCCJ)) * CJJJCJJ(CJJCJCCJ))
End If:End Function:Private Function CJJJJCJJ(CJJCJCJC, CJJCJCCJ):If CJJCJCCJ = 0 Then
CJJJJCJJ = CJJCJCJC:Exit Function
ElseIf CJJCJCCJ = 31 Then
If CJJCJCJC And &H80000000 Then
CJJJJCJJ = 1
Else
CJJJJCJJ = 0
End If:Exit Function
ElseIf CJJCJCCJ < 0 Or CJJCJCCJ > 31 Then
Err.Raise 6
End If:CJJJJCJJ = (CJJCJCJC And &H7FFFFFFE) \ CJJJCJJ(CJJCJCCJ):If (CJJCJCJC And &H80000000) Then
CJJJJCJJ = (CJJJJCJJ Or (&H40000000 \ CJJJCJJ(CJJCJCCJ - 1)))
End If:End Function:Private Function CJJJJCJC(CJJCJCJC, CJJCJCCJ):CJJJJCJC = CJJJJJCC(CJJCJCJC, CJJCJCCJ) Or CJJJJCJJ(CJJCJCJC, (32 - CJJCJCCJ)):End Function:Private Function CJJJJCCJ(CJJCJCCC, CJJCCJJJ):Dim CJJJCJC:Dim CJJJCCJ:Dim CJJJCCC:Dim CJJCJJJ:Dim CJJCJJC:CJJJCCC = CJJCJCCC And &H80000000:CJJCJJJ = CJJCCJJJ And &H80000000:CJJJCJC = CJJCJCCC And &H40000000:CJJJCCJ = CJJCCJJJ And &H40000000:CJJCJJC = (CJJCJCCC And &H3FFFFFFF) + (CJJCCJJJ And &H3FFFFFFF):If CJJJCJC And CJJJCCJ Then
CJJCJJC = CJJCJJC Xor &H80000000 Xor CJJJCCC Xor CJJCJJJ
ElseIf CJJJCJC Or CJJJCCJ Then
If CJJCJJC And &H40000000 Then
CJJCJJC = CJJCJJC Xor &HC0000000 Xor CJJJCCC Xor CJJCJJJ
Else
CJJCJJC = CJJCJJC Xor &H40000000 Xor CJJJCCC Xor CJJCJJJ
End If
Else
CJJCJJC = CJJCJJC Xor CJJJCCC Xor CJJCJJJ
End If:CJJJJCCJ = CJJCJJC:End Function:Private Function CJJJJCCC(CJCJJCJ, CJJCCJJC, CJJCCJCJ):CJJJJCCC = (CJCJJCJ And CJJCCJJC) Or ((Not CJCJJCJ) And CJJCCJCJ):End Function:Private Function CJJJCJJJ(CJCJJCJ, CJJCCJJC, CJJCCJCJ):CJJJCJJJ = (CJCJJCJ And CJJCCJCJ) Or (CJJCCJJC And (Not CJJCCJCJ)):End Function:Private Function CJJJCJJC(CJCJJCJ, CJJCCJJC, CJJCCJCJ):CJJJCJJC = (CJCJJCJ Xor CJJCCJJC Xor CJJCCJCJ):End Function:Private Function CJJJCJCJ(CJCJJCJ, CJJCCJJC, CJJCCJCJ):CJJJCJCJ = (CJJCCJJC Xor (CJCJJCJ Or (Not CJJCCJCJ))):End Function:Private Sub md5_FF(CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ, CJJCCJCC, CJJCCCJJ):CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJJJJCCJ(CJJJJCCJ(CJJJJCCC(CJCCJJC, CJCCJCJ, CJCCJCC), CJCJJCJ), CJJCCCJJ)):CJCCJJJ = CJJJJCJC(CJCCJJJ, CJJCCJCC):CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJCCJJC):End Sub:Private Sub md5_GG(CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ, CJJCCJCC, CJJCCCJJ):CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJJJJCCJ(CJJJJCCJ(CJJJCJJJ(CJCCJJC, CJCCJCJ, CJCCJCC), CJCJJCJ), CJJCCCJJ)):CJCCJJJ = CJJJJCJC(CJCCJJJ, CJJCCJCC):CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJCCJJC):End Sub:Private Sub md5_HH(CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ, CJJCCJCC, CJJCCCJJ):CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJJJJCCJ(CJJJJCCJ(CJJJCJJC(CJCCJJC, CJCCJCJ, CJCCJCC), CJCJJCJ), CJJCCCJJ)):CJCCJJJ = CJJJJCJC(CJCCJJJ, CJJCCJCC):CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJCCJJC):End Sub:Private Sub md5_II(CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ, CJJCCJCC, CJJCCCJJ):CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJJJJCCJ(CJJJJCCJ(CJJJCJCJ(CJCCJJC, CJCCJCJ, CJCCJCC), CJCJJCJ), CJJCCCJJ)):CJCCJJJ = CJJJJCJC(CJCCJJJ, CJJCCJCC):CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJCCJJC):End Sub:Private Function CJJJCJCC(CJJCCCJC):Dim CJJCJCJ:Dim CJJCJCC:Dim CJJCCJJ():Dim CJJCCJC:Dim CJJCCCJ:Dim CJJCCCC:Const CCJCJJJ =512:Const CCJCJJC =448:CJJCJCJ = Len(CJJCCCJC):CJJCJCC = (((CJJCJCJ + ((CCJCJJJ - CCJCJJC) \ CCJJCJC)) \ (CCJCJJJ \ CCJJCJC)) + 1) * (CCJCJJJ \ CCJJCCC):ReDim CJJCCJJ(CJJCJCC - 1):CJJCCJC = 0:CJJCCCJ = 0:Do Until CJJCCCJ >= CJJCJCJ:CJJCCCC = CJJCCCJ \ CCJJCCJ:CJJCCJC = (CJJCCCJ Mod CCJJCCJ) * CCJJCJC:CJJCCJJ(CJJCCCC) = CJJCCJJ(CJJCCCC) Or CJJJJJCC(Asc(Mid(CJJCCCJC, CJJCCCJ + 1, 1)), CJJCCJC):CJJCCCJ = CJJCCCJ + 1:Loop:CJJCCCC = CJJCCCJ \ CCJJCCJ:CJJCCJC = (CJJCCCJ Mod CCJJCCJ) * CCJJCJC:CJJCCJJ(CJJCCCC) = CJJCCJJ(CJJCCCC) Or CJJJJJCC(&H80, CJJCCJC):CJJCCJJ(CJJCJCC - 2) = CJJJJJCC(CJJCJCJ, 3):CJJCCJJ(CJJCJCC - 1) = CJJJJCJJ(CJJCJCJ, 29):CJJJCJCC = CJJCCJJ:End Function:Private Function CJJJCCJJ(CJJCJCJC):Dim CJCJJJJ:Dim CJCJJJC:For CJCJJJC = 0 To 3:CJCJJJJ = CJJJJCJJ(CJJCJCJC, CJCJJJC * CCJJCJC) And CJJJJCC(CCJJCJC - 1):CJJJCCJJ = CJJJCCJJ & Right("0" & Hex(CJCJJJJ), 2):Next:End Function:Public Function CJJJCCJC(CJJCCCJC):CJJJJCC(0) = CLng(1):CJJJJCC(1) = CLng(3):CJJJJCC(2) = CLng(7):CJJJJCC(3) = CLng(15):CJJJJCC(4) = CLng(31):CJJJJCC(5) = CLng(63):CJJJJCC(6) = CLng(127):CJJJJCC(7) = CLng(255):CJJJJCC(8) = CLng(511):CJJJJCC(9) = CLng(1023):CJJJJCC(10) = CLng(2047):CJJJJCC(11) = CLng(4095):CJJJJCC(12) = CLng(8191):CJJJJCC(13) = CLng(16383):CJJJJCC(14) = CLng(32767):CJJJJCC(15) = CLng(65535):CJJJJCC(16) = CLng(131071):CJJJJCC(17) = CLng(262143):CJJJJCC(18) = CLng(524287):CJJJJCC(19) = CLng(1048575):CJJJJCC(20) = CLng(2097151):CJJJJCC(21) = CLng(4194303):CJJJJCC(22) = CLng(8388607):CJJJJCC(23) = CLng(16777215):CJJJJCC(24) = CLng(33554431):CJJJJCC(25) = CLng(67108863):CJJJJCC(26) = CLng(134217727):CJJJJCC(27) = CLng(268435455):CJJJJCC(28) = CLng(536870911):CJJJJCC(29) = CLng(1073741823):CJJJJCC(30) = CLng(2147483647):CJJJCJJ(0) = CLng(1):CJJJCJJ(1) = CLng(2):CJJJCJJ(2) = CLng(4):CJJJCJJ(3) = CLng(8):CJJJCJJ(4) = CLng(16):CJJJCJJ(5) = CLng(32):CJJJCJJ(6) = CLng(64):CJJJCJJ(7) = CLng(128):CJJJCJJ(8) = CLng(256):CJJJCJJ(9) = CLng(512):CJJJCJJ(10) = CLng(1024):CJJJCJJ(11) = CLng(2048):CJJJCJJ(12) = CLng(4096):CJJJCJJ(13) = CLng(8192):CJJJCJJ(14) = CLng(16384):CJJJCJJ(15) = CLng(32768):CJJJCJJ(16) = CLng(65536):CJJJCJJ(17) = CLng(131072):CJJJCJJ(18) = CLng(262144):CJJJCJJ(19) = CLng(524288):CJJJCJJ(20) = CLng(1048576):CJJJCJJ(21) = CLng(2097152):CJJJCJJ(22) = CLng(4194304):CJJJCJJ(23) = CLng(8388608):CJJJCJJ(24) = CLng(16777216):CJJJCJJ(25) = CLng(33554432):CJJJCJJ(26) = CLng(67108864):CJJJCJJ(27) = CLng(134217728):CJJJCJJ(28) = CLng(268435456):CJJJCJJ(29) = CLng(536870912):CJJJCJJ(30) = CLng(1073741824):Dim CJCJJCJ:Dim CJCJJCC:Dim CJCJCJJ:Dim CJCJCJC:Dim CJCJCCJ:Dim CJCJCCC:Dim CJCCJJJ:Dim CJCCJJC:Dim CJCCJCJ:Dim CJCCJCC:Const CCJCJCJ =7:Const CCJCJCC =12:Const CCJCCJJ =17:Const CCJCCJC =22:Const CCJCCCJ =5:Const CCJCCCC =9:Const CCCJJJJ =14:Const CCCJJJC =20:Const CCCJJCJ =4:Const CCCJJCC =11:Const CCCJCJJ =16:Const CCCJCJC =23:Const CCCJCCJ =6:Const CCCJCCC =10:Const CCCCJJJ =15:Const CCCCJJC =21:CJCJJCJ = CJJJCJCC(CJJCCCJC):CJCCJJJ = &H67452301:CJCCJJC = &HEFCDAB89:CJCCJCJ = &H98BADCFE:CJCCJCC = &H10325476:For CJCJJCC = 0 To UBound(CJCJJCJ) Step 16:CJCJCJJ = CJCCJJJ:CJCJCJC = CJCCJJC:CJCJCCJ = CJCCJCJ:CJCJCCC = CJCCJCC:md5_FF CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 0), CCJCJCJ, &HD76AA478:md5_FF CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 1), CCJCJCC, &HE8C7B756:md5_FF CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 2), CCJCCJJ, &H242070DB:md5_FF CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 3), CCJCCJC, &HC1BDCEEE:md5_FF CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 4), CCJCJCJ, &HF57C0FAF:md5_FF CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 5), CCJCJCC, &H4787C62A:md5_FF CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 6), CCJCCJJ, &HA8304613:md5_FF CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 7), CCJCCJC, &HFD469501:md5_FF CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 8), CCJCJCJ, &H698098D8:md5_FF CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 9), CCJCJCC, &H8B44F7AF:md5_FF CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 10), CCJCCJJ, &HFFFF5BB1:md5_FF CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 11), CCJCCJC, &H895CD7BE:md5_FF CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 12), CCJCJCJ, &H6B901122:md5_FF CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 13), CCJCJCC, &HFD987193:md5_FF CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 14), CCJCCJJ, &HA679438E:md5_FF CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 15), CCJCCJC, &H49B40821:md5_GG CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 1), CCJCCCJ, &HF61E2562:md5_GG CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 6), CCJCCCC, &HC040B340:md5_GG CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 11), CCCJJJJ, &H265E5A51:md5_GG CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 0), CCCJJJC, &HE9B6C7AA:md5_GG CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 5), CCJCCCJ, &HD62F105D:md5_GG CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 10), CCJCCCC, &H2441453:md5_GG CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 15), CCCJJJJ, &HD8A1E681:md5_GG CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 4), CCCJJJC, &HE7D3FBC8:md5_GG CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 9), CCJCCCJ, &H21E1CDE6:md5_GG CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 14), CCJCCCC, &HC33707D6:md5_GG CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 3), CCCJJJJ, &HF4D50D87:md5_GG CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 8), CCCJJJC, &H455A14ED:md5_GG CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 13), CCJCCCJ, &HA9E3E905:md5_GG CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 2), CCJCCCC, &HFCEFA3F8:md5_GG CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 7), CCCJJJJ, &H676F02D9:md5_GG CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 12), CCCJJJC, &H8D2A4C8A:md5_HH CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 5), CCCJJCJ, &HFFFA3942:md5_HH CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 8), CCCJJCC, &H8771F681:md5_HH CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 11), CCCJCJJ, &H6D9D6122:md5_HH CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 14), CCCJCJC, &HFDE5380C:md5_HH CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 1), CCCJJCJ, &HA4BEEA44:md5_HH CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 4), CCCJJCC, &H4BDECFA9:md5_HH CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 7), CCCJCJJ, &HF6BB4B60:md5_HH CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 10), CCCJCJC, &HBEBFBC70:md5_HH CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 13), CCCJJCJ, &H289B7EC6:md5_HH CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 0), CCCJJCC, &HEAA127FA:md5_HH CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 3), CCCJCJJ, &HD4EF3085:md5_HH CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 6), CCCJCJC, &H4881D05:md5_HH CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 9), CCCJJCJ, &HD9D4D039:md5_HH CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 12), CCCJJCC, &HE6DB99E5:md5_HH CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 15), CCCJCJJ, &H1FA27CF8:md5_HH CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 2), CCCJCJC, &HC4AC5665:md5_II CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 0), CCCJCCJ, &HF4292244:md5_II CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 7), CCCJCCC, &H432AFF97:md5_II CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 14), CCCCJJJ, &HAB9423A7:md5_II CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 5), CCCCJJC, &HFC93A039:md5_II CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 12), CCCJCCJ, &H655B59C3:md5_II CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 3), CCCJCCC, &H8F0CCC92:md5_II CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 10), CCCCJJJ, &HFFEFF47D:md5_II CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 1), CCCCJJC, &H85845DD1:md5_II CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 8), CCCJCCJ, &H6FA87E4F:md5_II CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 15), CCCJCCC, &HFE2CE6E0:md5_II CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 6), CCCCJJJ, &HA3014314:md5_II CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 13), CCCCJJC, &H4E0811A1:md5_II CJCCJJJ, CJCCJJC, CJCCJCJ, CJCCJCC, CJCJJCJ(CJCJJCC + 4), CCCJCCJ, &HF7537E82:md5_II CJCCJCC, CJCCJJJ, CJCCJJC, CJCCJCJ, CJCJJCJ(CJCJJCC + 11), CCCJCCC, &HBD3AF235:md5_II CJCCJCJ, CJCCJCC, CJCCJJJ, CJCCJJC, CJCJJCJ(CJCJJCC + 2), CCCCJJJ, &H2AD7D2BB:md5_II CJCCJJC, CJCCJCJ, CJCCJCC, CJCCJJJ, CJCJJCJ(CJCJJCC + 9), CCCCJJC, &HEB86D391:CJCCJJJ = CJJJJCCJ(CJCCJJJ, CJCJCJJ):CJCCJJC = CJJJJCCJ(CJCCJJC, CJCJCJC):CJCCJCJ = CJJJJCCJ(CJCCJCJ, CJCJCCJ):CJCCJCC = CJJJJCCJ(CJCCJCC, CJCJCCC):Next:CJJJCCJC = LCase(CJJJCCJJ(CJCCJJJ) & CJJJCCJJ(CJCCJJC) & CJJJCCJJ(CJCCJCJ) & CJJJCCJJ(CJCCJCC)):End Function::Call CheckValidPost:Call CheckQueryTime(CJJJCCCJ("{@8:?"),30):dim redirect:redirect=Request(CJJJCCCJ("C65:C64E")):if not isURL(redirect) then Call RedirectMessage(CJJJCCCJ("????????,????????????????,"))
If Request.ServerVariables(CJJJCCCJ("#t""&t$%0|t%w~s")) = CJJJCCCJ("!~$%") Then
dim CJCCCJC,CJCCCCJ,CJCCCCC,CCJJJJJ:CJCCCJC=CCCCJCJ(Request.Form(CJJJCCCJ("FD6C?2>6"))):CJCCCCJ=Request.Form(CJJJCCCJ("A2DDH@C5")):CCJJJJJ=Request.Form(CJJJCCCJ("D49@@=")):if not CCCCCJJ(CCJJJJJ) then
Call RedirectMessage(CJJJCCCJ("????????????????????????,"))
elseif CJCCCJC="" then
Call RedirectMessage(CJJJCCCJ("??????????????????,"))
end if:CJCCCCJ=CJJJCCJC(CJCCCCJ):CCCJJC=CJJJCCCJ("D6=64E ,E@A ,` ,:5[DE2E6 ,7C@> ,G0>6>36C ,H96C6 ,A2DDH@C5lV") & CJCCCCJ & CJJJCCCJ("V ,2?5 ,:DDEF56?El` ,2?5 ,>6>36C0EJA60E@Al") & CCJJJJJ & CJJJCCCJ(" ,2?5 ,?F>36ClV") & CJCCCJC & CJJJCCCJ("V")
set CCJCCC=CCJCJC.execute(CCCJJC):if CCJCCC.eof then
Call RedirectMessage(CJJJCCCJ("??????????????????????,"))
elseif CCJCCC(1)=0 then
Call RedirectMessage(CJJJCCCJ("??????????????????????????????????,????????????????????????????????????,"))
else
CJCCCCC=CCJCCC(0):CCCJJC=CJJJCCCJ("FA52E6 ,>6>36C ,D6E ,=2DEE:>6l86E52E6WX[=2DE:AlV") & CCCCJCC & CJJJCCCJ("V[=@8E:>6Dl=@8E:>6DZ`[>5dlV") & CJJJCCJC(CJCCCCC & Now) & CJJJCCCJ("V ,H96C6 ,:5l") & CJCCCCC
CCJCJC.execute CCCJJC:Call SetMemberCookie_(CJCCCCC,CJCCCCJ):Call ConnClose:if redirect<>"" then
response.redirect(redirect)
else
response.redirect(CJJJCCCJ("^D49@@=^:?56I]2DAnD49@@=l") & CCJJJJJ)
end if
end if
end if:Sub SetMemberCookie_(CJCCCCC,CJCCCCJ):dim CCJJJJC,CCJJJCJ,CJCJJCC:for CCJJJJC=1 to len(CJCCCCJ):CCJJJCJ=mid(CJCCCCJ,CCJJJJC,1):if isnumeric(CCJJJCJ) then CJCJJCC=CJCJJCC & CCJJJCJ
if len(CJCJJCC)=7 then exit for
next:Randomize:CJCJJCC=CJCCCCC & CJJJCCCJ("]") & CJCCCCJ & CJJJCCCJ("]") & Fix(10000*(Rnd+1)) & CJCJJCC & Fix(10000*(Rnd+1)) & DateDiff(CJJJCCCJ("D"), CJJJCCCJ("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJJJCCCJ("!$*|t|qt#"))=CJCJJCC:End Sub::On Error Resume Next:set CCCCCJC=nothing:set CCCCCCJ=nothing:set CCCCCCC=nothing:set CJJJJJJJ=nothing:CCCJJJ.Close:Set CCCJJJ=Nothing:CCJCCC.Close:Set CCJCCC=Nothing:CCJCJC.Close:Set CCJCJC = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJJJCCCJ(ByVal CJCCJCJ)
Dim CCJJJCC, CCJJJJC, CJJJJCJ
CJCCJCJ = Replace(CJCCJCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCJJJJC = 1 To Len(CJCCJCJ)
If CCJJJJC <> CJJJJCJ Then
CCJJJCC = AscW(Mid(CJCCJCJ, CCJJJJC, 1))
If CCJJJCC >= 33 And CCJJJCC <= 79 Then
CJJJCCCJ = CJJJCCCJ & Chr(CCJJJCC + 47)
ElseIf CCJJJCC >= 80 And CCJJJCC <= 126 Then
CJJJCCCJ = CJJJCCCJ & Chr(CCJJJCC - 47)
Else
CJJJJCJ = CCJJJJC + 1
If Mid(CJCCJCJ, CJJJJCJ, 1) = Chr(64) Then CJJJCCCJ = CJJJCCCJ & ChrW(CCJJJCC + 5) Else CJJJCCCJ = CJJJCCCJ & Mid(CJCCJCJ, CCJJJJC, 1)
End If
End If
Next
End Function
%>

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de