<%
'软件名称：龙品软件学生学籍网络管理系统X8.0
'源码作者：岑品雄
'官方网站：http://www.wzcen.com
'联系方式：QQ：295011549　邮箱：lxzx2488@163.com 手机号:18277450676　（只收短信，不接来电）
'请勿修改下列任何代码,以保证程序正常运行

Dim UKUUU,UUKKK,UUKKU,UUKUK,UUKUU
Set UUKKU=Response:Set UUKKK=Request:Set UUKUU=Session:Set UKUUU=Application:Set UUKUK=Server
If Date > CDate(UUUKK("a_`f\`\`")) Then UUKKU.Write UUUKK("寴@丈@赲@，,朧@罌@竔@糶@绚@佺@産@朾@陋@巭@迂@朚@！,欝@迉@质@乫@歞@弊@牃@，,電@襼@诲@聏@糶@""""：,ahd_``dch ,邩@箬@：,=IKIacggo`eb]4@> ,扆@朵@：,`gaffcd_efe"):UUKKU.End
if UUKUU(UUUKK("25>:?"))="" then
UUKKU.redirect UUUKK("=@8:?]2DA")
end if
if UUKUU(UUUKK("D96?76?"))="1" then
UUKUU(UUUKK("DJDE6>"))="1"
UUKUU(UUUKK("4=2DD"))="1"
UUKUU(UUUKK("<6D9:"))="1"
UUKUU(UUUKK("FD6C"))="1"
UUKUU(UUUKK("FD6C0492?86"))="1"
UUKUU(UUUKK("FD6C0A="))="1"
UUKUU(UUUKK("IF6<60A="))="1"
UUKUU(UUUKK("32?;:0A="))="1"
UUKUU(UUUKK("JF5:?8"))="1"
end if
if UUKUU(UUUKK("D96?76?"))="2" then
UUKUU(UUUKK("FD6C"))="1"
UUKUU(UUUKK("JF5:?8"))="1"
end if
dim UUUKU
UUUKU=UUUKK("52E232D6^;<89C8ERgh5]>53")
dim UUUUK
dim UUUUU
on error resume next
UUUUU=UUUKK("sq""l")+UUKUK.mappath(UUUKU)+UUUKK("js672F=Es:Cljs#x't#lL|:4C@D@7E ,p446DD ,sC:G6C ,WY]>53XNj")
set UUUUK=UUKUK.createobject(UUUKK("ps~sq]r~}}tr%x~}"))
if err then
err.clear
else
UUUUK.open UUUUU
if err then
err.clear
end if
end if
if UUKUU(UUUKK("DJDE6>"))<>"1" then
UUKKU.redirect UUUKK("6CC]2DAn6CCl`")
end if
UUKKU.Write(vbCrLf)
UUKKU.Write(UUUKK("k9E>=m") & vbCrLf)
UUKKU.Write(UUUKK("k9625m") & vbCrLf)
UUKKU.Write(UUUKK("kE:E=6m孡@朚@箜@琁@k^E:E=6m") & vbCrLf)
UUKKU.Write(UUUKK("k>6E2 ,9EEA\6BF:GlQr@?E6?E\%JA6Q ,4@?E6?ElQE6IE^9E>=j ,492CD6El83ab`aQm") & vbCrLf)
UUKKU.Write(UUUKK("k$%*{t ,EJA6lE6IE^4DDm") & vbCrLf)
UUKKU.Write(UUUKK("]>2:? ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,u~}%\$x+ti ,`aAI") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]>2:?` ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,u~}%\$x+ti ,hAE") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]>2:?a ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,u~}%\$x+ti ,`eAI") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]>2:?b ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,u~}%\$x+ti ,fAI") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]>2:?c ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,u~}%\$x+ti ,`_AI") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("pi=:?< ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,r~{~#i ,Rhh____j") & vbCrLf)
UUKKU.Write(UUUKK("	,%t)%\str~#p%x~}i ,?@?6") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("piG:D:E65 ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,r~{~#i ,R__ee__j") & vbCrLf)
UUKKU.Write(UUUKK("	,%t)%\str~#p%x~}i ,?@?6") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("pi24E:G6 ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,r~{~#i ,R__hh__j") & vbCrLf)
UUKKU.Write(UUUKK("	,%t)%\str~#p%x~}i ,?@?6") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("pi9@G6C ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,r~{~#i ,Ruu____j") & vbCrLf)
UUKKU.Write(UUUKK("	,%t)%\str~#p%x~}i ,F?56C=:?6") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]$%*{ta ,L	,4@=@Ci ,R______j") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\H6:89Ei ,3@=5j") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\D:K6i ,`eAEj") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]DEJ=6c ,Lu~}%\$x+ti ,`aAIj ,4@=@Ci ,Ruurruuj ,N") & vbCrLf)
UUKKU.Write(UUUKK("3@5J[E5[E9 ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\72>:=Ji ,%:>6D ,}6H ,#@>2?[ ,%:>6D[ ,D6C:7j") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\D:K6i ,`aAIj") & vbCrLf)
UUKKU.Write(UUUKK("	,4@=@Ci ,R______j") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("2 ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\D:K6i ,`aAIj") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]DEJ=6e ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\72>:=Ji ,Q%:>6D ,}6H ,#@>2?Q[ ,%:>6D[ ,D6C:7j") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\D:K6i ,`aAIj") & vbCrLf)
UUKKU.Write(UUUKK("	,=:?6\96:89Ei ,`fAIj") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\H6:89Ei ,?@C>2=j") & vbCrLf)
UUKKU.Write(UUUKK("	,4@=@Ci ,R______j") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]DEJ=6f ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,4@=@Ci ,Rhh____j") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\H6:89Ei ,3@=5j") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]$%*{tg ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\D:K6i ,`gAIj") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\72>:=Ji ,Q宆@低@Qj") & vbCrLf)
UUKKU.Write(UUUKK("	,4@=@Ci ,R____uuj") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\H6:89Ei ,?@C>2=j") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]$%*{t`_ ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,u~}%\$x+ti ,`eAIj") & vbCrLf)
UUKKU.Write(UUUKK("	,4@=@Ci ,R____uuj") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\H6:89Ei ,3@=5j") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]$%*{t`a ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,u~}%\$x+ti ,`eAIj") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\H6:89Ei ,3@=5j") & vbCrLf)
UUKKU.Write(UUUKK("	,4@=@Ci ,Ruu____j") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("]$%*{t`c ,L") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\D:K6i ,`gAIj") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\72>:=Ji ,Q黌@低@Qj") & vbCrLf)
UUKKU.Write(UUUKK("	,4@=@Ci ,Ruu____j") & vbCrLf)
UUKKU.Write(UUUKK("	,7@?E\H6:89Ei ,?@C>2=j") & vbCrLf)
UUKKU.Write(UUUKK("N") & vbCrLf)
UUKKU.Write(UUUKK("k^$%*{tm") & vbCrLf)
UUKKU.Write(UUUKK("k^9625m") & vbCrLf)
UUKKU.Write(UUUKK("k3@5Jm") & vbCrLf)
UKKKUU=UUUKK("D6=64E ,Y ,7C@> ,,IF6;:.")
set UKKUKK=UUKUK.CreateObject(UUUKK("p5@53]C64@C5D6E"))
UKKUKK.open UKKKUU,UUUUK,1,1
UKKUKU=UUUKK("D6=64E ,Y ,7C@> ,,DJDE6>0JF4K.")
set UKKUUK=UUKUK.CreateObject(UUUKK("p5@53]C64@C5D6E"))
UKKUUK.open UKKUKU,UUUUK,1,1
UUKKU.Write(vbCrLf)
UUKKU.Write(UUUKK("kE23=6 ,H:5E9lQdb`Q ,96:89ElQ`_cQ ,3@C56ClQ_Q ,2=:8?lQ46?E6CQ ,46==A255:?8lQ_Q ,46==DA24:?8lQ_Qm") & vbCrLf)
UUKKU.Write(UUUKK(" , ,kECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , ,kE9 ,H:5E9lQdb`Q ,96:89ElQgaQ ,4@=DA2?lQaQ ,D4@A6lQ4@=QmkDA2? ,4=2DDlQ$%*{taQm珨@红@箜@琁@k^DA2?mk^E9m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK("k^E23=6m") & vbCrLf)
UUKKU.Write(UUUKK("	,	,") & vbCrLf)
UUKKU.Write(UUUKK("kE23=6 ,H:5E9lQbgTQ ,96:89ElQbeeQ ,3@C56ClQ`Q ,2=:8?lQ46?E6CQ ,46==A255:?8lQ_Q ,46==DA24:?8lQ_Q ,3@C56C4@=@C=:89ElQRrrrrrrQ ,3@C56C4@=@C52C<lQRuuuuuuQm") & vbCrLf)
UUKKU.Write(UUUKK(" , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , ,kE5 ,96:89ElQc_Q ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{t`aQm彎@剈@孡@朚@珨@红@箜@琁@：,k^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , ,kE5 ,96:89ElQc_Q ,2=:8?lQ46?E6CQmk2 ,9C67lQ$6>6DE6C8=^32?;:]2DAQmkDA2? ,4=2DDlQ$%*{t`cQm"))
UUKKU.Write UKKUUK(UUUKK("D6>6DE6C"))
UUKKU.Write(UUUKK(" ,k^DA2?mk^2mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , ,") & vbCrLf)
UUKKU.Write(UUUKK(" , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , ,kE5 ,H:5E9lQceTQ ,C@HDA2?lQ`_Q ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{t`_Qm柠@话@孡@朚@珨@红@箜@琁@：,k^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,H:5E9lQdcTQ ,96:89ElQaeQ ,2=:8?lQ46?E6CQmk2 ,9C67lQD6>6DE6C49I`2^32?;:]2DAQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;:2`"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^2mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,96:89ElQaeQ ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;:3a"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,96:89ElQaeQ ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;:4b"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,96:89ElQaeQ ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;:5c"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,96:89ElQaeQ ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;:6d"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,96:89ElQaeQ ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;:7e"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,96:89ElQaeQ ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;:8f"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,96:89ElQaeQ ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;:9g"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,96:89ElQaeQ ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;::h"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , ,kEC ,4=2DDl>2:?`m") & vbCrLf)
UUKKU.Write(UUUKK(" , , , , , , , , , , , , , , , , , , , , ,kE5 ,96:89ElQaeQ ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tgQm"))
UUKKU.Write UKKUKK(UUUKK("IF6;:;`_"))
UUKKU.Write(UUUKK("U?3DAjk^DA2?mk^E5m") & vbCrLf)
UUKKU.Write(UUUKK(" , ,k^ECm") & vbCrLf)
UUKKU.Write(UUUKK("k^E23=6m") & vbCrLf)
UUKKU.Write(UUUKK("k^3@5Jm") & vbCrLf)
UUKKU.Write(UUUKK("k^9E>=m") & vbCrLf)
If isObject(UUUUK) Then Set UUUUK = Nothing
Function UUUKK(ByVal UKKUUU)
Dim UKKKKK, UKKKKU, UKKKUK
UKKUUU = Replace(UKKUUU, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For UKKKKU = 1 To Len(UKKUUU)
If UKKKKU <> UKKKUK Then
UKKKKK = AscW(Mid(UKKUUU, UKKKKU, 1))
If UKKKKK >= 33 And UKKKKK <= 79 Then
UUUKK = UUUKK & Chr(UKKKKK + 47)
ElseIf UKKKKK >= 80 And UKKKKK <= 126 Then
UUUKK = UUUKK & Chr(UKKKKK - 47)
Else
UKKKUK = UKKKKU + 1
If Mid(UKKUUU, UKKKUK, 1) = UUUKK("o") Then UUUKK = UUUKK & ChrW(UKKKKK + 5) Else UUUKK = UUUKK & Mid(UKKUUU, UKKKKU, 1)
End If
End If
Next
End Function
%>