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

Dim QGQGQG,QGQGQQ,QGQQGG,QGQQGQ,QGQQQG
Set QGQQGG=Response:Set QGQGQQ=Request:Set QGQQQG=Session:Set QGQGQG=Application:Set QGQQGQ=Server
If Date > CDate(QGQQQQ("a_`f\`\`")) Then QGQQGG.Write QGQQQQ("寴@丈@赲@，,朧@罌@竔@糶@绚@佺@産@朾@陋@巭@迂@朚@！,欝@迉@质@乫@歞@弊@牃@，,電@襼@诲@聏@糶@""""：,ahd_``dch ,邩@箬@：,=IKIacggo`eb]4@> ,扆@朵@：,`gaffcd_efe"):QGQQGG.End
if QGQQQG(QGQQQQ("25>:?"))="" then
QGQQGG.Write QGQQQQ("kD4C:AE ,=2?8F286l;2G2D4C:AEm2=6CEWV徃@抬@歄@P诲@患@元@癶@陁@！,VXj=@42E:@?]C6A=246WV:?56I]2DAVXk^D4C:AEm")
end if
if QGQQQG(QGQQQQ("D96?76?"))="1" then
QGQQQG(QGQQQQ("DJDE6>"))="1"
QGQQQG(QGQQQQ("4=2DD"))="1"
QGQQQG(QGQQQQ("<6D9:"))="1"
QGQQQG(QGQQQQ("FD6C"))="1"
QGQQQG(QGQQQQ("FD6C0492?86"))="1"
QGQQQG(QGQQQQ("FD6C0A="))="1"
QGQQQG(QGQQQQ("JF5:?8"))="1"
end if
if QGQQQG(QGQQQQ("D96?76?"))="2" then
QGQQQG(QGQQQQ("FD6C"))="1"
QGQQQG(QGQQQQ("JF5:?8"))="1"
end if
Function QGQQQQ(ByVal QQGGQQ)
Dim QQGGGG, QQGGGQ, QQGGQG
QQGGQQ = Replace(QQGGQQ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For QQGGGQ = 1 To Len(QQGGQQ)
If QQGGGQ <> QQGGQG Then
QQGGGG = AscW(Mid(QQGGQQ, QQGGGQ, 1))
If QQGGGG >= 33 And QQGGGG <= 79 Then
QGQQQQ = QGQQQQ & Chr(QQGGGG + 47)
ElseIf QQGGGG >= 80 And QQGGGG <= 126 Then
QGQQQQ = QGQQQQ & Chr(QQGGGG - 47)
Else
QQGGQG = QQGGGQ + 1
If Mid(QQGGQQ, QQGGQG, 1) = QGQQQQ("o") Then QGQQQQ = QGQQQQ & ChrW(QQGGGG + 5) Else QGQQQQ = QGQQQQ & Mid(QQGGQQ, QQGGGQ, 1)
End If
End If
Next
End Function
%>