📄 message_delete.asp

📁 一个修改过的ASP学籍管理系统,用javascript+ado写的

💻 ASP

字号:

<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<%
var NiCheng;
var Rs;
var CmdText;
NiCheng=Request.QueryString("nicheng");
Rs=Server.CreateObject("ADODB.Recordset");
Rs.ActiveConnection=Conn;
Rs.CursorLocation=3;
Rs.Source="SELECT * FROM message WHERE 昵称='"+NiCheng+"'";
Rs.Open();
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>留言删除</title>
</head>
<body>
<%
if(Rs.EOF)
  {
      Response.Write("<div align=center><font size='6' color='#ff0000'>数据库错误，请联系管理员！</font></div>");
  }
else
  {
      CmdText="DELETE FROM message WHERE 昵称='"+NiCheng+"'";
	  Conn.Execute(CmdText,0,0);
	   if(Conn.Errors.Count>0)
         {
             Response.Write("<div align=center><font size='6' color='#ff0000'>系统发生"+Conn.Errors.Count+"个错误！</font></div>");
         }
       else
        {
             Rs.Close();
             Rs=null;
             Conn.Close();
             Conn=null;
             Response.Redirect("message_manage_show.asp");
		}
  }
Rs.Close();
Rs=null;
Conn.Close();
Conn=null;
%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -