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

Dim QQGQQG,QQGQQQ,QQQGGG,QQQGGQ,QQQGQG
Set QQQGGG=Response:Set QQGQQQ=Request:Set QQQGQG=Session:Set QQGQQG=Application:Set QQQGGQ=Server
If Date > CDate(QQQGQQ("a_`f\`\`")) Then QQQGGG.Write QQQGQQ("寴@丈@赲@，,朧@罌@竔@糶@绚@佺@産@朾@陋@巭@迂@朚@！,欝@迉@质@乫@歞@弊@牃@，,電@襼@诲@聏@糶@""""：,ahd_``dch ,邩@箬@：,=IKIacggo`eb]4@> ,扆@朵@：,`gaffcd_efe"):QQQGGG.End
if QQQGQG(QQQGQQ("25>:?"))="" then
QQQGGG.redirect QQQGQQ("=@8:?]2DA")
end if
if QQQGQG(QQQGQQ("D96?76?"))="1" then
QQQGQG(QQQGQQ("DJDE6>"))="1"
QQQGQG(QQQGQQ("4=2DD"))="1"
QQQGQG(QQQGQQ("32@I:F2"))="1"
QQQGQG(QQQGQQ("FD6C"))="1"
QQQGQG(QQQGQQ("FD6C0492?86"))="1"
QQQGQG(QQQGQQ("FD6C0A="))="1"
QQQGQG(QQQGQQ("IF6<60A="))="1"
QQQGQG(QQQGQQ("32?;:0A="))="1"
QQQGQG(QQQGQQ("JF5:?8"))="1"
end if
if QQQGQG(QQQGQQ("D96?76?"))="2" then
QQQGQG(QQQGQQ("FD6C"))="1"
QQQGQG(QQQGQQ("JF5:?8"))="1"
end if
dim QQQQGQ
QQQQGQ=QQQGQQ("52E232D6^;<89C8ERgh5]>53")
dim QQQQQG
dim QQQQQQ
on error resume next
QQQQQQ=QQQGQQ("sq""l")+QQQGGQ.mappath(QQQQGQ)+QQQGQQ("js672F=Es:Cljs#x't#lL|:4C@D@7E ,p446DD ,sC:G6C ,WY]>53XNj")
set QQQQQG=QQQGGQ.createobject(QQQGQQ("ps~sq]r~}}tr%x~}"))
if err then
err.clear
else
QQQQQG.open QQQQQQ
if err then
err.clear
end if
end if
if QQQGQG(QQQGQQ("D96?76?"))<>"1" then
QQQGGG.redirect QQQGQQ("6CC]2DAn6CCl`")
end if
Sub QQQQGG()
dim QQQQGQ
QQQQGQ=QQQGQQ("52E232D6^;<89C8ERgh5]>53")
dim QQQQQG
dim QQQQQQ
on error resume next
QQQQQQ=QQQGQQ("sq""l")+QQQGGQ.mappath(QQQQGQ)+QQQGQQ("js672F=Es:Cljs#x't#lL|:4C@D@7E ,p446DD ,sC:G6C ,WY]>53XNj")
set QQQQQG=QQQGGQ.createobject(QQQGQQ("ps~sq]r~}}tr%x~}"))
if err then
err.clear
else
QQQQQG.open QQQQQQ
if err then
err.clear
end if
end if
set QGGGGQQ=QQQGGQ.createobject(QQQGQQ("25@53]C64@C5D6E"))
QGGGQGG=QQQGQQ("D6=64E ,Y ,7C@> ,D9@@=2== ,@C56C ,3J ,xs ,")
QGGGGQQ.open QGGGQGG,QQQQQG,1,1
If QGGGGQQ.eof and QGGGGQQ.bof then
QQQGGG.write QQQGQQ("kA ,2=:8?lV46?E6CVmk7@?E ,4@=@ClVR77____Vm迓@沜@件@佐@孡@栜@k^7@?Emk^Am")
QQQGGG.end
End if
if not QGGGGQQ.eof then
do while not QGGGGQQ.eof
QQQGGG.write QQQGQQ("k@AE:@? ,G2=F6l")&QGGGGQQ(QQQGQQ("D9@@=?2>6"))&QQQGQQ("m")&trim(QGGGGQQ(QQQGQQ("D9@@=?2>6")))&QQQGQQ("k^@AE:@?m")
QGGGGQQ.movenext
loop
end if
QGGGGQQ.close
QQQQQG.close
End sub
QQQGGG.Write(vbCrLf)
QQQGGG.Write(QQQGQQ("k9E>=m") & vbCrLf)
QQQGGG.Write(QQQGQQ("k9625m") & vbCrLf)
QQQGGG.Write(QQQGQQ("kE:E=6m臥@宕@释@淶@力@産@戲@k^E:E=6m") & vbCrLf)
QQQGGG.Write(QQQGQQ("k>6E2 ,9EEA\6BF:GlQr@?E6?E\%JA6Q ,4@?E6?ElQE6IE^9E>=j ,492CD6El83ab`aQm") & vbCrLf)
QQQGGG.Write(QQQGQQ("k$%*{t ,EJA6lE6IE^4DDm") & vbCrLf)
QQQGGG.Write(QQQGQQ("]>2:? ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,u~}%\$x+ti ,`aAI") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("]>2:?` ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,u~}%\$x+ti ,`cAI") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("]>2:?a ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,u~}%\$x+ti ,`eAI") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("]>2:?b ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,u~}%\$x+ti ,fAI") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("]>2:?c ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,u~}%\$x+ti ,`_AI") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("pi=:?< ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,r~{~#i ,R777777j ,%t)%\str~#p%x~}i ,?@?6") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("piG:D:E65 ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,r~{~#i ,R777777j ,%t)%\str~#p%x~}i ,?@?6") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("pi24E:G6 ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,r~{~#i ,R77____j ,%t)%\str~#p%x~}i ,?@?6") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("pi9@G6C ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,r~{~#i ,R22____j ,%t)%\str~#p%x~}i ,F?56C=:?6") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("]$%*{ta ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,4@=@Ci ,R______j") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,7@?E\H6:89Ei ,3@=5j") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("]DEJ=6d ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,u~}%\$x+ti ,acAIj") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,4@=@Ci ,R____uuj") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,7@?E\72>:=Ji ,Q宆@低@Qj") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("3@5J[E5[E9 ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,7@?E\D:K6i ,`aAIj") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,4@=@Ci ,R______j") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("3@5J ,L") & vbCrLf)
QQQGGG.Write(QQQGQQ("	,324<8C@F?5\:>286i ,FC=W:>286D^324<8C@F?5]8:7Xj") & vbCrLf)
QQQGGG.Write(QQQGQQ("N") & vbCrLf)
QQQGGG.Write(QQQGQQ("k^$%*{tm") & vbCrLf)
QQQGGG.Write(QQQGQQ("k^9625m") & vbCrLf)
QQQGGG.Write(QQQGQQ("k3@5Jm") & vbCrLf)
if QQGQQQ.QueryString(QQQGQQ("DEJ=6"))=QQQGQQ("FA52E6") then
set QGGGQGQ=QQQGGQ.createobject(QQQGQQ("25@53]C64@C5D6E"))
QGGGQGG=QQQGQQ("D6=64E ,Y ,7C@> ,DJDE6>0JF4K ,H96C6 ,:5l") & QQGQQQ.form(QQQGQQ(":5"))
QGGGQGQ.open QGGGQGG,QQQQQG,3,3
QGGGQGQ(QQQGQQ("85<E;JI<A"))=QQGQQQ.Form(QQQGQQ("85<E;JI<A`"))
QGGGQGQ.update
QGGGQGQ.close
QQQQQG.close
QGGGQQG = QGGGQGQ(QQQGQQ(":5"))
QQQGGG.Write(QQQGQQ("kD4C:AE ,=2?8F286l;2G2D4C:AEmH:?5@H]=@42E:@?]9C67lVFD6C0A=25]2DAVjk^D4C:AEm"))
end if
QQQGGG.Write(vbCrLf)
QQQGGG.Write(QQQGQQ("kE23=6 ,H:5E9lQfeaQ ,96:89ElQegQ ,2=:8?lQ46?E6CQm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , ,kECm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , ,kE9 ,96:89ElQe_Q ,4@=DA2?lQaQ ,G2=:8?lQ>:55=6Q ,D4@A6lQ4@=Qm≡,≡,kDA2? ,4=2DDlQDEJ=6dQm臥@宕@释@産@戲@k^DA2?m≡,≡,k^E9m") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , ,k^ECm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , ,kECm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , ,kE9 ,H:5E9lQdfcQ ,2=:8?lQ=67EQ ,G2=:8?lQ>:55=6Q ,D4@A6lQ4@=QmU?3DAjk^E9m") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , ,") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , ,k^ECm") & vbCrLf)
QQQGGG.Write(QQQGQQ("k^E23=6m") & vbCrLf)
QQQGGG.Write(QQQGQQ("k%pq{t ,H:5E9lbhh ,96:89ElQ`hbQ , ,3@C56ClQ`Q ,2=:8?lQ46?E6CQ ,46==!255:?8l_ ,46==$A24:?8l_ ,3@C56C4@=@ClRuuuuuu ,3@C56C4@=@C=:89ElQRubububQ ,3@C56C4@=@C52C<lRuuuuuum") & vbCrLf)
QQQGGG.Write(QQQGQQ("k%q~s*mk%#m") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , , , , , , , , , , , , , ,k%s ,96:89ElQefQ ,4@=$A2?la ,2=:8?lQC:89EQ ,4=2DDl>2:?`m俩@攴@墙@力@産@戲@癿@敫@释@：,k^%sm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , , , ,k7@C> ,?2>6lQ7@C>aQ ,>6E9@5lQA@DEQ ,@?$F3>:ElQC6EFC? ,7@C>a0@?DF3>:EWXQ ,24E:@?lQFD6C0A=25]2DAnDEJ=6lFA52E6Qm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , ,kE5 ,H:5E9lQ`g_Q ,2=:8?lQ=67EQ ,4=2DDl>2:?m"))
QGGGQQQ=QQQGQQ("D6=64E ,Y ,7C@> ,,DJDE6>0JF4K.")
set QGGQGGG=QQQGGQ.CreateObject(QQQGQQ("p5@53]C64@C5D6E"))
QGGQGGG.open QGGGQQQ,QQQQQG,1,1
QQQGGG.Write(vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , , , ,k:?AFE , ,EJA6l9:556? ,G2=F6l"))
QQQGGG.Write QGGQGGG(QQQGQQ(":5"))
QQQGGG.Write(QQQGQQ(" ,?2>6lQ:5Qm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , ,k:?AFE ,EJA6lQE6IEQ ,?2>6lQ85<E;JI<A`Q ,G2=F6lQ"))
QQQGGG.Write QGGQGGG(QQQGQQ("85<E;JI<A"))
QQQGGG.Write(QQQGQQ("Q ,D:K6lQaQm ,") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , ,kx}!&% ,4=2DDl>2:? ,EJA6lDF3>:E ,D:K6lb ,G2=F6lQ俩@攴@Q ,?2>6l$F3>:Eamk^E5m") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , , , ,k^7@C>m") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , , , , , , , , , , , ,k^%#m") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , , , , , , , , , , , ,ku~#| ,=2?8F286l;2G2D4C:AE ,?2>6lQu~#|`Q , , ,@?DF3>:ElQC6EFC? ,7@C>`0@?DF3>:EWXQ ,24E:@?lQFD6C0A=255]2DAQ ,>6E9@5lA@DEm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , , , , , , , , , , , ,") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , , , , , , , , , , , ,k%#m") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , , , , , , , , , , , , , ,k%s ,96:89ElQdfQ ,4@=$A2?lb ,2=:8?lQ46?E6CQ ,4=2DDl>2:?`m") & vbCrLf)
QQQGGG.Write(QQQGQQ("kx}!&% ,4=2DDl>2:? ,EJA6lDF3>:E ,D:K6lb ,G2=F6lV丆@一,歠@V ,?2>6l$F3>:Eam , ,") & vbCrLf)
QQQGGG.Write(QQQGQQ("U?3DAjk^%smk^%#mk^7@C>m") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , ,k^%pq{tm") & vbCrLf)
QQQGGG.Write(QQQGQQ("kE23=6 ,H:5E9lQhhbQ ,96:89ElQbaQ ,3@C56ClQ_Q ,2=:8?lQ46?E6CQ ,46==A255:?8lQ_Q ,46==DA24:?8lQ_Qm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , ,kECm") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , , , ,kE5 ,H:5E9lQhhbQ ,2=:8?lQC:89EQmk2 ,9C67lQFD6C]2DAQmk:>8 ,DC4lQ:>286D^324<]8:7Q ,H:5E9lQbdQ ,96:89ElQbdQ ,3@C56ClQ_Qmk^2mU?3DAjU?3DAjU?3DAjU?3DAjU?3DAjk^E5m") & vbCrLf)
QQQGGG.Write(QQQGQQ(" , ,k^ECm") & vbCrLf)
QQQGGG.Write(QQQGQQ("k^E23=6m") & vbCrLf)
QQQGGG.Write(QQQGQQ("k^3@5Jm") & vbCrLf)
QQQGGG.Write(QQQGQQ("k^9E>=m") & vbCrLf)
If isObject(QQQQQG) Then Set QQQQQG = Nothing
Function QQQGQQ(ByVal QGGQGGQ)
Dim QGGGGGG, QGGGGGQ, QGGGGQG
QGGQGGQ = Replace(QGGQGGQ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For QGGGGGQ = 1 To Len(QGGQGGQ)
If QGGGGGQ <> QGGGGQG Then
QGGGGGG = AscW(Mid(QGGQGGQ, QGGGGGQ, 1))
If QGGGGGG >= 33 And QGGGGGG <= 79 Then
QQQGQQ = QQQGQQ & Chr(QGGGGGG + 47)
ElseIf QGGGGGG >= 80 And QGGGGGG <= 126 Then
QQQGQQ = QQQGQQ & Chr(QGGGGGG - 47)
Else
QGGGGQG = QGGGGGQ + 1
If Mid(QGGQGGQ, QGGGGQG, 1) = QQQGQQ("o") Then QQQGQQ = QQQGQQ & ChrW(QGGGGGG + 5) Else QQQGQQ = QQQGQQ & Mid(QGGQGGQ, QGGGGGQ, 1)
End If
End If
Next
End Function
%>