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

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