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

Dim MMMDM,MMMMD,MMMMM,MDDDDD,MDDDDM
Set MMMMM=Response:Set MMMMD=Request:Set MDDDDM=Session:Set MMMDM=Application:Set MDDDDD=Server
If Date > CDate(MDDDMD("a_`f\`\`")) Then MMMMM.Write MDDDMD("寴@丈@赲@，,朧@罌@竔@糶@绚@佺@産@朾@陋@巭@迂@朚@！,欝@迉@质@乫@歞@弊@牃@，,電@襼@诲@聏@糶@""""：,ahd_``dch ,邩@箬@：,=IKIacggo`eb]4@> ,扆@朵@：,`gaffcd_efe"):MMMMM.End
if MDDDDM(MDDDMD("25>:?"))="" then
MMMMM.redirect MDDDMD("=@8:?]2DA")
end if
if MDDDDM(MDDDMD("D96?76?"))="1" then
MDDDDM(MDDDMD("DJDE6>"))="1"
MDDDDM(MDDDMD("4=2DD"))="1"
MDDDDM(MDDDMD("<6D9:"))="1"
MDDDDM(MDDDMD("FD6C"))="1"
MDDDDM(MDDDMD("FD6C0492?86"))="1"
MDDDDM(MDDDMD("FD6C0A="))="1"
MDDDDM(MDDDMD("IF6<60A="))="1"
MDDDDM(MDDDMD("32?;:0A="))="1"
MDDDDM(MDDDMD("JF5:?8"))="1"
end if
if MDDDDM(MDDDMD("D96?76?"))="2" then
MDDDDM(MDDDMD("FD6C"))="1"
MDDDDM(MDDDMD("JF5:?8"))="1"
end if
if MDDDDM(MDDDMD("D96?76?"))<>"1" then
MMMMM.redirect MDDDMD("6CC]2DAn6CCl`")
end if
MMMMM.Write(vbCrLf)
MMMMM.Write(MDDDMD("k9E>=m") & vbCrLf)
MMMMM.Write(MDDDMD("k9625m") & vbCrLf)
MMMMM.Write(MDDDMD("kE:E=6m伕@让@実@罌@丅@顿@纡@糶@绚@(`_]_ ,mm ,幯@仸@俩@攴@k^E:E=6m") & vbCrLf)
MMMMM.Write(MDDDMD("k>6E2 ,9EEA\6BF:GlQr@?E6?E\%JA6Q ,4@?E6?ElQE6IE^9E>=j ,492CD6El83ab`aQm") & vbCrLf)
MMMMM.Write(MDDDMD("kD4C:AE ,=2?8F286l;2G2D4C:AEm") & vbCrLf)
MMMMM.Write(MDDDMD("7F?4E:@? ,7@C>`0@?DF3>:EWXL") & vbCrLf)
MMMMM.Write(MDDDMD(":7 ,W7@C>`]E6C>?2>6`]G2=F6llQQXL") & vbCrLf)
MMMMM.Write(MDDDMD("	, , , , , , ,2=6CEWQ幯@仸@合@秫@丈@胸@穵@PQXj") & vbCrLf)
MMMMM.Write(MDDDMD("	,	, , ,7@C>`]E6C>?2>6`]7@4FDWXj") & vbCrLf)
MMMMM.Write(MDDDMD("	,	, , ,C6EFC? ,72=D6 , ,N") & vbCrLf)
MMMMM.Write(MDDDMD("	,	, , ,C6EFC? ,ECF6 , ,N") & vbCrLf)
MMMMM.Write(MDDDMD("k^D4C:AEm") & vbCrLf)
MMMMM.Write(MDDDMD("k$%*{t ,EJA6lE6IE^4DDm") & vbCrLf)
MMMMM.Write(MDDDMD("]>2:? ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,u~}%\$x+ti ,`aAI") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("]>2:?` ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,u~}%\$x+ti ,`cAI") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("]>2:?a ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,u~}%\$x+ti ,`eAIj") & vbCrLf)
MMMMM.Write(MDDDMD("	,7@?E\72>:=Ji ,Q宆@低@Qj") & vbCrLf)
MMMMM.Write(MDDDMD("	,4@=@Ci ,R______j") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("]>2:?b ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,u~}%\$x+ti ,fAI") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("]>2:?c ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,u~}%\$x+ti ,`_AI") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("pi=:?< ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,r~{~#i ,R777777j ,%t)%\str~#p%x~}i ,?@?6") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("piG:D:E65 ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,r~{~#i ,R777777j ,%t)%\str~#p%x~}i ,?@?6") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("pi24E:G6 ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,r~{~#i ,R77____j ,%t)%\str~#p%x~}i ,?@?6") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("pi9@G6C ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,r~{~#i ,R22____j ,%t)%\str~#p%x~}i ,F?56C=:?6") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("]DEJ=6c ,L4@=@Ci ,R______j ,7@?E\H6:89Ei ,3@=5j ,7@?E\D:K6i ,acAIj ,N") & vbCrLf)
MMMMM.Write(MDDDMD("]$%*{td ,L") & vbCrLf)
MMMMM.Write(MDDDMD("	,4@=@Ci ,R____uuj") & vbCrLf)
MMMMM.Write(MDDDMD("	,7@?E\D:K6i ,acAIj") & vbCrLf)
MMMMM.Write(MDDDMD("	,7@?E\H6:89Ei ,3@=5j") & vbCrLf)
MMMMM.Write(MDDDMD("N") & vbCrLf)
MMMMM.Write(MDDDMD("k^$%*{tm") & vbCrLf)
MMMMM.Write(MDDDMD("k^9625m") & vbCrLf)
dim MDDMDD
MDDMDD=MDDDMD("52E232D6^;<89C8ERgh5]>53")
dim MDDMDM
dim MDDMMD
on error resume next
MDDMMD=MDDDMD("sq""l")+MDDDDD.mappath(MDDMDD)+MDDDMD("js672F=Es:Cljs#x't#lL|:4C@D@7E ,p446DD ,sC:G6C ,WY]>53XNj")
set MDDMDM=MDDDDD.createobject(MDDDMD("ps~sq]r~}}tr%x~}"))
if err then
err.clear
else
MDDMDM.open MDDMMD
if err then
err.clear
end if
end if
MDMDMD=MMMMD(MDDDMD(":5"))
MDMDMM=MMMMD(MDDDMD("A286"))
set MDMMDD=MDDDDD.createobject(MDDDMD("25@53]C64@C5D6E"))
MDMMDM=MDDDMD("D6=64E ,Y ,7C@> ,E6C> ,H96C6 ,:5l") & MDMDMD
MDMMDD.open MDMMDM,MDDMDM,1,1
MMMMM.Write(vbCrLf)
MMMMM.Write(MDDDMD("k3@5J , ,E6IElQR______Qm") & vbCrLf)
MMMMM.Write(MDDDMD("kE23=6 ,H:5E9lQed_Q ,96:89ElQd_Q ,2=:8?lQ46?E6CQm") & vbCrLf)
MMMMM.Write(MDDDMD(" , ,kECm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , ,kE9 ,D4@A6lQ4@=QmU?3DAjk^E9m") & vbCrLf)
MMMMM.Write(MDDDMD(" , ,k^ECm") & vbCrLf)
MMMMM.Write(MDDDMD("k^E23=6m") & vbCrLf)
MMMMM.Write(MDDDMD("k7@C> ,=2?8F286l;2G2D4C:AE ,?2>6lQ7@C>`Q ,@?$F3>:ElQC6EFC? ,7@C>`0@?DF3>:EWXQ ,24E:@?lQE6C>0492?86]2DAn24E:@?l492?86Q ,>6E9@5lQA@DEQ ,2FE@4@>A=6E6lQ@77Qm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , ,kx}!&% , ,EJA6l9:556? ,G2=F6l"))
MMMMM.Write MDMMDD(MDDDMD(":5"))
MMMMM.Write(MDDDMD(" ,?2>6lQ:5Qm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , ,k5:G ,2=:8?lQ46?E6CQm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , ,k46?E6Cm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , ,k%pq{t ,H:5E9lcah ,96:89ElQaaaQ ,3@C56Cl` ,") & vbCrLf)
MMMMM.Write(MDDDMD("2=:8?l46?E6C ,46==A255:?8l_ ,46==DA24:?8l_ ,3@C56C4@=@ClRtttttt ,3@C56C4@=@C52C<lR777777m") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , ,k%q~s*m") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , ,") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , ,k%# ,Gp=:8?l>:55=6m") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , , , ,k%s ,H:5E9lQc`dQ ,96:89ElQd_Q ,4@=$A2?la ,2=:8?lQ46?E6CQmkDA2? ,4=2DDlQ$%*{tdQm幯@仸@俩@攴@k^DA2?mk^%sm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , ,k^%#m") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , ,kECm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , , , ,k%s ,4=2DDl>2:?` ,H:5E9lc`d ,96:89Elad ,2=:8?lQC:89EQmk$!p} ,") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , , , , , ,4=2DDl>2:?`mk7@?E ,4@=@ClQR______Qm幯@仸@合@秫@：,k^7@?Emk^$!p}mk^%sm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , , , ,k%s ,4=2DDl>2:?` ,H:5E9lc`dmk:?AFE ,EJA6lQE6IEQ ,?2>6lQE6C>?2>6`Q ,D:K6lQa_Q ,G2=F6lQ"))
MMMMM.Write MDMMDD(MDDDMD("E6C>?2>6"))
MMMMM.Write(MDDDMD("Q ,@?|@FD6~G6C ,l ,QE9:D]DEJ=6]324<8C@F?5r@=@C ,l ,VRtdu_uuVQ ,@?|@FD6~FE ,l ,QE9:D]DEJ=6]324<8C@F?5r@=@C ,l ,VVQmk^%sm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , ,k^ECm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , ,k%#m") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , , , ,k%s ,4=2DDl>2:?` ,4@=$A2?la ,H:5E9lQc`dQ ,96:89ElQd_Qm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , , , , , ,kA ,2=:8?lQ46?E6CQm") & vbCrLf)
MMMMM.Write(MDDDMD("kx}!&% ,4=2DDl>2:? ,EJA6lDF3>:E ,D:K6lb ,G2=F6lV , ,俩@攴@ , ,V ,?2>6l$F3>:Eam") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , , , , , ,k^%smk^%#m") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , , , , , , , ,k^%q~s*mk^%pq{tm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , , , ,k^46?E6Cm") & vbCrLf)
MMMMM.Write(MDDDMD(" , , , , , ,k^5:Gm") & vbCrLf)
MMMMM.Write(MDDDMD("k^7@C>m") & vbCrLf)
MMMMM.Write(MDDDMD("k^3@5Jm") & vbCrLf)
MMMMM.Write(MDDDMD("k^9E>=m") & vbCrLf)
MMMMM.Expires = (29 * 71 - 2059)
IF MMMMD.QueryString(MDDDMD("24E:@?"))=MDDDMD("492?86") then
Call MDDDMM()
End IF
Sub MDDDMM()
set MDMMDD=MDDDDD.createobject(MDDDMD("25@53]C64@C5D6E"))
MDMMDM=MDDDMD("D6=64E ,Y ,7C@> ,E6C> ,H96C6 ,:5l") & MMMMD.form(MDDDMD(":5"))
MDMMDD.open MDMMDM,MDDMDM,3,3
MDMMDD(MDDDMD("E6C>?2>6"))=MMMMD.form(MDDDMD("E6C>?2>6`"))
MDMMDD.update
MDMMDD.close
MDDMDM.close
MMMMM.redirect MDDDMD("E6C>]2DA")
End Sub
If isObject(MDDMDM) Then Set MDDMDM = Nothing
Function MDDDMD(ByVal MDMMMD)
Dim MDDMMM, MDMDDD, MDMDDM
MDMMMD = Replace(MDMMMD, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For MDMDDD = 1 To Len(MDMMMD)
If MDMDDD <> MDMDDM Then
MDDMMM = AscW(Mid(MDMMMD, MDMDDD, 1))
If MDDMMM >= 33 And MDDMMM <= 79 Then
MDDDMD = MDDDMD & Chr(MDDMMM + 47)
ElseIf MDDMMM >= 80 And MDDMMM <= 126 Then
MDDDMD = MDDDMD & Chr(MDDMMM - 47)
Else
MDMDDM = MDMDDD + 1
If Mid(MDMMMD, MDMDDM, 1) = MDDDMD("o") Then MDDDMD = MDDDMD & ChrW(MDDMMM + 5) Else MDDDMD = MDDDMD & Mid(MDMMMD, MDMDDD, 1)
End If
End If
Next
End Function
%>