user_delx.asp

来自「企业员工年度综合评测系统 Access(V1.060118)版」· ASP 代码 · 共 52 行

ASP
52 行
字号 
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!--#include file="forbidon.asp" -->
<!--#include file="conn.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<link href="../imag/cs.css" rel="stylesheet" type="text/css" />
</head>

<body>
<!--#include file="top.asp" -->
<table width="80%" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="atable">
  <tr>
    <td bgcolor="#FFFFFF">
	<% 
    /*/Response.Write("<script language='javascript'>if(confirm('真的要删除该用户和其所有的数据吗?')==true) {} else                     {window.alert('您没有删除该用户！');history.go(-1);}</script>")*/
    %>
<%
if(String(Request("nameid")) != "undefined"){ Command1__nameid1 = String(Request("nameid"));}
%>
<%
var Command1 = Server.CreateObject("ADODB.Command");
Command1.ActiveConnection = MM_conn_STRING;
 {
  Command1.CommandText = "DELETE FROM all_user  WHERE nameid ="+ Command1__nameid1 + "";
  Command1.CommandType = 1;
  Command1.CommandTimeout = 0;
  Command1.Prepared = true;
  Command1.Execute();
  }
 {
   Command1.CommandText = "DELETE FROM score  WHERE nameid="+ Command1__nameid1+ " OR fromnameid="+ Command1__nameid1+ "";
   Command1.CommandType = 1;
   Command1.CommandTimeout = 0;
   Command1.Prepared = true;
   Command1.Execute();
  }
  
{Response.Write("<script language='javascript'>window.alert('已成功删除！');location=('main.asp');</script>");
 Response.End();
}  
  %>
 </td>
 </tr>
</table>

</body>
</html>

user_delx.asp - 源码说明

本页面展示了「企业员工年度综合评测系统 Access(V1.060118)版」中的 user_delx.asp 源码文件，采用 ASP 编程语言编写，共 52 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与Access相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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