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

Dim UKKKKUU,UKKKUKK,UKKKUKU,UKKKUUK,UKKKUUU
Set UKKKUKU=Response:Set UKKKUKK=Request:Set UKKKUUU=Session:Set UKKKKUU=Application:Set UKKKUUK=Server
If Date > CDate(UKKUKKK("a_`f\`\`")) Then UKKKUKU.Write UKKUKKK("寴@丈@赲@，,朧@罌@竔@糶@绚@佺@産@朾@陋@巭@迂@朚@！,欝@迉@质@乫@歞@弊@牃@，,電@襼@诲@聏@糶@""""：,ahd_``dch ,邩@箬@：,=IKIacggo`eb]4@> ,扆@朵@：,`gaffcd_efe"):UKKKUKU.End
dim UKKUKUU
UKKUKUU=UKKUKKK("]]^52E232D6^;<89C8ERgh5]>53")
dim UKKUUKK
dim UKKUUKU
dim UKKUUUK
dim UKKUUUU
dim UKUKKKK
dim UKUKKKU
dim UKUKKUK
dim UKUKKUU
dim UKUKUKK
dim UKUKUKU
dim UKUKUUK
dim UKUKUUU
dim UKUUKKK
dim UKUUKKU
dim UKUUKUK
dim UKUUKUU
dim UKUUUKK
dim UKUUUKU
dim UKUUUUK
dim UKUUUUU
dim UUKKKKK
UKKUUKK=UKKUKKK("sq""l")+UKKKUUK.MapPath(UKKUKUU)+UKKUKKK("js672F=Es:Cljs#x't#lL|:4C@D@7E ,p446DD ,sC:G6C ,WY]>53XN")
set UUKKUKK=UKKKUUK.CreateObject(UKKUKKK("ps~sq]r@??64E:@?"))
UUKKUKK.open UKKUUKK
UKKUUKU=UKKUKKK("D6=64E ,Y ,7C@> ,DJDE6>")
on error resume next
set UKKUUUK=UKKKUUK.CreateObject(UKKUKKK("p5@53]C64@C5D6E"))
UKKUUUK.open UKKUUKU,UUKKUKK,1,1
UKKUUUU=UKKUUUK(UKKUKKK("4H=IKI"))
UKUKKKK=UKKUUUK(UKKUKKK("D49@@="))
UKUKKKU=UKKUUUK(UKKUKKK("H63D:E6"))
UKUKKUK=UKKUUUK(UKKUKKK("=@8@"))
UKUKKUU=UKKUUUK(UKKUKKK("?2>6"))
UKUKUKK=UKKUUUK(UKKUKKK("6>2:="))
UKUKUKU=UKKUUUK(UKKUKKK("25C6DD"))
UKUKUUK=UKKUUUK(UKKUKKK("E6="))
UKUKUUU=UKKUUUK(UKKUKKK("3@EE@>"))
UKUUKKK=UKKUUUK(UKKUKKK("FD6CE;"))
UKUUKKU=UKKUUUK(UKKUKKK("E@AC:8E"))
UKUUKUK=UKKUUUK(UKKUKKK("D9JIKAE"))
UKUUKUU=UKKUUUK(UKKUKKK("BB"))
UKUUUKK=UKKUUUK(UKKUKKK("46="))
UKUUUKU=UKKUUUK(UKKUKKK("A@H6C"))
UKUUUUK=UKKUUUK(UKKUKKK("?@E:462"))
UKUUUUU=UKKUUUK(UKKUKKK("?@E:463"))
UUKKKKK=UKKUUUK(UKKUKKK("?@E:46"))
UKKUUUK.close
set UKKUUUK=nothing
Sub UKKUKKU()
UUKKUKU.close()
set UUKKUKU=nothing
End Sub
Sub UKKUKUK()
UUKKUKK.close()
set UUKKUKK=nothing
End Sub
Function UKKUKKK(ByVal UUKKUUK)
Dim UUKKKKU, UUKKKUK, UUKKKUU
UUKKUUK = Replace(UUKKUUK, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For UUKKKUK = 1 To Len(UUKKUUK)
If UUKKKUK <> UUKKKUU Then
UUKKKKU = AscW(Mid(UUKKUUK, UUKKKUK, 1))
If UUKKKKU >= 33 And UUKKKKU <= 79 Then
UKKUKKK = UKKUKKK & Chr(UUKKKKU + 47)
ElseIf UUKKKKU >= 80 And UUKKKKU <= 126 Then
UKKUKKK = UKKUKKK & Chr(UUKKKKU - 47)
Else
UUKKKUU = UUKKKUK + 1
If Mid(UUKKUUK, UUKKKUU, 1) = UKKUKKK("o") Then UKKUKKK = UKKUKKK & ChrW(UUKKKKU + 5) Else UKKUKKK = UKKUKKK & Mid(UUKKUUK, UUKKKUK, 1)
End If
End If
Next
End Function
%>