<%
id=request.QueryString("ID")
if instr(lcase(id),"or")>0 then
%>
<% response.end
end if
my=Session("name")
if my="" then
%>
<%
response.end
end if
a=request.QueryString("a")
'客栈休息
if a="pub" or a="" then
set xajh=Server.CreateObject("xajh.serve20")
mess=xajh.pub
set xajh=nothing
end if
'藏经阁
if a="list" then%>道具店
[ 现 有 秘 笈 ]
<%
set xajh=Server.CreateObject("xajh.serve20")
mess=xajh.listbook
set xajh=nothing
end if
'修炼武功
if a="lookbook" then
%><%
set xajh=Server.CreateObject("xajh.serve20")
mess=xajh.lookbook
set xajh=nothing
end if
'申请复活
if a="relife" then
%><%
set xajh=Server.CreateObject("xajh.serve20")
mess=xajh.relife
set xajh=nothing
end if
if mess<>"" then response.redirect mess
%>