message_input_result.asp

来自「一个修改过的ASP学籍管理系统,用javascript+ado写的」· ASP 代码 · 共 63 行

ASP
63
字号
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<%
var NiCheng;
var ZhuTi;
var NeiRong;
var Rs;
var CmdText;
var myyear; 
var year;
var month;
var day;
mydate=new Date();
myyear= mydate.getYear();
month=mydate.getMonth()+1;
day= mydate.getDate();
year=(myyear>200)?myyear:1900+myyear;
NiCheng=Request.Form("NiCheng");
ZhuTi=Request.Form("ZhuTi");
NeiRong=Request.Form("Text");
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="INSERT INTO message VALUES('"+NiCheng+"','"+ZhuTi+"','"+year+"\\"+month+"\\"+day+"','"+NeiRong+"')";
	   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_show.asp");
		}
   }
Rs.Close();
Rs=null;
Conn.Close();
Conn=null;
%>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?