user_add.asp

来自「综合测评.你自己看着办」· ASP 代码 · 共 53 行

ASP
53
字号
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!--#include file="session_1.asp"-->
<!--#include file="Connections/conn1.asp" -->
<%
if(String(Request("username")) != "undefined"){ cmd1__username1 = String(Request("username"));}
if(String(Request("userno")) != "undefined"){ cmd1__userno1 = String(Request("userno"));}
var classid1=String(Session("ranage"));
if(String(Request("userid")) != "undefined"){ cmd1__userid1 = String(Request("userid"));}
var rs2 = Server.CreateObject("ADODB.Recordset");
rs2.ActiveConnection = MM_conn1_STRING;
rs2.Source = "SELECT userid FROM user WHERE userid="+cmd1__userid1+"";
rs2.CursorType = 0;
rs2.CursorLocation = 2;
rs2.LockType = 1;
rs2.Open();
if(!rs2.EOF||!rs2.BOF)
   {Response.Write("<script language='javascript'>window.alert('系统忙,请稍后输入!');location=('myclass_user_list.asp');</script>");
    Response.End();
	}
if(rs2.EOF&&rs2.BOF)	
{
  var rs1 = Server.CreateObject("ADODB.Recordset");
  rs1.ActiveConnection = MM_conn1_STRING;
  rs1.Source = "SELECT userno FROM user WHERE userno='"+cmd1__userno1+"'";
  rs1.CursorType = 0;
  rs1.CursorLocation = 2;
  rs1.LockType = 1;
  rs1.Open();
 if(!rs1.EOF||!rs1.BOF)
   {Response.Write("<script language='javascript'>window.alert('该学号已被占用!添加失败!');history.go(-1);</script>");
    Response.End();
	}
  if(rs1.EOF&&rs1.BOF)
  {
   var cmd1 = Server.CreateObject("ADODB.Command");
   cmd1.ActiveConnection = MM_conn1_STRING;
   cmd1.CommandText = "INSERT INTO score (userid,userno,classid)  VALUES ('"+cmd1__userid1+"','"+ cmd1__userno1 + "','"+classid1+"') ";
   cmd1.CommandType = 1;
   cmd1.CommandTimeout = 0;
   cmd1.Prepared = true;
   cmd1.Execute();
   cmd1.CommandText = "INSERT INTO user (userid,userno,username,userpsd,classid)  VALUES ('"+cmd1__userid1+"','"+cmd1__userno1+"','"+cmd1__username1+"','"+cmd1__userno1+"','"+classid1+"') ";
   cmd1.CommandType = 1;
   cmd1.CommandTimeout = 0;
   cmd1.Prepared = true;
   cmd1.Execute();  
   Response.Write("<script language='javascript'>window.alert('添加成功');location=('myclass_user_list.asp');</script>");
   }
  rs1.Close();
}
rs2.Close();
%>

⌨️ 快捷键说明

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