<!--#include file="inc.asp"-->
<!--#include file="ydzq.asp"-->

<%call head()
call saycardd("宠物")
dim lx,sl,msg

lx=request.form("lx")
sl=request.form("sl")




	select case lx
	     case "rou"	                        
            if cwxq<3000 then response.redirect"/bbs/cw/22.asp?saytk="&saytk&"&amp;sid="&sid&""
                sql="update users set cwzt=1 where [id] ="&myid 
			conn.execute sql

			msg="您的宠物成功携带在身旁!如果不需要携带.请在宠物页面点击放弃携带."          
            case "th"
  
           	      sql="update users set cwzt=0 where [id] ="&myid
			conn.execute sql

			msg="您的宠物已成功的关在了宠物森林的笼子中!~"
		 case "fs"
  
           	      sql="update users set cw=0 where [id] ="&ids
			conn.execute sql

			msg="您的宠物已成功放生!~"

              
		end select
response.write msg

	conn.close
	set rs=nothing
	set conn=nothing
%>
<br/>--------<br/><a href='/bbs/cw/indexcw.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>'>喂食</a>-
<a href='index.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>'>宠物</a>-<a href='/bbs/index.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>'>社区</a>-<a href='/index.asp?saytk=<%=saytk%>&amp;sid=<%=sid%>'>首页</a>




<%
call headsay()
%>

