<!--#include file="../Inc.asp"-->
<!--#include file="../ydzq1.asp"-->
<!--#include file="gmszz1.asp"-->
<%Call head()
Call saycarda("智力卡购买")%>


<% if abs("cwjkk")<100 or myjb<10000 then
response.write "您的币不够10000或者生命小于100"
else
conn.execute("update users set cwjkk=cwjkk+1 where id="&myid)
conn.execute("update users set myjb=myjb-10000 where id="&myid)
conn.execute("update users set cwsm=cwsm-100 where id="&myid)
response.write "您现有个智力卡<br/>"
response.write "您成功购买了一个智力卡，扣取宠物生命值100，扣取财富10000<br/>"
end if%>

<!--#include file="fanhui.asp"-->
<%Call headsay()%>
