Edit D:\xinhaisoft\crisis_new\m\test\testing.asp
??<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim CCJJJJ, CCJJJC,CCJJCJ, CCJJCC, CCJCJJ:Set CCJJJJ = server.CreateObject(CCCJJCC("ps~sq]r@??64E:@?")):CCJJJJ.open Application(CCCJJCC("r@??64E:@?$EC:?8")):Set CCJJJC=CCJJJJ::Dim CCJCJC,CCJCCJ,CCJCCC,CCCJJJ,CCCJJC,CCCJCJ,CCCJCC,CCCCJJ,CCCCJC:Dim CCCCCJ,CCCCCC,CJJJJJJ,CJJJJJC,CJJJJCJ,CJJJJCC:Dim CJJJCJJ,CJJJCJC,CJJJCCJ:Dim CJJJCCC:CJJJCCC=Trim(Request.Cookies(CCCJJCC("!$*|t|qt#"))):if CJJJCCC="" then Call ClearMemberCookie else Call CheckMemberCookie end if:if CCJCJC>0 then CCJCJJ=CCCJJCC("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") & CCJCCJ & CCCJJCC("V ,2?5 ,:5l") & CCJCJC set CCJJCJ=CCJJJJ.execute(CCJCJJ):If CCJJCJ.EOF Then Call ClearMemberCookie Else CCJCCC=CCJJCJ(2) & "":CCCJJJ=CCJJCJ(3):CCCJJC=CCJJCJ(5):CCCJCJ=CCJJCJ(6):CCCJCC=CCJJCJ(9):CCCCJJ=CCJJCJ(15):CCCCCJ=CCJJCJ(0):CJJJCJC=CCJJCJ(1):CJJJCJJ=CCJJCJ(11) & "":CCCCCC=CCJJCJ(10) & "":CCCCJC=CCJJCJ(12):CJJJJJJ=CCJJCJ(14):CJJJJJC=CCJJCJ(13):CJJJJCJ=CCJJCJ(7) & "":CJJJJCC=CCJJCJ(4):CJJJCCJ=CCJJCJ(8):if isnull(CCCCJJ) then CCCCJJ=0 if isnull(CCCJCC) or CCCJCC=0 then CCCJCC=CCCJJJ if isnull(CJJJJCC) then CJJJJCC=0 if isnull(CCCJJC) then CCCJJC=0 if instr(CCCJJCC("6`_254bhch32dh2336de6_df7a_7ggb6"),CCJCCJ)>0 then Call RedirectMessage(CCCJJCC("????????,????????????????????????????????,")) Call SetMemberCookie(CCJCJC,CCJCCJ) End IF end if:::Sub CheckLogined():if CCJCJC=0 then Call ClearMemberCookie:Call ConnClose:dim CJJCJJJ:CJJCJJJ=trim(request.QueryString(CCCJJCC("D49@@="))):if isnumeric(CJJCJJJ) then response.Redirect CCCJJCC("^>^G2?E^R^D49@@=^") & CJJCJJJ & CCCJJCC("^DEF56?E^=@8:?nC65:C64El") & url else Call RedirectMessage(CCCJJCC("??????????????,????????????,")) end if end if:End Sub:Sub ClearMemberCookie():Response.Cookies(CCCJJCC("!$*|t|qt#"))="":CCJCJC=0:CCCJCJ=0:CCJCCJ=Empty:CCCJJC=0:CCCCJJ=0:CCCJCC=0:CCCJJJ=0:CCCCCJ=False:CJJJCJC=False:CJJJCCJ=Empty:End Sub:Sub CheckMemberCookie():dim CJJCJJC,CJJCJCJ,CJJCJCC,CJJCCJJ,CJJCCJC:CJJCJJC=split(CJJJCCC,CCCJJCC("]")):if ubound(CJJCJJC)<>2 then Call ClearMemberCookie elseif not isnumeric(CJJCJJC(0)) or len(CJJCJJC(1))<>32 or len(CJJCJJC(2))<>32 then Call ClearMemberCookie else CJJCJCJ=CJJCJJC(1):for CJJCJCC=1 to len(CJJCJCJ):CJJCCJJ=mid(CJJCJCJ,CJJCJCC,1):if isnumeric(CJJCCJJ) then CJJCCJC=CJJCCJC & CJJCCJJ if len(CJJCCJC)=7 then exit for next:CJJCJCJ=CJJCJJC(2):if CJJCCJC<>mid(CJJCJCJ,6,7) then Call ClearMemberCookie else CJJCCJJ=mid(CJJCJCJ,18,10)/2:if CJJCCJJ<DateDiff(CCCJJCC("D"), CCCJJCC("`hf_\`\` ,gi__i__"), Now)-28800 then Call ClearMemberCookie else CCJCJC=Clng(CJJCJJC(0)):CCJCCJ=CJJCJJC(1) end if end if end if:End Sub:Sub SetMemberCookie(CCCJCJJ,CCCJCJC):dim CJJCJCC,CJJCCJJ,CJJCCJC:for CJJCJCC=1 to len(CCCJCJC):CJJCCJJ=mid(CCCJCJC,CJJCJCC,1):if isnumeric(CJJCCJJ) then CJJCCJC=CJJCCJC & CJJCCJJ if len(CJJCCJC)=7 then exit for next:CJJCCJC=CCCJCJJ & CCCJJCC("]") & CCCJCJC & CCCJJCC("]") & Fix(10000*(Rnd+1)) & CJJCCJC & Fix(10000*(Rnd+1)) & DateDiff(CCCJJCC("D"), CCCJJCC("`hf_\`\` ,gi__i__"), Now)*2 & Fix(10000*(Rnd+1)):Response.Cookies(CCCJJCC("!$*|t|qt#"))=CJJCCJC:End Sub:::Function IIf(CCCJCCJ, CCCJCCC, CCCCJJJ):if isnull(CCCJCCJ) or isempty(CCCJCCJ) then IIf = CCCCJJJ elseif CCCJCCJ Then IIf = CCCJCCC Else IIf = CCCCJJJ end if:End Function:Const CCJJCCJ="^1(3[0-9]|4[579]|5[012356789]|6[267]|7[01235678]|8[0-9]|9[1589])\d{8}$"::Function CCJCJJJ():dim CJJCCCJ:CJJCCCJ = Cstr(Request.ServerVariables("HTTP_X_FORWARDED_FOR")):If CJJCCCJ = "" Then CJJCCCJ = Cstr(Request.ServerVariables(CCCJJCC("#t|~%t0pss#"))) if instr(CJJCCCJ,CCCJJCC("i"))>0 then CJJCCCJ=left(CJJCCCJ,instr(CJJCCCJ,CCCJJCC("i"))-1) elseif instr(CJJCCCJ,CCCJJCC("["))>0 then CJJCCCJ=left(CJJCCCJ,instr(CJJCCCJ,CCCJJCC("["))-1) end if:CCJCJJJ=left(CJJCCCJ,15):End Function:::Sub SetHttpOnlyCookie(CCCCJJC,CCCCJCJ):dim CJJCJJC:CJJCJJC=CCCCJJC & CCCJJCC("l") & CCCCJCJ & CCCJJCC("j ,A2E9l^j ,wEEA~?=J"):Call Response.AddHeader(CCCJJCC("$6E\r@@<:6"),CJJCJJC):End Sub:::::::Function CCJCJJC(CCJJCJC):if isnull(CCJJCJC) or trim(CCJJCJC)="" or not isnumeric(CCJJCJC) then CCJCJJC=false else Dim CJJCCCC:Set CJJCCCC = New RegExp:CJJCCCC.Pattern = CCCJJCC("/-5ZS"):CJJCCCC.IgnoreCase = True:CCJCJJC = CJJCCCC.test(CCJJCJC):set CJJCCCC=nothing end if:End Function::::Sub WriteJS(CCCCJCC):Call ConnClose:response.Charset=CCCJJCC("FE7\g"):response.write CCCJJCC("k") & CCCJJCC("D4C:AEm") & CCCCJCC & CCCJJCC("k^D4C:AEm"):response.end:End Sub:Sub ConnClose():On Error Resume Next:set CCJCJCJ=nothing:set CCJCJCC=nothing:set CCJCCJJ=nothing:set CCJCCJC=nothing:CJCJJJJ.close : set CJCJJJJ=nothing:CCJJCC.Close : Set CCJJCC=Nothing:CCJJCJ.Close : Set CCJJCJ=Nothing:CCJCCCJ.Close : Set CCJCCCJ = Nothing:CCJJJJ.Close : Set CCJJJJ = Nothing:err.Clear:On Error Goto 0:End Sub:Sub RedirectMessage(CCCCCJJ):Response.Clear:Err.Clear:Call ConnClose:Call SetHttpOnlyCookie(CCCJJCC("!$*0|6DD286"),server.URLEncode(CCCCCJJ)):Response.Redirect CCCJJCC("^:?4^D9@H>6DD286]2DAI"):Response.End:End Sub:::Function CCJCCCC():Dim CJCJJJJ, CJCJJJC(), CJJCJCC, CJJCCJJ, CJCJJCJ,CJCJJCC:If Not IsArray(Application(CCCJJCC("!$*0%6DED"))) Then CCJCJJ=CCCJJCC("D6=64E ,:5[?2>6049[?2>606?[BF6DE4@F?E[E6DEE:A[E:>60>2I[:?EC@`[2?DH6C[>6>36CEJA6[2860>2I[24E[>@?6J[5@4[?F==[?2>607C[724E@C`[E:>60>:?[2860>:?[724E@Ca[:?EC@a[:D4FDE@>[?F==[A:4EFC6[2CE:4=6 ,7C@> ,=3 ,H96C6 ,2G2:=23=6l` ,@C56C ,3J ,D@CE"):set CJCJJJJ=server.createobject(CCCJJCC("25@53]C64@C5D6E")):CJCJJJJ.open CCJCJJ,CCJJJJ,1:CJCJJCJ = CJCJJJJ.RecordCount:CJCJJCC=CJCJJJJ.fields.count-1:ReDim CJCJJJC(CJCJJCJ, CJCJJCC):If CJCJJCJ > 0 Then For CJJCJCC = 1 To CJCJJCJ:For CJJCCJJ = 0 To CJCJJCC:if CJJCCJJ=4 or CJJCCJJ=6 or CJJCCJJ=19 then CJCJJJC(CJJCJCC, CJJCCJJ) = CCCJJJC(CJCJJJJ(CJJCCJJ)) else CJCJJJC(CJJCJCC, CJJCCJJ) = CJCJJJJ(CJJCCJJ):if CJCJJJJ(CJJCCJJ).type<>11 and isnull(CJCJJJC(CJJCJCC, CJJCCJJ)) then CJCJJJC(CJJCJCC, CJJCCJJ)="" end if:Next:CJCJJJJ.MoveNext:Next End If:CJCJJJJ.Close: Set CJCJJJJ = Nothing:Application(CCCJJCC("!$*0%6DED")) = CJCJJJC End If:CCJCCCC = Application(CCCJJCC("!$*0%6DED")):End Function:Function CCCJJJJ(CJCCJJC):Dim CJJCJCC, CJCJCJJ(), CJCJJJJ,CJCJCJC,CJCJCCJ,CJCJCCC,CJCCJJJ:CJCJCCJ = CCJCCCC:For CJJCJCC = 1 To UBound(CJCJCCJ):If CStr(CJCJCCJ(CJJCJCC, 0)) = CStr(CJCCJJC) Then CJCCJJJ=CJCJCCJ(CJJCJCC,2):CJCJCCC=CJCJCCJ(CJJCJCC,7):CJCJCJC=CJCJCCJ(CJJCJCC,3):Exit For End If:Next:if CJCJCCC="" then CCJCJJ=CCCJJCC("D6=64E ,BF6DE:@?[2?DH6C[EJA6 ,7C@> ,=3BF6DE:@? ,H96C6 ,=3l") & CJCCJJC & CCCJJCC(" ,@C56C ,3J ,D@CE") else CCJCJJ=CCCJJCC("$t{tr% ,BF6DE:@?[ ,WD6=64E ,E@A ,` ,2?DH6C ,7C@> ,=3 ,H96C6 ,:5l") & CJCCJJC & CCCJJCC("X ,p$ ,2?DH6C[EJA6 ,u#~| ,=3BF6DE:@? ,H96C6 ,=3l") & CJCCJJC & CCCJJCC(" ,~#st# ,q* ,D@CE") end if:set CJCJJJJ=CCJJJJ.execute(CCJCJJ):ReDim CJCJCJJ(CJCJCJC, 2):For CJJCJCC = 1 To CJCJCJC:CJCJCJJ(CJJCJCC, 0) = CJCJJJJ(0) & "":CJCJCJJ(CJJCJCC, 1) = CJCJJJJ(1) & "":CJCJCJJ(CJJCJCC, 2) = CJCJJJJ(2):CJCJJJJ.MoveNext:Next:CJCJJJJ.Close: Set CJCJJJJ = Nothing:CCCJJJJ = CJCJCJJ:End Function:::::::::::::::::::::::::::::Function CCCJJJC(CCCCCJC):if isnull(CCCCCJC) then CCCJJJC="" else On Error Resume Next:CCCJJJC=CCCCCJC:if err.number=-2147352567 then CCCJJJC="":err.Clear end if end if:End Function::::::Call CheckLogined:dim CJCCJJC,CJCCJCJ,CJCCJCC,CJCCCJJ,CJCCCJC,CJJCJJJ:CJCCJJC=Request.QueryString(CCCJJCC("=3:5")):CJCCJCJ=request.QueryString(CCCJJCC("32E49:5")):CJCCJCC=request.QueryString(CCCJJCC("E6DEEJA6")):CJCCCJJ=request.QueryString(CCCJJCC("286")):CJCCCJC=Request.ServerVariables(CCCJJCC("w%%!0#tut#t#")):CJJCJJJ=CCCJCC:if not CCJCJJC(CJCCJJC) or CJCCJJC="0" then Call RedirectMessage(CCCJJCC("????????,????????W=3:5X??????,")) if not CCJCJJC(CJCCJCC) then CJCCJCC=0 else CJCCJCC=1 dim CJCJCCJ,CJCJJJC(22),CJJCJCC,CJJCCJJ:CJCJCCJ = CCJCCCC:For CJJCJCC = 1 To UBound(CJCJCCJ):If CStr(CJCJCCJ(CJJCJCC, 0)) = CStr(CJCCJJC) Then for CJJCCJJ=0 to 22:CJCJJJC(CJJCCJJ)=CJCJCCJ(CJJCJCC,CJJCCJJ):next:Exit For End If:Next:if CJCJJJC(14)="" then CJCJJJC(14)=CJCJJJC(1) if CJCJJJC(1)="" then CCJCJJ=CCCJJCC("D6=64E ,E@A ,` ,:5[?2>6049[?2>606?[BF6DE4@F?E[E6DEE:A[E:>60>2I[:?EC@`[2?DH6C[>6>36CEJA6[2860>2I[24E[>@?6J[5@4[:?EC@b[?2>607C[724E@C`[E:>60>:?[2860>:?[724E@Ca[:?EC@a[:D4FDE@>[@AE0>@?6J[A:4EFC6[2CE:4=6 ,7C@> ,=3 ,H96C6 ,2G2:=23=6l` ,2?5 ,:5l") & CJCCJJC:set CCJJCJ=CCJJJJ.execute(CCJCJJ):if CCJJCJ.eof then Call RedirectMessage(CCCJJCC("????????,??????????????????????W") & CJCCJJC & CCCJJCC("X??,")) else for CJJCCJJ=0 to 21:CJCJJJC(CJJCCJJ)=CCJJCJ(CJJCCJJ):next:Application.Contents.Remove CCCJJCC("!$*0%6DED") end if end if:if CJCCCJJ<>"0" then if not CCJCJJC(CJCJJJC(17)) then CJCJJJC(17)=0 if not CCJCJJC(CJCJJJC(9)) then CJCJJJC(9)=100 If CCCCJC < CJCJJJC(17) Or CCCCJC > CJCJJJC(9) Then Call RedirectMessage(CCCJJCC("??W") & CCJCJC & CCCJJCC("X??????W") & CCCCJC & CCCJJCC("X????") & CJCJJJC(17) & CCCJJCC("??") & CJCJJJC(9) & CCCJJCC("??????,????????????????W") & CJCCJJC & CCCJJCC("X??,")) end if:dim CJCCCCJ:if CJCCCCJ=0 then CJCCCCJ=CJCJJJC(11) if CJCCCCJ="" or isnull(CJCCCCJ) then CJCCCCJ=0 elseif CJCCCCJ=0 and CJJCJJJ>0 then CJCCCCJ=0 elseif CJCCJJC="121" or CJCCJJC="164" or CJCCJJC="159" then CJCCCCJ=0 elseif instr(CJCCCJC,CCCJJCC("^>^D49@@=^DEF56?E^"))>0 or instr(CJCCCJC,CCCJJCC("^>^E6DE^"))>0 then CJCCCCJ=0 elseif CCJCJJC(CJCCJCJ) then dim CJCCCCC:set CCJJCJ=CCJJJJ.execute(CCCJJCC("D6=64E ,E@A ,` ,>@?6J05:D4@F?E ,7C@> ,E6DE032E49 ,H96C6 ,:5l") & CJCCJCJ):if not CCJJCJ.eof then CJCCCCC=CCJJCJ(0):if isnull(CJCCCCC) then CJCCCCJ=0 else CJCCCCJ=cint(CJCCCCJ*CJCCCCC/10) end if end if end if:dim CCJJJJJ CCJJJJJ=Request.Cookies(CCCJJCC("!$*"))(CCCJJCC("%6DE#6>2C<")) Response.Cookies(CCCJJCC("!$*"))(CCCJJCC("%6DE#6>2C<"))="" if CCJJJJJ="" then CCJJJJJ=CCCJJCC("}F==") else CCJJJJJ=CCCJJCC("V") & CCJJJJJ & CCCJJCC("V") dim CCJJJJC:set CCJJCJ=CCJJJJ.execute(CCCJJCC("D6=64E ,E@A ,` ,:5[G2=:5[52E6E:>6 ,7C@> ,E6DE ,H96C6 ,>6>36Cl") & CCJCJC & CCCJJCC(" ,2?5 ,=3l") & CJCCJJC & CCCJJCC(" ,@C56C ,3J ,:5 ,56D4")):if CCJJCJ.eof then CCJCJJ=CCCJJCC(":?D6CE ,:?E@ ,E6DEW>6>36C[=3[:A[EJA6[,>@?6J.[C6>2C<[52E6E:>6[?@C>2=X ,@FEAFE ,:?D6CE65]:5 ,G2=F6DW") & CCJCJC & CCCJJCC("[") & CJCCJJC & CCCJJCC("[V") & CCJCJJJ & CCCJJCC("V") & CCCJJCC("[") & CJCCJCC & CCCJJCC("[") & CJCCCCJ & CCCJJCC("[") & CCJJJJJ & CCCJJCC("[86E52E6WX") & CCCJJCC("[`") & CCCJJCC("X") set CCJJCJ=CCJJJJ.execute(CCJCJJ):CCJJJJC=CCJJCJ(0) elseif not CCJJCJ(1) then CCJJJJC=CCJJCJ(0):CCJCJJ=CCCJJCC("FA52E6 ,E6DE ,D6E") & CCCJJCC(" ,:AlV") & CCJCJJJ & CCCJJCC("V") & CCCJJCC("[52E6E:>6l86E52E6WX") & CCCJJCC("[EJA6l") & CJCCJCC & CCCJJCC("[6IA=2:?l?F==") & CCCJJCC("[25G:46l?F==") & CCCJJCC("[,>@?6J.l") & CJCCCCJ & CCCJJCC("[A2J>6?El_") & CCCJJCC("[C6>2C<l") & CCJJJJJ & CCCJJCC("[?@C>2=l`") & CCCJJCC(" ,H96C6 ,:5l") & CCJJJJC CCJJJJ.execute CCJCJJ elseif DateDiff(CCCJJCC("9"),CCJJCJ(2),Now)>24 then CCJCJJ=CCCJJCC(":?D6CE ,:?E@ ,E6DEW>6>36C[=3[:A[EJA6[,>@?6J.[C6>2C<[52E6E:>6[?@C>2=X ,@FEAFE ,:?D6CE65]:5 ,G2=F6DW") & CCJCJC & CCCJJCC("[") & CJCCJJC & CCCJJCC("[V") & CCJCJJJ & CCCJJCC("V") & CCCJJCC("[") & CJCCJCC & CCCJJCC("[") & CJCCCCJ & CCCJJCC("[") & CCJJJJJ & CCCJJCC("[86E52E6WX") & CCCJJCC("[`") & CCCJJCC("X") set CCJJCJ=CCJJJJ.execute(CCJCJJ):CCJJJJC=CCJJCJ(0) elseif CJCCJJC="214" and month(CCJJCJ(2))<>month(Date) then CCJCJJ=CCCJJCC(":?D6CE ,:?E@ ,E6DEW>6>36C[=3[:A[EJA6[,>@?6J.[C6>2C<[52E6E:>6[?@C>2=X ,@FEAFE ,:?D6CE65]:5 ,G2=F6DW") & CCJCJC & CCCJJCC("[") & CJCCJJC & CCCJJCC("[V") & CCJCJJJ & CCCJJCC("V") & CCCJJCC("[") & CJCCJCC & CCCJJCC("[") & CJCCCCJ & CCCJJCC("[") & CCJJJJJ & CCCJJCC("[86E52E6WX") & CCCJJCC("[`") & CCCJJCC("X") set CCJJCJ=CCJJJJ.execute(CCJCJJ):CCJJJJC=CCJJCJ(0) else Call RedirectMessage(CCCJJCC("????????") & CCJJCJ(2) & CCCJJCC("??????????,,k2 ,9C67lV]]^>^D49@@=^DEF56?E^E6DE65=:DE]2DAVm????k^2m.")) end if:Response.Cookies(CCCJJCC("%6DExs"))=CCJJJJC:Response.Cookies(CCCJJCC("!$*"))(CCCJJCC("%6DEp4E"))=CCCJJCC("|6>36C%6DE"):Response.Cookies(CCCJJCC("%6DEs6G:46"))=CCCJJCC("|@3:=6"):if CJCCJJC="9" or CJCCJJC="44" or CJCCJJC="50" or CJCCJJC="52" or CJCCJJC="198" then Call WriteJS(CCCJJCC("H:?5@H]=@42E:@?]C6A=246WV]]^]]^=3^9E>=^") & CJCCJJC & CCCJJCC("]9E>VXj")) Response.Write(vbCrLf):Response.Write(CCCJJCC("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CCCJJCC("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CCCJJCC("k9625m") & vbCrLf):Response.Write(CCCJJCC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCCJJCC("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`Qm") & vbCrLf):Response.Write(CCCJJCC("kE:E=6m")):Response.Write CJCJJJC(14):Response.Write(CCCJJCC("k^E:E=6m") & vbCrLf):Response.Write(CCCJJCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ^$4C:AED^2>2K6F:^4DD^2>2K6F:]>:?]4DDQm") & vbCrLf):Response.Write(CCCJJCC("kDEJ=6m") & vbCrLf):Response.Write(CCCJJCC("3@5J ,L ,324<8C@F?5\4@=@Ci ,Ru`u`u`j ,N") & vbCrLf):Response.Write(CCCJJCC("9`L>2C8:?\E@Ai`dAIjN") & vbCrLf):Response.Write(CCCJJCC("RAC@8C6DD0HC2A[ ,RBF6DE:@? ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CCCJJCC("]2>\A2?6=\DF446DD ,L ,5:DA=2Ji ,?@?6j ,N") & vbCrLf):Response.Write(CCCJJCC("]2>\A2?6=\DF446DD ,=236= ,L ,4FCD@Ci ,A@:?E6Cj ,N") & vbCrLf):Response.Write(CCCJJCC("]2>\A2?6=\DF446DD ,:?AFE,EJA6lQE6IEQ. ,LH:5E9i`__TjN") & vbCrLf):Response.Write(CCCJJCC("]2>\A2?6=\DF446DD ,E6IE2C62 ,L ,H:5E9i ,`__Tj ,96:89Ei`__AIj ,N") & vbCrLf):Response.Write(CCCJJCC("DA2?]C65 ,L ,4@=@Ci ,C65j ,7@?E\H6:89Ei ,3@=5j ,N") & vbCrLf):Response.Write(CCCJJCC("R:?EC@ ,]>@?6J ,L ,7@?E\D:K6i ,`]aC6>j ,N") & vbCrLf):Response.Write(CCCJJCC("^Y????Y^") & vbCrLf):Response.Write(CCCJJCC(":>8]C2G6? ,L ,>2C8:?i ,_ ,2FE@j ,5:DA=2Ji ,3=@4<j ,N") & vbCrLf):Response.Write(CCCJJCC("k^DEJ=6m") & vbCrLf):Response.Write(CCCJJCC("k^9625m") & vbCrLf):Response.Write(CCCJJCC("k3@5Jm") & vbCrLf):Response.Write(CCCJJCC("k5:G ,4=2DDlQ2>\4@?E2:?6CQm") & vbCrLf):Response.Write(CCCJJCC(" ,kP\\??????,??,??????\\m") & vbCrLf):Response.Write(CCCJJCC(" ,k9` ,4=2DDlQ2>\E6IE\46?E6CQm")):Response.Write CJCJJJC(14):Response.Write(CCCJJCC("k^9`m") & vbCrLf):Response.Write(CCCJJCC(" ,kP\\??????,??????????????\\m") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,:5lQ:?EC@Qm") & vbCrLf):Response.Write(CCCJJCC(" ,k9C ,52E2\2>\H:586ElQ5:G:56CQ ,4=2DDlQ2>\5:G:56C ,2>\5:G:56C\52D965Qm") & vbCrLf):Response.Write(CCCJJCC(" ,")):If CJCJJJC(22)<>"" Then Response.Write(vbCrLf):Response.Write(CCCJJCC(" ,k:>8 ,DC4lQ")):Response.Write CJCJJJC(22):Response.Write(CCCJJCC("Q ,4=2DDlQ2>\:>8\C6DA@?D:G6 ,2>\E9F>3?2:= ,2>\46?E6CQ ,2=ElQ????????Qm") & vbCrLf):Response.Write(CCCJJCC(" ,")) End If:Response.Write(vbCrLf):Response.Write(CCCJJCC(" ,kP\\??????\\m") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ2>\A2?6= ,2>\A2?6=\5672F=EQm") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ2>\A2?6=\35Qm") & vbCrLf):Response.Write(CCCJJCC(" ,kAm")):Response.Write CJCJJJC(4):Response.Write(CCCJJCC("k^Am") & vbCrLf):Response.Write(CCCJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJJCC("k^5:Gm") & vbCrLf):Response.Write(CCCJJCC("k5:G ,4=2DDlQ2>\E6IE\46?E6CQm") & vbCrLf):Response.Write(CCCJJCC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\3E?\DF446DDQ ,:5lQ3E?0DE2CEQmkDA2? ,4=2DDlQ2>\:4@?\A6?4:=Qmk^DA2?m ,????????k^3FEE@?m") & vbCrLf):Response.Write(CCCJJCC("k^5:Gm") & vbCrLf):Response.Write(CCCJJCC("kP\\??????\\m") & vbCrLf):Response.Write(CCCJJCC("k5:G ,:5lQAC@8C6DD0HC2AQ ,4=2DDlQ2>\AC@8C6DD ,2>\AC@8C6DD\DEC:A65Qm") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,:5lQAC@8C6DDQ ,4=2DDlQ2>\AC@8C6DD\32C ,2>\AC@8C6DD\32C\H2C?:?8Q ,DEJ=6lQH:5E9i`Tj ,>:?\H:5E9ic6>jQmkDA2? ,:5lQ4FCC6?E0?F>Qm`k^DA2?m^")):Response.Write CJCJJJC(3):Response.Write(CCCJJCC("k^5:Gm") & vbCrLf):Response.Write(CCCJJCC("k^5:Gm") & vbCrLf):Response.Write(CCCJJCC("kP\\????\\m") & vbCrLf):Response.Write(CCCJJCC("k5:G ,:5lQBF6DE:@?Q ,4=2DDlQ2>\4@?E2:?6CQm") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ2>\8Qm") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ2>\F\D>\`_ ,2>\F\D>\@77D6E\` ,2>\F\>5\g ,2>\F\>5\@77D6E\aQm") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ=:DEQm") & vbCrLf):Response.Write(CCCJJCC(" ,")):dim CCJJJCJ,CCJJJCC:CCJJJCJ = CCCJJJJ(CJCCJJC):For CJJCJCC = 1 To CJCJJJC(3):Response.Write(vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ2>\A2?6= ,2>\A2?6=\DF446DDQ ,:5lQB0")):Response.Write CJJCJCC:Response.Write(CCCJJCC("Qm") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ2>\A2?6=\95Qm") & vbCrLf):Response.Write(CCCJJCC(" ,k9b ,4=2DDlQ2>\A2?6=\E:E=6Qm") & vbCrLf):Response.Write(CCCJJCC(" ,")):if CJCCJJC=44 then response.Write CCCJJCC("k:>8 ,DC4lV^=3^:>286D^C2G6?^") & CCJJJCJ(CJJCJCC,0) & CCCJJCC("V ,4=2DDlVC2G6? ,2>\:>8\C6DA@?D:G6 ,2>\:>8\E9F>3?2:= ,2>\C25:FDVm") else response.Write CJJCJCC & CCCJJCC("??,") & replace(CCJJJCJ(CJJCJCC,0),CCCJJCC("M"),CCCJJCC("k3Cmk3Cm")) end if:Response.Write(vbCrLf):Response.Write(CCCJJCC(" ,k^9bm") & vbCrLf):Response.Write(CCCJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJJCC(" ,")):if CCJJJCJ(CJJCJCC,2)=0 then CCJJJCC=split(CCJJJCJ(CJJCJCC,1),CCCJJCC("M")):Response.Write CCCJJCC("kF= ,4=2DDlV2>\=:DE ,2>\=:DE\DE2E:4Vm") for CJJCCJJ=0 to ubound(CCJJJCC):response.Write CCCJJCC("k=:mk=236= ,4=2DDlV2>\C25:@Vmk:?AFE ,EJA6lVC25:@V ,?2>6lV20") & CJJCJCC & CCCJJCC("V ,G2=F6lV") & CJJCCJJ+1 & CCCJJCC("V ,52E2\2>\F4964<m") & CCJJJCC(CJJCCJJ) & CCCJJCC("k^=236=mk^=:m") next:Response.Write CCCJJCC("k^F=m") elseif CCJJJCJ(CJJCJCC,2)=1 then CCJJJCC=split(CCJJJCJ(CJJCJCC,1),CCCJJCC("M")):Response.Write CCCJJCC("kF= ,4=2DDlV2>\=:DE ,2>\=:DE\DE2E:4Vm") for CJJCCJJ=0 to ubound(CCJJJCC):response.Write CCCJJCC("k=:mk=236= ,4=2DDlV2>\4964<3@IVmk:?AFE ,EJA6lV4964<3@IV ,?2>6lV20") & CJJCJCC & CCCJJCC("V ,G2=F6lV") & CJJCCJJ+1 & CCCJJCC("V ,52E2\2>\F4964<m") & CCJJJCC(CJJCCJJ) & CCCJJCC("k^=236=mk^=:m") next:Response.Write CCCJJCC("k^F=m") elseif CCJJJCJ(CJJCJCC,2)=2 then response.Write CCCJJCC("k5:G ,4=2DDlV2>\A2?6=\35Vmk:?AFE ,EJA6lVE6IEV ,4=2DDlV2>\7@C>\7:6=5V ,?2>6lV20") & CJJCJCC & CCCJJCC("Vmk^5:Gm") elseif CCJJJCJ(CJJCJCC,2)=3 then response.Write CCCJJCC("k5:G ,4=2DDlV2>\A2?6=\35VmkE6IE2C62 ,4=2DDlV2>\7@C>\7:6=5V ,?2>6lV20") & CJJCJCC & CCCJJCC("Vmk^E6IE2C62mk^5:Gm") elseif CCJJJCJ(CJJCJCC,2)=4 then response.Write CCCJJCC("k5:G ,4=2DDlV2>\A2?6=\35VmkD6=64E ,?2>6lV20") & CJJCJCC & CCCJJCC("V ,52E2\2>\D6=64E65m") CCJJJCC=split(CCJJJCJ(CJJCJCC,1),CCCJJCC("M")):for CJJCCJJ=0 to ubound(CCJJJCC):response.Write CCCJJCC("k@AE:@? ,G2=F6lV") & CJJCCJJ+1 & CCCJJCC("Vm") & CCJJJCC(CJJCCJJ) & CCCJJCC("k^@AE:@?m") next:response.Write CCCJJCC("k^D6=64Emk^5:Gm") elseif CCJJJCJ(CJJCJCC,2)=6 then response.Write CCCJJCC("k5:G ,4=2DDlV2>\A2?6=\35Vmk:?AFE ,EJA6lVE:>6V ,?2>6lV20") & CJJCJCC & CCCJJCC("V ,G2=F6lV__i__Vmk^5:Gm") end if:Response.Write(vbCrLf):Response.Write(CCCJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJJCC(" ,")):next:Response.Write(vbCrLf):Response.Write(CCCJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJJCC(" ,kP\\ ,?????????????????? ,\\m") & vbCrLf):Response.Write(CCCJJCC(" ,k7@C> ,:5lQ7@C>Q ,>6E9@5lQA@DEQ ,24E:@?lQ]]^]]^=3^")):Response.Write IIf(CJCJJJC(20),CCCJJCC("=304FDE@>"),CJCJJJC(2)):Response.Write(CCCJJCC("]2DAQ ,4=2DDlQ2>\E6IE\46?E6CQm") & vbCrLf):Response.Write(CCCJJCC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\3E?\AC:>2CJ ,2>\3E?\D>Q ,:5lQ3E?0AC6GQmkDA2? ,4=2DDlQ2>\:4@?\496GC@?\=67EQmk^DA2?m ,????,??k^3FEE@?m") & vbCrLf):Response.Write(CCCJJCC(" ,k3FEE@? ,EJA6lQ3FEE@?Q ,4=2DDlQ2>\3E? ,2>\3E?\AC:>2CJ ,2>\3E?\D>Q ,:5lQ3E?0?6IEQm????,?? ,kDA2? ,4=2DDlQ2>\:4@?\496GC@?\C:89EQmk^DA2?mk^3FEE@?m") & vbCrLf):Response.Write(CCCJJCC(" ,k3FEE@? ,EJA6lQDF3>:EQ ,4=2DDlQ2>\3E? ,2>\3E?\AC:>2CJ ,2>\3E?\D>Q ,:5lQ3E?0DF3>:EQ ,5:D23=65 ,52E2\=@25:?8\E6IElQ??????]]]QmkDA2? ,4=2DDlQ2>\:4@?\4964<Qmk^DA2?m ,????k^3FEE@?m") & vbCrLf):Response.Write(CCCJJCC(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQ2?DH6CQ ,:5lQ2?DH6CQm") & vbCrLf):Response.Write(CCCJJCC(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQ9@H=@?8Q ,:5lQ9@H=@?8Qm") & vbCrLf):Response.Write(CCCJJCC(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQ=3:5Q ,:5lQ=3:5Q ,G2=F6lQ")):Response.Write CJCCJJC:Response.Write(CCCJJCC("Qm") & vbCrLf):Response.Write(CCCJJCC(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQ24EQ ,:5lQ24EQ ,G2=F6lQ|6>36C%6DEQm") & vbCrLf):Response.Write(CCCJJCC(" ,k^7@C>m") & vbCrLf):Response.Write(CCCJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJJCC("k^5:Gm") & vbCrLf):Response.Write(CCCJJCC("k3Cm") & vbCrLf):Response.Write(CCCJJCC("kP\\ ,?????? ,\\m") & vbCrLf):Response.Write(CCCJJCC("k5:G ,4=2DDlQ2>\>@52= ,2>\>@52=\2=6CEQ ,E23:?56IlQ\`Q ,:5lQ>J\2=6CEQm") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ2>\>@52=\5:2=@8Qm") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ2>\>@52=\35Qmk^5:Gm") & vbCrLf):Response.Write(CCCJJCC(" ,k5:G ,4=2DDlQ2>\>@52=\7@@E6CQmkDA2? ,4=2DDlQ2>\>@52=\3E?Qm????k^DA2?mk^5:Gm") & vbCrLf):Response.Write(CCCJJCC(" ,k^5:Gm") & vbCrLf):Response.Write(CCCJJCC("k^5:Gm") & vbCrLf):Response.Write(CCCJJCC("k:?AFE ,EJA6lQ9:556?Q ,:5lQ>2I:5Q ,G2=F6lQ")):Response.Write CJCJJJC(3):Response.Write(CCCJJCC("Qm") & vbCrLf):Response.Write(CCCJJCC("kD4C:AE ,DC4lQ^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCJJCC("kD4C:AE ,DC4lQ^$4C:AED^2>2K6F:^;D^2>2K6F:]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCJJCC("kD4C:AEm") & vbCrLf):Response.Write(CCCJJCC("G2C ,>2I:5[DE2CEE:>6[=3:5[E:>6C") & vbCrLf):Response.Write(CCCJJCC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????xs") & vbCrLf):Response.Write(CCCJJCC(" ,=3:5lA2CD6x?EWSWVR=3:5VX]G2=WXX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,??????????") & vbCrLf):Response.Write(CCCJJCC(" ,>2I:5lA2CD6x?EWSWVR>2I:5VX]G2=WXX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????????????") & vbCrLf):Response.Write(CCCJJCC(" ,DE2CEE:>6l?6H ,s2E6WX]86E%:>6WX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????????????") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR3E?0DE2CEVX]@?WV4=:4<V[7F?4E:@?WXL") & vbCrLf):Response.Write(CCCJJCC(" ,SWE9:DX]9:56WX") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR:?EC@VX]D=:56&AWVD=@HV[7F?4E:@?WXL") & vbCrLf):Response.Write(CCCJJCC(" ,SWVRAC@8C6DD0HC2AVX]D9@HWX") & vbCrLf):Response.Write(CCCJJCC(" ,SWVRBF6DE:@?VX]D9@HWX") & vbCrLf):Response.Write(CCCJJCC(" ,D9@HBF6DE:@?W`X") & vbCrLf):Response.Write(CCCJJCC(" ,NX") & vbCrLf):Response.Write(CCCJJCC(" ,NX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????,??") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR3E?0AC6GVX]@?WV4=:4<V[7F?4E:@?WXL") & vbCrLf):Response.Write(CCCJJCC(" ,G2C ,:5lSWVR4FCC6?E0?F>VX]E6IEWXY`") & vbCrLf):Response.Write(CCCJJCC(" ,D9@HBF6DE:@?W:5\`X") & vbCrLf):Response.Write(CCCJJCC(" ,NX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????,??") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR3E?0?6IEVX]@?WV4=:4<V[7F?4E:@?WXL") & vbCrLf):Response.Write(CCCJJCC(" ,G2C ,:5lSWVR4FCC6?E0?F>VX]E6IEWXY`") & vbCrLf):Response.Write(CCCJJCC(" ,D9@HBF6DE:@?W:5Z`X") & vbCrLf):Response.Write(CCCJJCC(" ,NX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,??????????????????????,????,????????????") & vbCrLf):Response.Write(CCCJJCC(" ,SWVRBF6DE:@?VX]@?WV4=:4<V[V:?AFEiC25:@V[7F?4E:@?WXL") & vbCrLf):Response.Write(CCCJJCC(" ,G2C ,:5lSWE9:DX]2EECWV?2>6VX]DF3DECWaXY`") & vbCrLf):Response.Write(CCCJJCC(" ,4=62C%:>6@FEWE:>6CX") & vbCrLf):Response.Write(CCCJJCC(" ,E:>6ClD6E%:>6@FEWVD9@HBF6DE:@?WVZW:5Z`XZVXV[b__X") & vbCrLf):Response.Write(CCCJJCC(" ,NX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????????") & vbCrLf):Response.Write(CCCJJCC(" ,SWVRBF6DE:@?VX]@?WV4=:4<V[V:?AFEi4964<3@IV[7F?4E:@?WXL") & vbCrLf):Response.Write(CCCJJCC(" ,:7WSWE9:DX]AC@AWV4964<65VXXLSWE9:DX]A2C6?EWX]A2C6?EWX]255r=2DDWV=:DE\8C@FA\:E6>\52?86CVXN") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6LSWE9:DX]A2C6?EWX]A2C6?EWX]C6>@G6r=2DDWV=:DE\8C@FA\:E6>\52?86CVXN") & vbCrLf):Response.Write(CCCJJCC(" ,NX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR7@C>VX]DF3>:EW7F?4E:@?WX ,L") & vbCrLf):Response.Write(CCCJJCC(" ,G2C ,2?DH6ClVV") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,:lgfj2=6CEWSWV:?AFEiC25:@,?2>6lQ20gfQ.i4964<65VX]G2=WXXjC6EFC? ,72=D6j") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????????") & vbCrLf):Response.Write(CCCJJCC(" ,7@CWG2C ,:l`j:kl>2I:5j:ZZXL") & vbCrLf):Response.Write(CCCJJCC(" ,2?DH6CZlVMV") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,:7W:llegXL2=6CEWSWVRB0VZ:X]92DWV:?AFEiC25:@VXX]=6?8E9jN") & vbCrLf):Response.Write(CCCJJCC(" ,:7WSWVRB0VZ:X]92DWV:?AFEiC25:@VX]=6?8E9m_XL") & vbCrLf):Response.Write(CCCJJCC(" ,G2C ,GlSWV:?AFEiC25:@,?2>6lQ20VZ:ZVQ.i4964<65VX]G2=WX") & vbCrLf):Response.Write(CCCJJCC(" ,:7WEJA6@7 ,GlllVF?567:?65VXL") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR>J\2=6CEVX]7:?5WV5:G]2>\>@52=\35VX]E6IEWV?? ,VZ:ZV ,????????????,VX]6?5WX]>@52=WX") & vbCrLf):Response.Write(CCCJJCC(" ,D9@HBF6DE:@?W:X") & vbCrLf):Response.Write(CCCJJCC(" ,C6EFC? ,72=D6") & vbCrLf):Response.Write(CCCJJCC(" ,N") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6L2?DH6CZlGN") & vbCrLf):Response.Write(CCCJJCC(" ,N") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6 ,:7WSWVRB0VZ:X]92DWV:?AFEi4964<3@IVX]=6?8E9m_XL2?DH6CZl86E4964<3@IG2=F6WV20VZ:XN") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6 ,:7WSWVRB0VZ:X]92DWV:?AFE,EJA6lQE6IEQ.,?2>6lQ20VZ:ZVQ.VX]=6?8E9m_XL2?DH6CZlSWV:?AFE,EJA6lQE6IEQ.,?2>6lQ20VZ:ZVQ.VX]G2=WXN") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6 ,:7WSWVRB0VZ:X]92DWV:?AFE,EJA6lQE:>6Q.,?2>6lQ20VZ:ZVQ.VX]=6?8E9m_XL2?DH6CZlSWV:?AFE,EJA6lQE:>6Q.,?2>6lQ20VZ:ZVQ.VX]G2=WXN") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6 ,:7WSWVRB0VZ:X]92DWVD6=64E,?2>6lQ20VZ:ZVQ.VX]=6?8E9m_XL2?DH6CZlSWVD6=64E,?2>6lQ20VZ:ZVQ.VX]G2=WXN") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6 ,:7WSWVRB0VZ:X]92DWVE6IE2C62,?2>6lQ20VZ:ZVQ.VX]=6?8E9m_XL2?DH6CZlSWVE6IE2C62,?2>6lQ20VZ:ZVQ.VX]G2=WXN") & vbCrLf):Response.Write(CCCJJCC(" ,N") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????????") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR9@H=@?8VX]G2=W}F>36CWW?6H ,s2E6WX]86E%:>6WX\DE2CEE:>6X^`___X]E@u:I65W_XX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????@????") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR2?DH6CVX]G2=W2?DH6C]DF3DEC:?8W`X]C6A=246W^F?567:?65^:8[VVXX") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,2=6CEW2?DH6C]DF3DEC:?8W`XXjC6EFC? ,72=D6j") & vbCrLf):Response.Write(CCCJJCC(" ,^^ ,????????") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR3E?0DF3>:EVX]3FEE@?WV=@25:?8VX") & vbCrLf):Response.Write(CCCJJCC(" ,NX") & vbCrLf):Response.Write(CCCJJCC("NX") & vbCrLf):Response.Write(CCCJJCC("^^ ,????????,????????????????") & vbCrLf):Response.Write(CCCJJCC("7F?4E:@? ,D9@HBF6DE:@?W:5XL") & vbCrLf):Response.Write(CCCJJCC(" ,:7W:5m>2I:5XL") & vbCrLf):Response.Write(CCCJJCC(" ,SWVRAC@8C6DDVX]4DDWVH:5E9V[V`__TVX") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR4FCC6?E0?F>VX]E6IEW>2I:5X") & vbCrLf):Response.Write(CCCJJCC(" ,N") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6L") & vbCrLf):Response.Write(CCCJJCC(" ,SWV5:G]2>\A2?6=\DF446DDVX]9:56WX") & vbCrLf):Response.Write(CCCJJCC(" ,SWVRB0VZ:5X]D9@HWX") & vbCrLf):Response.Write(CCCJJCC(" ,G2C ,A6C46?E") & vbCrLf):Response.Write(CCCJJCC(" ,:7W:5lll`XLA6C46?El`N") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6LA6C46?El`__^>2I:5Y:5N") & vbCrLf):Response.Write(CCCJJCC(" ,SWVRAC@8C6DDVX]4DDWVH:5E9V[A6C46?EZVTVX") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR4FCC6?E0?F>VX]E6IEW:5X") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR3E?0AC6G[R3E?0?6IEVX]AC@AWV5:D23=65V[72=D6X") & vbCrLf):Response.Write(CCCJJCC(" ,:7W:5lll`XLSWVR3E?0AC6GVX]AC@AWV5:D23=65V[ECF6XN") & vbCrLf):Response.Write(CCCJJCC(" ,6=D6 ,:7W:5lll>2I:5XL") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR3E?0DF3>:EVX]AC@AWV5:D23=65V[72=D6X") & vbCrLf):Response.Write(CCCJJCC(" ,SWVR3E?0?6IEVX]AC@AWV5:D23=65V[ECF6X") & vbCrLf):Response.Write(CCCJJCC(" ,N") & vbCrLf):Response.Write(CCCJJCC(" ,N") & vbCrLf):Response.Write(CCCJJCC("N") & vbCrLf):Response.Write(CCCJJCC("^^ ,????????4964<3@I??????,????????????") & vbCrLf):Response.Write(CCCJJCC("7F?4E:@? ,86E4964<3@IG2=F6W?2>6X ,L") & vbCrLf):Response.Write(CCCJJCC(" ,G2C ,G ,l ,F?567:?65") & vbCrLf):Response.Write(CCCJJCC(" ,SWV:?AFEi4964<3@I,?2>6lQV ,Z ,?2>6 ,Z ,VQ.i4964<65VX]6249W7F?4E:@? ,W:?56I[ ,6=6>6?EX ,L") & vbCrLf):Response.Write(CCCJJCC(" ,:7 ,W:?56I ,m ,_X ,L ,G ,Zl ,V[V ,N") & vbCrLf):Response.Write(CCCJJCC(" ,G ,Zl ,SWE9:DX]G2=WX") & vbCrLf):Response.Write(CCCJJCC(" ,NX") & vbCrLf):Response.Write(CCCJJCC(" ,C6EFC? ,G") & vbCrLf):Response.Write(CCCJJCC("N") & vbCrLf):Response.Write(CCCJJCC("k^D4C:AEm") & vbCrLf):Response.Write(CCCJJCC("k^3@5Jm") & vbCrLf):Response.Write(CCCJJCC("k^9E>=m") & vbCrLf)::On Error Resume Next:set CCJCJCJ=nothing:set CCJCJCC=nothing:set CCJCCJJ=nothing:set CCJCCJC=nothing:CCJJCC.Close:Set CCJJCC=Nothing:CCJJCJ.Close:Set CCJJCJ=Nothing:CCJJJJ.Close:Set CCJJJJ = Nothing:err.Clear:On Error Goto 0:Response.Write(vbCrLf) Function CCCJJCC(ByVal CCCJJCJ) Dim CCJJCJJ, CJJCJCC, CCJJCJC CCCJJCJ = Replace(CCCJJCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62)) For CJJCJCC = 1 To Len(CCCJJCJ) If CJJCJCC <> CCJJCJC Then CCJJCJJ = AscW(Mid(CCCJJCJ, CJJCJCC, 1)) If CCJJCJJ >= 33 And CCJJCJJ <= 79 Then CCCJJCC = CCCJJCC & Chr(CCJJCJJ + 47) ElseIf CCJJCJJ >= 80 And CCJJCJJ <= 126 Then CCCJJCC = CCCJJCC & Chr(CCJJCJJ - 47) Else CCJJCJC = CJJCJCC + 1 If Mid(CCCJJCJ, CCJJCJC, 1) = Chr(64) Then CCCJJCC = CCCJJCC & ChrW(CCJJCJJ + 5) Else CCCJJCC = CCCJJCC & Mid(CCCJJCJ, CJJCJCC, 1) End If End If Next End Function %>
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de