<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->


<%
    vname=request("vname")
    MoKuai=request("MoKuai")
	shiyong=request("shiyong")
	if shiyong="不使用" then 
	    abc="使用"
	else
	    abc="不使用"
	end if 
	
	
	set rs=server.createobject("adodb.recordset")
	Rssavesql="update varset set vname1='"&abc& "'  where (name ='"&vname&"') AND (vname  ='"&MoKuai&"')"
	   rs.open Rssavesql,conn,1,1
	   rs.close 
	   set rs=nothing  
	   conn.close
	   set conn=nothing


 
	 
	 
	 
  response.redirect    "setMoKuai.asp?name="&vname
 %>
 