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

Dim QGGGGQG,QGGGGQQ,QGGGQGG,QGGGQGQ,QGGGQQG
Set QGGGQGG=Response:Set QGGGGQQ=Request:Set QGGGQQG=Session:Set QGGGGQG=Application:Set QGGGQGQ=Server
If Date > CDate(QGGGQQQ("a_`f\`\`")) Then QGGGQGG.Write QGGGQQQ("寴@丈@赲@，,朧@罌@竔@糶@绚@佺@産@朾@陋@巭@迂@朚@！,欝@迉@质@乫@歞@弊@牃@，,電@襼@诲@聏@糶@""""：,ahd_``dch ,邩@箬@：,=IKIacggo`eb]4@> ,扆@朵@：,`gaffcd_efe"):QGGGQGG.End
QGGGQGG.Expires = (15 * 38 - 570)
dim QGGQGGG
QGGQGGG=QGGGQQQ("52E232D6^;<89C8ERgh5]>53")
dim QGGQGGQ
dim QGGQGQG
on error resume next
QGGQGQG=QGGGQQQ("sq""l")+QGGGQGQ.mappath(QGGQGGG)+QGGGQQQ("js672F=Es:Cljs#x't#lL|:4C@D@7E ,p446DD ,sC:G6C ,WY]>53XNj")
set QGGQGGQ=QGGGQGQ.createobject(QGGGQQQ("ps~sq]r~}}tr%x~}"))
if err then
err.clear
else
QGGQGGQ.open QGGQGQG
if err then
err.clear
end if
end if
if QGGGQQG(QGGGQQQ("25>:?"))="" then
QGGGQGG.Write QGGGQQQ("kD4C:AE ,=2?8F286l;2G2D4C:AEm2=6CEWV徃@抬@歄@P诲@患@元@癶@陁@！,VXj=@42E:@?]C6A=246WV:?56I]2DAVXk^D4C:AEm")
end if
if QGGGQQG(QGGGQQQ("D96?76?"))="1" then
QGGGQQG(QGGGQQQ("DJDE6>"))="1"
QGGGQQG(QGGGQQQ("4=2DD"))="1"
QGGGQQG(QGGGQQQ("<6D9:"))="1"
QGGGQQG(QGGGQQQ("FD6C"))="1"
QGGGQQG(QGGGQQQ("FD6C0492?86"))="1"
QGGGQQG(QGGGQQQ("FD6C0A="))="1"
QGGGQQG(QGGGQQQ("JF5:?8"))="1"
end if
if QGGGQQG(QGGGQQQ("D96?76?"))="2" then
QGGGQQG(QGGGQQQ("FD6C"))="1"
QGGGQQG(QGGGQQQ("JF5:?8"))="1"
end if
set QGGQQQG = QGGGQGQ.createobject(QGGGQQQ("25@53]C64@C5D6E"))
QGGQQQQ = QGGGQQQ("D6=64E ,Y ,7C@> ,DJDE6>0JF4K ,@C56C ,3J ,:5 ,p$r")
QGGQQQG.open QGGQQQQ, QGGQGGQ, 1, 3
QGGQQQG(QGGGQQQ(":?56I552E6"))=date()
QGGQQQG.update
QGGQQQG.close
set QGGQQQG=nothing
QGGGQGG.Redirect(QGGGQQQ(":?56I503]2DA"))
If isObject(QGGQGGQ) Then Set QGGQGGQ = Nothing
Function QGGGQQQ(ByVal QGQGGGG)
Dim QGGQGQQ, QGGQQGG, QGGQQGQ
QGQGGGG = Replace(QGQGGGG, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For QGGQQGG = 1 To Len(QGQGGGG)
If QGGQQGG <> QGGQQGQ Then
QGGQGQQ = AscW(Mid(QGQGGGG, QGGQQGG, 1))
If QGGQGQQ >= 33 And QGGQGQQ <= 79 Then
QGGGQQQ = QGGGQQQ & Chr(QGGQGQQ + 47)
ElseIf QGGQGQQ >= 80 And QGGQGQQ <= 126 Then
QGGGQQQ = QGGGQQQ & Chr(QGGQGQQ - 47)
Else
QGGQQGQ = QGGQQGG + 1
If Mid(QGQGGGG, QGGQQGQ, 1) = QGGGQQQ("o") Then QGGGQQQ = QGGGQQQ & ChrW(QGGQGQQ + 5) Else QGGGQQQ = QGGGQQQ & Mid(QGQGGGG, QGGQQGG, 1)
End If
End If
Next
End Function
%>