📄 post.asp

📁 一个专业的房地产门户网站
💻 ASP
字号:
<!--#include file="conn.ini"-->
<%
post_url=Request.ServerVariables("HTTP_REFERER")
server_url="http://"&Request.ServerVariables("SERVER_NAME")&Request.ServerVariables("url")&"?"&Request.ServerVariables("QUERY_STRING")
if post_url=server_url then
  Select Case request("post")
    Case "add"
	  set rs=server.createobject("adodb.recordset")
	  sql="select * from body"
      rs.open sql,conn,1,3
	  rs.addnew
	  rs("writer")=request("post_writer")
      rs("title")=request("post_title")
      rs("body")=request("post_body")
      rs.update
      rs.close
      set rs=nothing
      call connclose
	  session("writer")=request("post_writer")
      response.redirect "index.asp"
	Case "re_add"
      set rs=server.createobject("adodb.recordset")
      sql="select * from re"
      rs.open sql,conn,1,3
      rs.addnew
	  rs("post_id")=request("id")
      rs("writer")=request("post_writer")
      rs("title")=request("post_title")
      rs("body")=request("post_body")
      rs.update
      rs.close
      '刷新回复数
      sql="select * from body where id="&request("id")&""
      rs.open sql,conn,1,3
      rs("recount")=rs("recount")+1
      rs("lasttime")=now
      rs.update
      rs.close
      set rs=nothing
      call connclose
      '更新作者
      session("writer")=request("post_writer")
      '转到disp.asp页
      response.redirect "disp.asp?id="&request("id")&""
  end Select
end if
%>
<%
Select Case request("action")
  Case "add"
    writer=session("writer")
  Case "re_add"
    set rs=server.createobject("adodb.recordset")
	sql="select * from body where id="&request("id")&""
    rs.open sql,conn,1,3
	title="回复："&rs("title")
	writer=session("writer")
	rs.close
	set rs=nothing
	call connclose
end Select
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>留言</title>
<LINK href="style.css" rel=Stylesheet type=text/css>
</head>
<body leftmargin="0" topmargin="0">
<!--输入表单-->
<form name="form1" method="post" action="" onSubmit="return posting()">
  <table>
    <tr>
      <td colspan="2"><!--#include file="top.ini"--></td>
    </tr>
    <tr>
      <td>主题：</td>
      <td><input name="title" type="text" style="width:600" value="<%=title%>" maxlength="25"></td>
    </tr>
    <tr>
      <td width="50">作者： </td>
      <td width="601"><input name="writer" type="text" style="width:600" value="<%=writer%>" maxlength="8"></td>
    </tr>
	<%if session("board_admin")<>"" then%>
	<%else%>
	  <input type="hidden" name="top" value="false">
	<%end if%>
    <tr>
      <td>插入：</td>
      <td>
	    <input type="button" name="image" value="图片" onClick="insert('[IMG]http://[/IMG]')">
        <input type="button" name="url" value="链接" onClick="insert('[URL]http://[/URL]')">
        <input type="button" name="flash" value="Flash" onClick="insert('[FLASH=480,360]http://[/FLASH]')">
        <input type="button" name="real" value="Real" onClick="insert('[RM=480,360]http://[/RM]')">
        <input type="button" name="media" value="Media" onClick="insert('[MP=480,360]http://[/MP]')">
        <script language="JavaScript">
        <!--
        function insert(str)
        {
          form1.body.value+=str
        }
        //-->
        </script>
	  </td>
    </tr>
    <tr>
      <td valign="top">内容：</td>
      <td><textarea name="body" rows="10" style="width:600"><%=body%></textarea></td>
    </tr>
    <tr>
      <td valign="top">&nbsp;</td>
      <td>
	    <input type="submit" name="Submit" value="提交">
	    <input type="button" name="reset2" value="预览" onclick="test()">
        <input type="reset" name="Submit2" value="重置">
        <label id="msg"></label>
	  </td>
    </tr>
  </table>
</form>
<!--预览表单-->
<form name="form2" method="post" action="test.asp">
  <input type="hidden" name="test_title">
  <input type="hidden" name="test_writer">
  <input type="hidden" name="test_body">
</form>
<!--提交表单-->
<form name="form3" method="post" action="">
  <input type="hidden" name="post_title">
  <input type="hidden" name="post_writer">
  <input type="hidden" name="post_body">
  <input type="hidden" name="post" value="<%=request("action")%>">
</form>
<script language="JavaScript">
<!--
//预览
function test()
{
  form2.test_title.value=form1.title.value;
  form2.test_writer.value=form1.writer.value;
  form2.test_body.value=form1.body.value;
  form2.submit()
}
//提交
function posting()
{
  if(form1.title.value.replace(/\s/g,"")==""||form1.writer.value.replace(/\s/g,"")==""||form1.body.value.replace(/\s/g,"")=="")
  {
    document.all.msg.innerText = "错误：主题、作者、内容均不能为空！";
	return(false)
  }
  else
  {
    form1.Submit.disabled=true
    form3.post_title.value=form1.title.value;
    form3.post_writer.value=form1.writer.value;
    form3.post_body.value=form1.body.value;
    form1.reset();
    form3.submit();
	return(false)
  }
}
//-->
</script>
</body>
</html>
<script language = "JavaScript" src = "bottom.js"/></script>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -