Edit D:\xinhaisoft\crisis_new\school\admin\GroupGuidance\member

Edit D:\xinhaisoft\crisis_new\school\admin\GroupGuidance\member_focus.asp

??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim CCJCJ, CCJCC,CCCJJ, CCCJC, CCCCJ:Set CCJCJ = server.CreateObject(CJCJCJC("ps~sq]r@??64E:@?")):CCJCJ.open Application(CJCJCJC("r@??64E:@?$EC:?8")):Set CCJCC=CCJCJ::Dim CCCCC,CJJJJJ,CJJJJC,CJJJCJ,CJJJCC,CJJCJJ,CJJCJC,CJJCCJ,CJJCCC:Dim CJCJJJ,CJCJJC,CJCJCJ,CJCJCC,CJCCJJ,CJCCJC:Dim CJCCCJ,CJCCCC,CCJJJJ:Dim CCJJJC:CCJJJC=Trim(Request.Cookies(CJCJCJC("!$*|t|qt#"))):if CCJJJC="" then
Call ClearMemberCookie
else
Call CheckMemberCookie
end if:if CCCCC>0 then
CCCCJ=CJCJCJC("D6=64E ,E@A ,` ,:DD49@@=25>:?[:D4@?DF=E2?E[,C:89E.[EJA6[4FDE@>8C@FA[32=2?46[?F>36C[>@3:=6[>6>36C0EJA60A2E9[>6>36C0EJA60E@A[A9@E@[7246[286[C62=?2>6[EJA6?2>6[8C256 ,u#~| ,G0>6>36C ,H:E9 ,W?@=@4<X ,(wt#t ,!2DDH@C5lV") & CJJJJJ & CJCJCJC("V ,2?5 ,:5l") & CCCCC
set CCCJJ=CCJCJ.execute(CCCCJ):If CCCJJ.EOF Then
Call ClearMemberCookie
Else
CJJJJC=CCCJJ(2) & "":CJJJCJ=CCCJJ(3):CJJJCC=CCCJJ(5):CJJCJJ=CCCJJ(6):CJJCJC=CCCJJ(9):CJJCCJ=CCCJJ(15):CJCJJJ=CCCJJ(0):CJCCCC=CCCJJ(1):CJCCCJ=CCCJJ(11) & "":CJCJJC=CCCJJ(10) & "":CJJCCC=CCCJJ(12):CJCJCJ=CCCJJ(14):CJCJCC=CCCJJ(13):CJCCJJ=CCCJJ(7) & "":CJCCJC=CCCJJ(4):CCJJJJ=CCCJJ(8):if isnull(CJJCCJ) then CJJCCJ=0
if isnull(CJJCJC) or CJJCJC=0 then CJJCJC=CJJJCJ
if isnull(CJCCJC) then CJCCJC=0
if isnull(CJJJCC) then CJJJCC=0
if instr(CJCJCJC("6`_254bhch32dh2336de6_df7a_7ggb6"),CJJJJJ)>0 then Call RedirectMessage(CJCJCJC("????????,????????????????????????????????,"))
Call SetMemberCookie(CCCCC,CJJJJJ)
End IF
end if:::Sub CheckLogined():if CCCCC=0 then
Call ClearMemberCookie:Call ConnClose:dim CCJJCJ:CCJJCJ=trim(request.QueryString(CJCJCJC("D49@@="))):if isnumeric(CCJJCJ) then
response.Redirect CJCJCJC("^>^G2?E^R^D49@@=^") & CCJJCJ & CJCJCJC("^DEF56?E^=@8:?nC65:C64El") & url
else
Call RedirectMessage(CJCJCJC("??????????????,????????????,"))
end if
end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CJCJCJC("!$*|t|qt#"))="":CCCCC=0:CJJCJJ=0:CJJJJJ=Empty:CJJJCC=0:CJJCCJ=0:CJJCJC=0:CJJJCJ=0:CJCJJJ=False:CJCCCC=False:CCJJJJ=Empty:End Sub:Sub CheckMemberCookie():dim CCJJCC,CCJCJJ,CCJCJC,CCJCCJ,CCJCCC:CCJJCC=split(CCJJJC,CJCJCJC("]")):if ubound(CCJJCC)<>2 then
Call ClearMemberCookie
elseif not isnumeric(CCJJCC(0)) or len(CCJJCC(1))<>32 or len(CCJJCC(2))<>32 then
Call ClearMemberCookie
else
CCJCJJ=CCJJCC(1):for CCJCJC=1 to len(CCJCJJ):CCJCCJ=mid(CCJCJJ,CCJCJC,1):if isnumeric(CCJCCJ) then CCJCCC=CCJCCC & CCJCCJ
if len(CCJCCC)=7 then exit for
next:CCJCJJ=CCJJCC(2):if CCJCCC<>mid(CCJCJJ,6,7) then
Call ClearMemberCookie
else
CCJCCJ=mid(CCJCJJ,18,10)/2:if CCJCCJ<DateDiff(CJCJCJC("D"), CJCJCJC("`hf_\`\` ,gi__i__"), Now)-28800 then
Call ClearMemberCookie
else
CCCCC=Clng(CCJJCC(0)):CJJJJJ=CCJJCC(1)
end if
end if
end if:End Sub:Sub SetMemberCookie(CJJJJCC,CJCJCCJ):dim CCJCJC,CCJCCJ,CCJCCC:for CCJCJC=1 to len(CJCJCCJ):CCJCCJ=mid(CJCJCCJ,CCJCJC,1):if isnumeric(CCJCCJ) then CCJCCC=CCJCCC & CCJCCJ
if len(CCJCCC)=7 then exit for
next:CCJCCC=CJJJJCC & CJCJCJC("]") & CJCJCCJ & CJCJCJC("]") & Fix(10000*(Rnd+1)) & CCJCCC & Fix(10000*(Rnd+1)) & DateDiff(CJCJCJC("D"), CJCJCJC("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CJCJCJC("!$*|t|qt#"))=CCJCCC:End Sub::Function CJJCJJC(CJCJCCC):Dim str,CCCJJC:str = Trim(CJCJCCC):If IsNull(str) Or str = "" Then
CJJCJJC = ""
else
str=Replace(str, CJCJCJC("V"), "")
str=replace(str,chrw(160),""):str=replace(str,chr(9),""):On Error Resume Next:str=Replace(str,CJCJCJC("k:7C2>6"), CJCJCJC("U=Ej:7C2>6"),1,-1,1):str=Replace(str,CJCJCJC("kD4C:AE"), CJCJCJC("U=EjD4C:AE"),1,-1,1):On Error Goto 0:set CCCJJC=new RegExp:CCCJJC.Pattern=CJCJCJC("@?W,2\K.ZXl"):CCCJJC.IgnoreCase = True:CCCJJC.Global=True:str=CCCJJC.Replace(str,CJCJCJC("@?S`U6BF2=Dj")):set CCCJJC=nothing:CJJCJJC=str
End If:End Function:Function IIf(CJCCJJJ, CJCCJJC, CJCCJCJ):if isnull(CJCCJJJ) or isempty(CJCCJJJ) then
IIf = CJCCJCJ
elseif CJCCJJJ Then
IIf = CJCCJJC
Else
IIf = CJCCJCJ
end if:End Function:Const CJJJCCC="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$":::::Sub SetHttpOnlyCookie(CJCCJCC,CJCCCJJ):dim CCJJCC:CCJJCC=CJCCJCC & "=" & CJCCCJJ & CJCJCJC("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CJCJCJC("$6E\r@@<:6"),CCJJCC):End Sub:::::::Function CJJCJCC(CJJJCCJ):if isnull(CJJJCCJ) or trim(CJJJCCJ)="" or not isnumeric(CJJJCCJ) then
CJJCJCC=false
else
Dim CCCJJC:Set CCCJJC = New RegExp:CCCJJC.Pattern = CJCJCJC("/-5ZS"):CCCJJC.IgnoreCase = True:CJJCJCC = CCCJJC.test(CJJJCCJ):set CCCJJC=nothing
end if:End Function:::::Sub ConnClose():On Error Resume Next:set CJJCCJJ=nothing:set CJJCCJC=nothing:set CJJCCCJ=nothing:set CJJCCCC=nothing:CJCJJJJ.close : set CJCJJJJ=nothing:CCCJC.Close : Set CCCJC=Nothing:CCCJJ.Close : Set CCCJJ=Nothing:CJCJJJC.Close : Set CJCJJJC = Nothing:CCJCJ.Close : Set CCJCJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CJCCCJC):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CJCJCJC("!$*0|6DD286"),server.URLEncode(CJCCCJC)):Response.Redirect CJCJCJC("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::::::::::::::::Function CJCJJCJ(ByVal CJCJJCC,style):if not isdate(CJCJJCC) then
CJCJJCJ=CJCJJCC:exit function
end if:dim CCCJCJ,CCCJCC,CCCCJJ,CCCCJC:CJCJJCC=cdate(CJCJJCC):CCCJCJ=Year(CJCJJCC):CCCJCC=Month(CJCJJCC):CCCCJJ=Day(CJCJJCC):select case style:case 0:CJCJJCJ=CCCJCJ & CJCJCJC("\") & right(0 & CCCJCC,2) & CJCJCJC("\") & right(0 & CCCCJJ,2):case 1:CJCJJCJ=CCCJCJ & right(0 & CCCJCC,2) & right(0 & CCCCJJ,2):case 2:CJCJJCJ=right(CCCJCJ,2) & CJCJCJC("\") & right(0 & CCCJCC,2) & CJCJCJC("\") & right(0 & CCCCJJ,2):case 3:CJCJJCJ=CCCJCJ & CJCJCJC("\") & right(0 & CCCJCC,2):case 4:CJCJJCJ=right(0 & CCCJCC,2) & CJCJCJC("\") & right(0 & CCCCJJ,2):case 5:CJCJJCJ=right(0 & CCCCJJ,2):case 6:CJCJJCJ=CCCJCJ & CJCJCJC("??") & right(0 & CCCJCC,2) & CJCJCJC("??") & right(0 & CCCCJJ,2) & CJCJCJC("??"):case else
CJCJJCJ=CJCJJCC:end select:End Function::::::::::::::::::::::Call CheckLogined:if not CJCJJJ then Call RedirectMessage(CJCJCJC("????????????M????????,????????????????????????,"))
dim CCJJCJ,CCCCCJ(38):CCJJCJ=CJJCJC:if not CJJCJCC(CCJJCJ) or CCJJCJ=0 then
server.Transfer CJCJCJC("=@8:?]2DA")
end if:CCCCJ=CJCJCJC("D6=64E ,E@A ,` ,;:2@H6:[EJA6[4FDE@>8C@FA[D:5632C0@E96C[E6DEC6DF=EG:6H[>2I>6>36C[766[C6E6DE52J[6IA:C652E6[E:E=6[>6>36C0EJA60?2>6[4@AJC:89E[A:4EFC6[DEF56?E2AA62=[6>2:=0D>EA[6>2:=0=@8:??2>6[6>2:=0=@8:?A2DD[6>2:=07C@>[D2?5E23=6[4C:D:D[JJ52E6[6IA6CE[72>:=J[4C:D:D=3[4C:D:D@=5[vC@FAvF:52?46[q:@u665324<[<6JDEC[=@8@[K:46[:D?6H ,7C@> ,G0D49@@= ,H96C6 ,:5l") & CCJJCJ:set CCCJJ=CCJCJ.execute(CCCCJ):if CCCJJ.eof then Call RedirectMessage(CJCJCJC("??????????M????????,??????????????W") & CCJJCJ & CJCJCJC("X??????????????????,??????????????,"))
CCCCCJ(0)=CCCJJ(0) & "":CCCCCJ(1)=CCCJJ(1):CCCCCJ(3)=CCCJJ(2) & "":CCCCCJ(4)=CCCJJ(3) & "":CCCCCJ(5)=CCCJJ(4):CCCCCJ(6)=CCCJJ(5):CCCCCJ(7)=CCCJJ(6):CCCCCJ(8)=CCCJJ(7):CCCCCJ(9)=CCCJJ(8):CCCCCJ(10)=CCCJJ(9) & "":CCCCCJ(11)=CCCJJ(11) & "":CCCCCJ(12)=CCCJJ(12) & "":CCCCCJ(14)=CCCJJ(14) & "":CCCCCJ(15)=CCCJJ(15) & "":CCCCCJ(16)=CCCJJ(16) & "":CCCCCJ(17)=CCCJJ(17) & "":CCCCCJ(18)=CCCJJ(18):CCCCCJ(19)=IIf(CCCJJ(19),True,False):CCCCCJ(20)=CCCJJ(20):CCCCCJ(25)=CCCJJ(21):CCCCCJ(27)=CCCJJ(22):CCCCCJ(28)=CCCJJ(23):CCCCCJ(29)=IIf(CCCJJ(24),False,True):CCCCCJ(30)=CCCJJ(25):CCCCCJ(31)=CCCJJ(26):CCCCCJ(32)=CCCJJ(27):CCCCCJ(33)=CCCJJ(28):CCCCCJ(34)=CCCJJ(29):CCCCCJ(35)=IIf(CCCJJ(30),True,False):CCCCCJ(36)=121:CCCCCJ(37)=111:CCCCCJ(38)=160:if isNull(CCCCCJ(7)) then CCCCCJ(7)=0
if not isdate(CCCCCJ(9)) then CCCCCJ(9)=Date+2 else CCCCCJ(9)=cdate(CCCCCJ(9))
if CCCCCJ(9)<Date then Call RedirectMessage(CJCJCJC("??????????M????????,????????????????W") & CCCCCJ(9) & CJCJCJC("X??????,"))
if CCCCCJ(10)="" then CCCCCJ(10)=CCCJJ(10)
if CCCCCJ(11)="" then CCCCCJ(11)=CJCJCJC("??????????,U4@AJj") & year(date)-1 & CJCJCJC("\") & year(date)+1 & CJCJCJC(" ,????????????????????????????????") & vbcrlf & CJCJCJC("??????????,_`_\eahge_``^`a") & vbcrlf & CJCJCJC("??????????,??????????????????,??????@??????????a????ac_`??W`___gdX") & vbcrlf & CJCJCJC("??????????,k2 ,9C67lV9EEADi^^HHH]I:?92:D@7E]4@>V ,E2C86ElV03=2?<VmHHH]I:?92:D@7E]4@>k^2m")
if not CJJCJCC(CCCCCJ(20)) then CCCCCJ(20)=7
select case CCCCCJ(1):case 1,2,16:CCCCCJ(36)=159:case 4,5,6,10,11:CCCCCJ(36)=190:CCCCCJ(37)=178:CCCCCJ(38)=191:case 7,13:CCCCCJ(36)=164:CCCCCJ(37)=178:CCCCCJ(38)=179:end select:Function CJJCCCC(CJCCCCC):dim CCCCCC(7,1),CCJCJC,CJJJJJJ,CJJJJJC:CJJJJJJ=Array(CJCJCJC("$49@@="),CJCJCJC("$EF56?E"),CJCJCJC("s6AE"),CJCJCJC("vC256"),CJCJCJC("r=2DD>2E6"),CJCJCJC("}F>36C"),CJCJCJC("%62496C"),CJCJCJC("!2C6?E")):select case CCCCCJ(1):case 1,2 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????")):case 3,16 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????")):case 4 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("??????@"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????")):case 5 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????")):case 6 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("??????@"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????")):case 7 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????")):case 8 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("??????@"),CJCJCJC("????"),CJCJCJC("????????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????")):case 9 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????")):case 10 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????")):case 11 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????")):case 12 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????")):case 13 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????")):case 14 : CJJJJJC=Array(CJCJCJC("??????"),CJCJCJC("??@??"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????")):case 15 : CJJJJJC=Array(CJCJCJC("????"),CJCJCJC("????????"),CJCJCJC("????"),CJCJCJC("????????"),CJCJCJC("????"),CJCJCJC("????"),CJCJCJC("??????"),CJCJCJC("????")):case else : CJJJJJC=CJJJJJJ
end select:for CCJCJC=0 to Ubound(CCCCCC):CCCCCC(CCJCJC,0)=CJJJJJJ(CCJCJC):CCCCCC(CCJCJC,1)=CJJJJJC(CCJCJC):next:for CCJCJC=0 to Ubound(CCCCCC):if CCCCCC(CCJCJC,0)=CJCCCCC then
CJJCCCC=CCCCCC(CCJCJC,1):exit for
end if:next:End Function:::if not CCCCCJ(30) then Call RedirectMessage(CJCJCJC("????????M????????,??????????????????????,"))
Const CJJCJJJ="GroupGuidance_Member":dim CJJJJCJ,CJJJJCC,CJJJCJJ:CJJJJCJ=request.querystring("act"):CJJJJCC=request(CJCJCJC(":5")):CJJJCJJ=request.querystring(CJCJCJC("4@FCD6:5")):if CJJJJCJ=CJCJCJC("42?46=") then
CCCCJ=CJCJCJC("FA52E6 ,") & CJJCJJJ & CJCJCJC(" ,D6E") & CJCJCJC(" ,7@4FDl_") & CJCJCJC("[7@4FD0C62D@?l?F==") & CJCJCJC("[7@4FD0@3D6CG6l?F==") & CJCJCJC(" ,H96C6 ,4@FCD6:5l") & CJJJCJJ & CJCJCJC(" ,2?5 ,:5l") & CJJJJCC:CCJCJ.execute CCCCJ:CJJJJCJ=""
end if:if Request.ServerVariables(CJCJCJC("#t""&t$%0|t%w~s"))=CJCJCJC("!~$%") then
if CJJJJCJ=CJCJCJC("255") then
CCCCJ=CJCJCJC("FA52E6 ,") & CJJCJJJ & CJCJCJC(" ,D6E") & CJCJCJC(" ,7@4FDl`") & CJCJCJC("[7@4FD052E6E:>6l86E52E6WX") & CJCJCJC("[7@4FD0C62D@?lV") & CJJCJJC(request.form(CJCJCJC("7@4FD0C62D@?"))) & CJCJCJC("V") & CJCJCJC("[7@4FD0@3D6CG6lV") & CJJCJJC(request.form(CJCJCJC("7@4FD0@3D6CG6"))) & CJCJCJC("V") & CJCJCJC(" ,H96C6 ,4@FCD6:5l") & CJJJCJJ & CJCJCJC(" ,2?5 ,:5l") & CJJJJCC
CCJCJ.execute CCCCJ:CJJJJCJ=""
elseif CJJJJCJ=CJCJCJC(">@5") then
CCCCJ=CJCJCJC("FA52E6 ,") & CJJCJJJ & CJCJCJC(" ,D6E") & CJCJCJC(" ,7@4FD0C62D@?lV") & CJJCJJC(request.form(CJCJCJC("7@4FD0C62D@?"))) & CJCJCJC("V") & CJCJCJC("[7@4FD0@3D6CG6lV") & CJJCJJC(request.form(CJCJCJC("7@4FD0@3D6CG6"))) & CJCJCJC("V") & CJCJCJC(" ,H96C6 ,4@FCD6:5l") & CJJJCJJ & CJCJCJC(" ,2?5 ,:5l") & CJJJJCC
CCJCJ.execute CCCCJ:CJJJJCJ=""
end if
end if:Response.Write(vbCrLf):Response.Write(CJCJCJC("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CJCJCJC("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CJCJCJC("k9625m") & vbCrLf):Response.Write(CJCJCJC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CJCJCJC("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQxtl6586Qm") & vbCrLf):Response.Write(CJCJCJC("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CJCJCJC("kE:E=6m????????k^E:E=6m") & vbCrLf):Response.Write(CJCJCJC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ]]^DEJ=6]4DDQm") & vbCrLf):Response.Write(CJCJCJC("kDEJ=6m") & vbCrLf):Response.Write(CJCJCJC("3@5J ,L ,>2C8:?i ,_j ,N") & vbCrLf):Response.Write(CJCJCJC("R3E?\DF3>:E ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CJCJCJC("k^DEJ=6m") & vbCrLf):Response.Write(CJCJCJC("k^9625m") & vbCrLf):Response.Write(CJCJCJC("k3@5Jm") & vbCrLf):Response.Write(CJCJCJC("k7@C> ,>6E9@5lQA@DEQm") & vbCrLf):Response.Write(CJCJCJC(" ,kE23=6 ,4=2DDlQE30=:DEQm") & vbCrLf):Response.Write(CJCJCJC(" ,kECm") & vbCrLf):Response.Write(CJCJCJC(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCJCJC(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJCJCJC(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCJCJC(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJCJCJC(" ,kE9m????????k^E9m") & vbCrLf):Response.Write(CJCJCJC(" ,kE9m????k^E9m") & vbCrLf):Response.Write(CJCJCJC(" ,k^ECm") & vbCrLf):Response.Write(CJCJCJC(" ,")):If CJJJJCJ=CJCJCJC("255") Then
Response.Write(vbCrLf):Response.Write(CJCJCJC(" ,kECm") & vbCrLf):Response.Write(CJCJCJC(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5mkD6=64E ,?2>6lQ:5Q ,C6BF:C65m") & vbCrLf):Response.Write(CJCJCJC(" ,")):set CCCJJ=CCJCJ.execute(CJCJCJC("D6=64E ,:5[C62=?2>6[?F>36C ,7C@> ,G0") & CJJCJJJ & CJCJCJC(" ,H96C6 ,4@FCD6:5l") & CJJJCJJ & CJCJCJC(" ,2?5 ,7@4FDl_")):while not CCCJJ.eof:response.write CJCJCJC("k@AE:@? ,G2=F6lV") & CCCJJ(0) & CJCJCJC("Vm") & CCCJJ(1) & CJCJCJC(" ,,") & CCCJJ(2) & CJCJCJC(".k^@AE:@?m")
CCCJJ.movenext:wend:Response.Write(vbCrLf):Response.Write(CJCJCJC(" ,k^D6=64Emk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5m")):Response.Write  Date:Response.Write(CJCJCJC("k^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQ7@4FD0C62D@?Q ,D:K6lQc_Q ,C6BF:C65mk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQ7@4FD0@3D6CG6Q ,D:K6lQc_Qmk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQ;2G2D4C:AEiSWVR3E?\DF3>:EVX]4=:4<WXjQm????k^2m ,k2 ,9C67lQn4@FCD6:5l")):Response.Write  CJJJCJJ:Response.Write(CJCJCJC("Qm????k^2mk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,k^ECm") & vbCrLf):Response.Write(CJCJCJC(" ,"))
ElseIf CJJJJCJ=CJCJCJC(">@5") Then
set CCCJJ=CCJCJ.execute(CJCJCJC("D6=64E ,E@A ,` ,:5[C62=?2>6[52E6E:>6[7@4FD0C62D@?[7@4FD0@3D6CG6 ,7C@> ,G0") & CJJCJJJ & CJCJCJC(" ,H96C6 ,4@FCD6:5l") & CJJJCJJ & CJCJCJC(" ,2?5 ,7@4FDl`")):Response.Write(vbCrLf):Response.Write(CJCJCJC(" ,kECm") & vbCrLf):Response.Write(CJCJCJC(" ,kE5mk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CCCJJ(1):Response.Write(CJCJCJC("k^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CJCJJCJ(CCCJJ(2),0):Response.Write(CJCJCJC("k^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQ7@4FD0C62D@?Q ,G2=F6lQ")):Response.Write  CCCJJ(3):Response.Write(CJCJCJC("Q ,D:K6lQc_Qmk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5mk:?AFE ,EJA6lQE6IEQ ,?2>6lQ7@4FD0@3D6CG6Q ,G2=F6lQ")):Response.Write  CCCJJ(4):Response.Write(CJCJCJC("Q ,D:K6lQc_Qmk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQ;2G2D4C:AEiSWVR3E?\DF3>:EVX]4=:4<WXjQm????k^2m ,k2 ,9C67lQn4@FCD6:5l")):Response.Write  CJJJCJJ:Response.Write(CJCJCJC("Qm????k^2mk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,k^ECm") & vbCrLf):Response.Write(CJCJCJC(" ,"))
Else
dim CCJCJC:CCJCJC=1:set CCCJJ=CCJCJ.execute(CJCJCJC("D6=64E ,:5[C62=?2>6[52E6E:>6[7@4FD0C62D@?[7@4FD0@3D6CG6 ,7C@> ,G0") & CJJCJJJ & CJCJCJC(" ,H96C6 ,4@FCD6:5l") & CJJJCJJ & CJCJCJC(" ,2?5 ,7@4FDl` ,@C56C ,3J ,52E6E:>6 ,56D4")):while not CCCJJ.eof:Response.Write(vbCrLf):Response.Write(CJCJCJC(" ,kECm") & vbCrLf):Response.Write(CJCJCJC(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CCJCJC:Response.Write(CJCJCJC("k^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CCCJJ(1):Response.Write(CJCJCJC("k^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5 ,2=:8?lQ46?E6CQm")):Response.Write  CJCJJCJ(CCCJJ(2),0):Response.Write(CJCJCJC("k^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5m")):Response.Write  CCCJJ(3):Response.Write(CJCJCJC("k^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5m")):Response.Write  CCCJJ(4):Response.Write(CJCJCJC("k^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,kE5 ,2=:8?lQC:89EQmk2 ,9C67lQn24El>@5U:5l")):Response.Write  CCCJJ(0):Response.Write(CJCJCJC("U4@FCD6:5l")):Response.Write  CJJJCJJ:Response.Write(CJCJCJC("Qm????k^2m ,???? ,???????? ,k2 ,9C67lQn24El42?46=U:5l")):Response.Write  CCCJJ(0):Response.Write(CJCJCJC("U4@FCD6:5l")):Response.Write  CJJJCJJ:Response.Write(CJCJCJC("Qm????????k^2mk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,k^ECm") & vbCrLf):Response.Write(CJCJCJC(" ,")):CCCJJ.movenext:CCJCJC=CCJCJC+1:wend:Response.Write(vbCrLf):Response.Write(CJCJCJC(" ,kECm") & vbCrLf):Response.Write(CJCJCJC(" ,kE5 ,4@=DA2?lQeQ ,2=:8?lQC:89EQmk2 ,9C67lQn24El255U4@FCD6:5l")):Response.Write  CJJJCJJ:Response.Write(CJCJCJC("Qm????????k^2mk^E5m") & vbCrLf):Response.Write(CJCJCJC(" ,k^ECm") & vbCrLf):Response.Write(CJCJCJC(" ,"))
End If:Response.Write(vbCrLf):Response.Write(CJCJCJC(" ,k^E23=6m") & vbCrLf):Response.Write(CJCJCJC(" ,k:?AFE ,EJA6lQDF3>:EQ ,:5lQ3E?\DF3>:EQm") & vbCrLf):Response.Write(CJCJCJC("k^7@C>m") & vbCrLf):Response.Write(CJCJCJC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJCJC("kD4C:AE ,DC4lQ^$4C:AED^:7C2>6\C6D:K6C^:7C2>6#6D:K6C]4@?E6?E(:?5@H]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CJCJCJC("kD4C:AEm") & vbCrLf):Response.Write(CJCJCJC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CJCJCJC("NXj") & vbCrLf):Response.Write(CJCJCJC("k^D4C:AEm") & vbCrLf):Response.Write(CJCJCJC("k^3@5Jm") & vbCrLf):Response.Write(CJCJCJC("k^9E>=m") & vbCrLf)::On Error Resume Next:set CJJCCJJ=nothing:set CJJCCJC=nothing:set CJJCCCJ=nothing:set CJJCCCC=nothing:CCCJC.Close:Set CCCJC=Nothing:CCCJJ.Close:Set CCCJJ=Nothing:CCJCJ.Close:Set CCJCJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf)
Function CJCJCJC(ByVal CJCJCJJ)
Dim CJJJCJC, CCJCJC, CJJJCCJ
CJCJCJJ = Replace(CJCJCJJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCJCJC = 1 To Len(CJCJCJJ)
If CCJCJC <> CJJJCCJ Then
CJJJCJC = AscW(Mid(CJCJCJJ, CCJCJC, 1))
If CJJJCJC >= 33 And CJJJCJC <= 79 Then
CJCJCJC = CJCJCJC & Chr(CJJJCJC + 47)
ElseIf CJJJCJC >= 80 And CJJJCJC <= 126 Then
CJCJCJC = CJCJCJC & Chr(CJJJCJC - 47)
Else
CJJJCCJ = CCJCJC + 1
If Mid(CJCJCJJ, CJJJCCJ, 1) = Chr(64) Then CJCJCJC = CJCJCJC & ChrW(CJJJCJC + 5) Else CJCJCJC = CJCJCJC & Mid(CJCJCJJ, CCJCJC, 1)
End If
End If
Next
End Function
%>

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de