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


<%   strId=request("id") 
    vid=request("vid")
    tname=request("tname")
    vname=request("vname")


set Rssave=server.createobject("adodb.recordset")
Rssavesql="select * from varset where  id='"&strId& "'"
Rssave.open Rssavesql,conn,1,3
  
	Rssave("vid")=vid
    Rssave("vname")=vname
    Rssave.update


Rssave.close
response.redirect   "setvar.asp?tname="&tname
%>


