sc.asp

来自「较完善的一个程序」· ASP 代码 · 共 24 行

<!--#include file="conn.inc"-->
<%
if session("artech")="" then
%>
<script language="JavaScript" type="text/JavaScript">
alert("为了便于和您联系，只有加入会员并登录后方可提交评论信息，请在页面上方登录。")
history.go(-1)
</script>
<%
  else
   goodsid=request("id")
   userid=session("id")
   set rs=server.createobject("adodb.recordset")  
   rs.open "select * from shop_sc",conn,1,3
   rs.addnew
   rs("userid")=userid
   rs("goodsid")=goodsid
   rs("adddate")=now()
   rs.update
   rs.close
   response.write"<SCRIPT language=JavaScript>alert('添加成功!');"
   response.write"this.location.href='books6.asp';</SCRIPT>" 
  end if
%>