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


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


set Rssave=server.createobject("adodb.recordset")
Rssavesql="select * from varset where (id is null)" 
Rssave.open Rssavesql,conn,1,3
    Rssave.addnew
	Rssave("vid")=vid
    Rssave("name")=tname
    Rssave("vname")=vname
    Rssave.update


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


