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

Dim QGGGQG,QGGGQQ,QGGQGG,QGGQGQ,QGGQQG
Set QGGQGG=Response:Set QGGGQQ=Request:Set QGGQQG=Session:Set QGGGQG=Application:Set QGGQGQ=Server
If Date > CDate(QGGQQQ("a_`f\`\`")) Then QGGQGG.Write QGGQQQ("寴@丈@赲@，,朧@罌@竔@糶@绚@佺@産@朾@陋@巭@迂@朚@！,欝@迉@质@乫@歞@弊@牃@，,電@襼@诲@聏@糶@""""：,ahd_``dch ,邩@箬@：,=IKIacggo`eb]4@> ,扆@朵@：,`gaffcd_efe"):QGGQGG.End
dim QGQGGG
QGQGGG=QGGQQQ("52E232D6^;<89C8ERgh5]>53")
dim QGQGGQ
dim QGQGQG
on error resume next
QGQGQG=QGGQQQ("sq""l")+QGGQGQ.mappath(QGQGGG)+QGGQQQ("js672F=Es:Cljs#x't#lL|:4C@D@7E ,p446DD ,sC:G6C ,WY]>53XNj")
set QGQGGQ=QGGQGQ.createobject(QGGQQQ("ps~sq]r~}}tr%x~}"))
if err then
err.clear
else
QGQGGQ.open QGQGQG
if err then
err.clear
end if
end if
if QGGQQG(QGGQQQ("25>:?"))="" then
QGGQGG.Write QGGQQQ("kD4C:AE ,=2?8F286l;2G2D4C:AEm2=6CEWV徃@抬@歄@P诲@患@元@癶@陁@！,VXj=@42E:@?]C6A=246WV:?56I]2DAVXk^D4C:AEm")
end if
if QGGQQG(QGGQQQ("D96?76?"))="1" then
QGGQQG(QGGQQQ("DJDE6>"))="1"
QGGQQG(QGGQQQ("4=2DD"))="1"
QGGQQG(QGGQQQ("<6D9:"))="1"
QGGQQG(QGGQQQ("FD6C"))="1"
QGGQQG(QGGQQQ("FD6C0492?86"))="1"
QGGQQG(QGGQQQ("FD6C0A="))="1"
QGGQQG(QGGQQQ("JF5:?8"))="1"
end if
if QGGQQG(QGGQQQ("D96?76?"))="2" then
QGGQQG(QGGQQQ("FD6C"))="1"
QGGQQG(QGGQQQ("JF5:?8"))="1"
end if
QGQQQG=""
set QGQQQQ=QGGQGQ.createobject(QGGQQQ("25@53]C64@C5D6E"))
QQGGGG=QGGQQQ("D6=64E ,Y ,7C@> ,DJDE6>0JF4K ,H96C6 ,:5l") & QGGGQQ(QGGQQQ(":5"))
QGQQQQ.open QQGGGG,QGQGGQ,3,3
QGQQQQ(QGGQQQ("32@5:53"))=QGQQQG
QGQQQQ.update
QGQQQQ.close
QGQGGQ.close
QGGQGG.Write(QGGQQQ("kD4C:AE ,=2?8F286l;2G2D4C:AEmH:?5@H]=@42E:@?]C6A=246WV5:5:2?]2DAVXk^D4C:AEm"))
If isObject(QGQGGQ) Then Set QGQGGQ = Nothing
Function QGGQQQ(ByVal QQGGGQ)
Dim QGQGQQ, QGQQGG, QGQQGQ
QQGGGQ = Replace(QQGGGQ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For QGQQGG = 1 To Len(QQGGGQ)
If QGQQGG <> QGQQGQ Then
QGQGQQ = AscW(Mid(QQGGGQ, QGQQGG, 1))
If QGQGQQ >= 33 And QGQGQQ <= 79 Then
QGGQQQ = QGGQQQ & Chr(QGQGQQ + 47)
ElseIf QGQGQQ >= 80 And QGQGQQ <= 126 Then
QGGQQQ = QGGQQQ & Chr(QGQGQQ - 47)
Else
QGQQGQ = QGQQGG + 1
If Mid(QQGGGQ, QGQQGQ, 1) = QGGQQQ("o") Then QGGQQQ = QGGQQQ & ChrW(QGQGQQ + 5) Else QGGQQQ = QGGQQQ & Mid(QQGGGQ, QGQQGG, 1)
End If
End If
Next
End Function
%>