saveguestbookadd1.asp

来自「一个功能很全面占用空间的小商城程序,适合个人网上开店使用」· ASP 代码 · 共 32 行

<!-- #include file="conn.asp"-->
<%user_company=Request("user_company")
if Request("userName")="" or Request("title")="" or Request("content")="" then
	response.write "禁止恶意使用程序。"
	response.End
end if
       Set cmdTemp = Server.CreateObject("ADODB.Command")
       Set InsertCursor = Server.CreateObject("ADODB.Recordset")
       cmdTemp.CommandText = "SELECT top 1 * FROM userbook order by id desc"
       cmdTemp.CommandType = 1
       Set cmdTemp.ActiveConnection = conn
       InsertCursor.Open cmdTemp, , 1, 3
       InsertCursor.addnew 
       InsertCursor("user_company") =Request("user_company")
       InsertCursor("userName") =Request("userName")
       InsertCursor("email") =Request("email")
       InsertCursor("homepage") =Request("homepage")
       InsertCursor("title") =Request("title")
       InsertCursor("content") =Request("content")
       InsertCursor.Update
       InsertCursor.close
	   conn.close
       set InsertCursor=nothing
       set conn=nothing

%>
<script language=Javascript>
<!--
alert("添加成功！");
window.location="guestbook1.asp?user_company=<%=user_company%>"
//-->
</script>