<!--#include file="../inc.asp"-->
<!--#include file="../ydzq1.asp"-->
<%Call head()
Call saycarda("宠物医院")

dim lx,sl,msg

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

	select case lx
	     case "rou"	                        
            if myjb<sl*1000 then response.redirect"1.asp?sid="&sid&"&saytk="&saytk&""
                sql="update users set myjb=myjb-"& sl*1000 &",cwrq=cwrq+"& sl*50 &"  where [id] ="&myid 
			conn.execute sql
	msg="经过医生的护理，宝宝的健康有了明显的好转<br/>宠物健康:上升50<br/>宠物财富:下降1000"          
            case "gt"
            if myjb<sl*2000 then response.redirect"1.asp?sid="&sid&"&saytk="&saytk&""  
           	      sql="update users set myjb=myjb-"& sl*2000 &",cwrq=cwrq+"& sl*100 &"  where [id] ="&myid
			conn.execute sql
		msg="经过医生的护理，宝宝的健康有了明显的好转<br/>宠物健康:上升100<br/>宠物财富:下降2000"
		case "xnj"
            	 if myjb<sl*3000 then response.redirect"1.asp?sid="&sid&"&saytk="&saytk&""   
                      sql="update users set myjb=myjb-"& sl*3000 &",cwrq=cwrq+"& sl*160 &"  where [id] ="&myid
			conn.execute sql
			msg="经过医生的护理，宝宝的健康有了明显的好转<br/>宠物健康:上升160<br/>宠物财富:下降3000"
		case "lhr"               
               if myjb<sl*3500 then response.redirect"1.asp?sid="&sid&"&saytk="&saytk&""
			sql="update users set myjb=myjb-"& sl*3500 &",cwrq=cwrq+"& sl*300 &"  where [id] ="&myid
			conn.execute sql
			msg="经过医生的护理，宝宝的霉毒总算好了，健康有了明显的好转<br/>宠物健康:上升300<br/>宠物财富:下降3500"
		case "hzg"               
                  if myjb<sl*4000 then response.redirect"1.asp?sid="&sid&"&saytk="&saytk&""
			sql="update users set myjb=myjb-"& sl*4000 &",cwrq=cwrq+"& sl*300 &"  where [id] ="&myid
			conn.execute sql
			msg="经过医生的护理，宝宝的健康有了明显的好转<br/>宠物健康:上升300<br/>宠物财富:下降4000"		              
		end select
response.write msg
	conn.close
	set rs=nothing
	set conn=nothing
%>
<br/>--------<br/><a href='indexcw.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>喂食</a>-
<a href='cwxy.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>沐浴>></a><br/>
<a href='index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>宠物</a>-<a href='/bbs/index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>社区</a>-<a href='/index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>首页</a>







<%Call headsay()%>


