<!--#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 cwrq<888 then response.redirect"/bbs/cw/2.asp?sid="&sid&"&saytk="&saytk&""
                sql="update users set myjb=myjb+"& sl*400 &",cwzs=cwzs+"& sl*10 &",cwrq=cwrq-"& sl*50 &",cwsm=cwsm-"& sl*50 &"  where [id] ="&myid 
			conn.execute sql
	msg="经过努力工作，有了收获<br/>宠物智力上升10.财富:上升"& sl*400 &"<br/>宠物健康.生命:下降"& sl*50 &""	         
            case "gt"
            if cwrq<1300 then response.redirect"/bbs/cw/2.asp?sid="&sid&"&saytk="&saytk&"" 

            
           	      sql="update users set myjb=myjb+"& sl*500 &",cwzs=cwzs+"& sl*15 &",cwrq=cwrq-"& sl*90 &",cwsm=cwsm-"& sl*90 &"  where [id] ="&myid
			conn.execute sql
		msg="经过努力工作，有了收获<br/>宠物财富:上升500.<br/>宠物智力上升15.健康.生命:下降"& sl*90 &""	         	
		case "xnj"


            	 if cwrq<2200 then response.redirect"/bbs/cw/2.asp?sid="&sid&"&saytk="&saytk&""

                
              

                      sql="update users set myjb=myjb+"& sl*800 &",cwzs=cwzs+"& sl*50 &",cwrq=cwrq-"& sl*150 &",cwsm=cwsm-"& sl*150 &"  where [id] ="&myid
			conn.execute sql
			msg="经过努力工作，有了收获<br/>宠物财富:上升"& sl*800 &"<br/>宠物智力上升50.健康.生命:下降"& sl*150 &""	         	
		case "lhr"  

             
               if cwrq<3000 then response.redirect"/bbs/cw/2.asp?sid="&sid&"&saytk="&saytk&""
			sql="update users set myjb=myjb+"& sl*1100&",cwzs=cwzs+"& sl*60 &",cwrq=cwrq-"& sl*300 &",cwsm=cwsm-"& sl*300 &"  where [id] ="&myid
			conn.execute sql
			msg="经过努力工作，有了收获<br/>宠物财富:上升"& sl*1100 &"<br/>宠物智力上升60.健康.生命:下降"& sl*300 &""	         	
		case "hzj"               
                  if cwrq<3800 then response.redirect"/bbs/cw/2.asp?sid="&sid&"&saytk="&saytk&""
			sql="update users set myjb=myjb+"& sl*1500 &",cwzs=cwzs+"& sl*70 &",cwrq=cwrq-"& sl*350 &",cwsm=cwsm-"& sl*350 &"  where [id] ="&myid
			conn.execute sql
			msg="经过努力工作，有了收获<br/>宠物财富:上升"& sl*1500 &"<br/>宠物智力上升70.健康.生命:下降"& sl*350 &""
                case "cjcf"               
                  if cwzs<30000 and cwrq<4000 and cwsm<4000 then response.redirect"/bbs/cw/3.asp?sid="&sid&"&saytk="&saytk&""
			sql="update users set myjb=myjb+"& sl*2000 &",cwzs=cwzs+"& sl*500 &",cwrq=cwrq-"& sl*800 &",cwsm=cwsm-"& sl*4000 &"  where [id] ="&myid
			conn.execute sql
			msg="经过努力工作，有了收获<br/>宠物财富:上升"& sl*2000 &"<br/>宠物智力上升500.健康.生命:下降"& sl*800 &""




           	              
		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>-
<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()%>



