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


<%   strId=request("id") 
    vid=request("vid")
    tname=request("tname")
  
	vname1=request("vname1")
	vname2=request("vname2")
	vname3=request("vname3")
	vname4=request("vname4")
    vname5=request("vname5")
	vname6=request("vname6")
     
    
set Rssave=server.createobject("adodb.recordset")
Rssavesql="select * from varlong where  id='"&strId& "'"
Rssave.open Rssavesql,conn,1,3

    Rssave("vid")=vid
    	
   
    Rssave("name")=tname
   
    Rssave("vname1")=vname1
	Rssave("vname2")=vname2
    Rssave("vname3")=vname3
	Rssave("vname4")=vname4
	Rssave("vname5")=vname5
	Rssave("vname6")=vname6
	 
    Rssave.update


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

<%=strId%>
<%=tname%>