saveserver.asp

个人备忘系统一个不错的备忘软件.专供刚学ASP的人学习. 代码简单易懂 mymanage

<!--#include file="conn.asp"-->
<%
set rs=server.CreateObject("adodb.recordset")
title=request.Form("title")
all=request.Form("all")
types=request.Form("types")

if types="" or types=0 then     '判断是否非法提交问题或没有选择问题类型
response.write("<script>alert('请选择问题类型！');window.location.href('addserver.asp')</script>")
response.end
end if
cmd="select * from question "
rs.open cmd,conn,1,3

rs("title")=title
rs("all")=all
rs("type")=types
rs.update
rs.close
conn.close
response.write("<script>alert('保存问题成功！');window.location.href('addserver.asp')</script>")

%>