📄 adminloginerr.asp

📁 体育商城

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/conn.asp" -->
<%
Dim Recordset1__MMColParam
Recordset1__MMColParam = "1"
if (Session("mm_username") <> "") then Recordset1__MMColParam = Session("mm_username")
%>
<%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_conn_STRING
Recordset1.Source = "SELECT *  FROM admin inner join adminlevel on  admin.adminlevel=adminlevel.adminlevel  WHERE admin = '" + Replace(Recordset1__MMColParam, "'", "''") + "'"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open()
Recordset1_numRows = 0
%>

<html>
<head>
<title>增加管理员</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript">
<!--
function MM_popupMsg(msg) { //v1.0
  alert(msg);
}
//-->
</script>
<link rel="stylesheet" href="ddd.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!--#include file="manage.asp" -->
<!--#include file="top.asp" -->
<div align="center"></div>
<table width="771" border="0" cellspacing="0" cellpadding="0" align="center" class="bk">
  <tr> 
    <td height="93"> 
      <div align="center"><br>
        <b><font size="2">您没有这个权利管理。您只是<font color="#FF0000"><%=(Recordset1.Fields.Item("levelsm").Value)%></font>，如果您要管理其他项目可以<a href="adminlogin.asp">重新登录</a>！！</font><br>
        </b></div>
      <p align="center">&nbsp;</p>
      <p align="center">&nbsp;</p>
    </td>
  </tr>
</table><br>
<!--#include file="bottom.asp" -->
</body>
</html>
<%
Recordset1.Close()
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -