www.gusucode.com > cso中国seo优化html整站源码程序 > links/save.asp

    <!--#include file="../include/conn.asp"-->
<!--#include file="../include/fun.asp"-->
<%
response.ContentType = "text/html;charset=gb2312"

vcode1 = request.form("vcode")
vcode2 = session("vcode")

if vcode1 = "" or vcode2 = "" or vcode1 <> vcode2 then
	session("vcode") = ""
	call alert("非法操作！111","/")
	response.end()
end if

act = request.querystring("act")
select case act
	case "link"
		call savelink()
	case else
		call alert("非法操作！222","/")
end select

'savelink
sub savelink()
sql = "select * from so_article"
rs.open sql,conn,2,2
rs.addnew
	rs("typestr") = "links"
	rs("title") = trim(request.form("title"))
	rs("url") = trim(request.form("url"))
	rs("pic_min") = trim(request.form("pic_min"))
	rs("page_description") = request.form("page_description")
rs.update
rs.close
call alert("链接已经提交，我们会在24小时内审核！","/links/")
end sub


set rs = nothing
call closeconn()
%>