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

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