postedit.asp

来自「网易论坛 发表新贴子」· ASP 代码 · 共 26 行

<!--#include file="opendb.asp"-->
<%
  
  ID=request.Form("id") 
  title=request.Form("title")
  content=request.Form("content")
  
  answertime=date()+time()
  
  StrSql ="Update Forum Set Title="& "'" & title &"'Where ID="& ID
  
  my_conn.Execute StrSql 
  
  StrSql ="Update Forum Set Content="& "'" & content &"'Where ID="& ID 
  my_conn.Execute StrSql
  
  StrSql ="Update Forum Set CreateTime="& "'" & answertime &"'Where ID="& ID   
  my_conn.Execute StrSql
%>
<!--#include file="closedb.asp"-->
  <script language=vbscript>
     msgbox "帖子已更新",48,"更新成功" 
     window.location="index.asp" 
  </script>