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

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