<!--#include file="conn.asp"-->
<!--#include file="islogin.asp"-->
  <%
     ReID=request("Reid")
     re=request("re")
     ReMemberID=session("MemberID")
     ReMember=session("Member")
     page=request("page")
	 
	if re="" then 
    response.Write"<script language=Javascript>alert('留言內容不能為空！');" 
    response.write"javascript:history.go(-1)</script>" 
    response.end 
    end if
	 
      if ReMember="" and ReMemberID="" then
      response.write "<script>alert('請重新登錄！');history.go(-1);</script>"
	  response.End()
      end if
	  
     set rs=server.createobject("adodb.recordset")
     sql="select * from BBSre where (id=null)"
     rs.open sql,conn,1,3
	 rs.addnew
    rs("ReID")=ReID
    rs("ReMemberID")=ReMemberID
    rs("ReMember")=ReMember
    rs("re")=re
    rs("retime")=now
    rs.update
    rs.close
    set rs=nothing
    conn.close
    set conn=nothing
    response.redirect "BBSList.asp?page="&page&"&id="&ReID&""
 %>