save_pinglun.asp

日记本（多用户版）V3.0 主要功能： 1、日记本基本功能：添加、修改日记等。 2、日记加密：当日记添加时

<!--#include file="conn.asp"-->

<%
'=========================================================
' 随然日记本（多用户版） Version:3.0
' Date: 2004-11-15
' Script Written by 随然(dampure)
' 随然日记本演示地址：http://www.suiran.cn
'=========================================================
' Copyright (C) 2003,2004 真露无香. All rights reserved.
' Web: www.yongzi.com
' Diary:http://www.suiran.cn
'=========================================================

   diaryid=request("diaryid")
   content=request("content")


   if  session("username")="" or content="" then 
%>
<script language=vbscript>
  MsgBox "呵呵~~~！想干吗呢？ 您还没有登陆或者登陆超时；或者该日记主人已经关闭日记评论功能，或者你发表的评论内容为空，无法发表评论！"
  location.href = "javascript:history.back()"
</script>
<%
   else
   
set rs=server.createobject("ADODB.recordset") 
rs.Open "SELECT * FROM say Where sayid is null",conn,1,3 
rs.addnew
rs("content")=content
rs("diaryid")=diaryid
rs("postuser")=session("username")
rs("date")=now()

rs.update 
rs.close 

   str="update diary set saynum=saynum+1 where id="&diaryid
   conn.execute(str)
   response.redirect "show_diary.asp?id="&diaryid
   end if
%>