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


<%   
    vid=request("vid")
    tname=trim(request("tname"))
    mingcheng=request("vmingcheng")
	wangzhi=request("vwangzhi")
    vname="<a href="""&wangzhi&""" target=""_blank"" class=""STYLE4"">"&mingcheng&"</a>"
    
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   "setindexLink.asp?tname="&tname
%>


