save_tousu.asp

来自「asp游戏点卡销售系统,基本东西,代码+实现」· ASP 代码 · 共 32 行

<!--#include file="conn.asp"-->
<% 
Set rs = Server.CreateObject("ADODB.Recordset") 
sql = "SELECT * FROM tousu" 
rs.open sql, conn, 3, 3 
 
title=trim(request.form("title")) 
body=trim(request.form("body")) 
if title="" or body=""  then 
response.write"<script language='javascript'>alert('请填写完整信息')</script>" 
response.write "<script language='javascript'>window.location='tousu.asp'</script>" 
response.end 
else 
 
 
rs.addnew 
rs("title")=title 
 rs("body")=body 
 rs("riqi")=now() 
 
rs.Update 
  response.write"<script language='javascript'>alert('提交成功')</script>" 
response.write "<script language='javascript'>window.location='tousu.asp'</script>" 
end if 
%>