<!--#include file="../inc.asp"-->
<!--#include file="../ydzq1.asp"-->
<%Call head()
Call saycarda("宠物智力卡使用")
sl=request.form("sl")


if pz=0 then
response.write"您暂时还没有领养宠物哦`~"
else
if abs("cwjkk")<0 then
response.write"您还没有购买智力卡哦~"
else

                sql="update users set cwzt=3 where [id] ="&myid 
			conn.execute sql

response.write"使用成功!!您以后发贴将增加宠物生命:"&jkk1&",回帖将增加宠物生命"&jkk2&".感谢您的使用!"
end if
end if

	conn.close
	set rs=nothing
	set conn=nothing
%>
<br/>--------<!--#include file="fanhui.asp"-->







<%Call headsay()%>
