admin_saveterm.asp

来自「学校成绩查询系统是一个非常好的软件请大家试试」· ASP 代码 · 共 19 行

<!--#include file="Admin_IsLogin.asp" -->
<!--#include file="dataconn.asp"-->
<%
  dim tname
  tname=trim(request.form("tname"))
  if tname="" or len(tname)>20 then
  Response.Write "<script>alert(""学期名不能为空且在20个字符以内!"");window.location='Javascript:history.back()';</script>"
  response.end
  end if
  set rs=conn.execute("select tid from term where tname='"&tname&"'")
if not(rs.eof and rs.bof) then
Response.Write "<script>alert(""该学期名称已存在!"");window.location='Javascript:history.back()';</script>"
response.end
set rs=nothing
else
      conn.execute("insert into term(tname) values('"&tname&"')")
      Response.Write "<script>alert(""添加学期成功!"");window.location='test_term.asp';</script>"
  end if
%>