📄 save_link_app.asp
字号:
<!-- #include file="link_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%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -