<!--#include file="conn.asp"-->
<title></title>
<body scroll="no" marginwidth="0" leftmargin="0" topmargin="0">
<%
user=request.form("user")
tel=request.form("tel")
email=request.form("email")
site_name=request.form("site_name")
logo=request.form("logo")
url=request.form("url")
if user="" or email="" or site_name="" or logo="" or url="" or tel="" then%>
<script language=Javascript>
<!--
alert("注意:没有填写完整！")
window.history.go(-1);
-->
</script>				  
<%
else
dim sql
       Set sql = Server.CreateObject("ADODB.Command")
       Set rs = Server.CreateObject("ADODB.Recordset")
       sql.CommandText = "SELECT top 1 * FROM link order by id desc"
       sql.CommandType = 1
       Set sql.ActiveConnection = conn
       rs.Open sql, , 1, 3
       rs.addnew 
rs("user") =Request.form("user")
rs("tel") =Request.form("tel")
rs("email") =Request.form("email")
rs("site_name") =Request.form("site_name")
rs("link_class") =Request.form("link_class")
rs("logo") =Request.form("logo")
rs("url") =Request.form("url")
       rs.Update
%>
<script language=Javascript>
<!--
alert("添加成功,我们将尽快验证您的网站并通过邮箱通知您！");
window.close()
-->
</script>
<%
       rs.close
	   conn.close
       set rs=nothing
       set conn=nothing
%>
<%end if%>