⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 bs_admin.asp

📁 ChinaWeb标准企业网站管理系统 V3.01
💻 ASP
字号:
<!--#include file="bsconfig.asp"-->
<!--#include file="zcm.asp"-->
<%
'=========================================================
'
' 产品名称:良精集团软件科技 公司(企业)网站管理系统(简称:liangjing.net)
' 版权所有:liangjing.net
' 程序制作:liangjing开发团队
' 联系方式:QQ 2113269
' Copyright 2004-2005 liangjing.net - All Rights Reserved. 
'
'========================================================
%>
<%
zj=replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(left(replace(Request.ServerVariables("SERVER_NAME"),"www.",""),6),"0","a"),"1","b"),"2","c"),"3","d"),"4","e"),"5","f"),"6","g"),"7","h"),"8","i"),"9","j"),"a","40"),"b","41"),"c","52"),"d","53"),"e","64"),"f","65"),"g","76"),"h","77"),"i","88"),"j","89"),"k","20"),"l","21"),"m","22"),"n","23"),"o","24"),"p","25"),"q","26"),"r","27"),"s","28"),"t","29"),"u","30") ,"v","31") ,"w","32") ,"x","33") ,"y","34") ,"z","35") ,"-","36") ,".","37")
yzcv=zj*(len(zj)+len(zcn&"bossiWebMIB"))
Do While yzcv>10000000000
yzcv=yzcv-10000000000
loop
if yzcv<>zcv then
response.write chr(60)&chr(98)&chr(62)&chr(60)&chr(102)&chr(111)&chr(110)&chr(116)&chr(32)&chr(99)&chr(111)&chr(108)&chr(111)&chr(114)&chr(61)&chr(35)&chr(70)&chr(70)&chr(48)&chr(48)&chr(48)&chr(48)&chr(62)&chr(-19219)&chr(-12557)&chr(-23622)&chr(-19508)&chr(-12046)&chr(-13872)&chr(-12620)&chr(-10334)&chr(-19743)&chr(44)&chr(-19253)&chr(-18010)&chr(-15140)&chr(-19781)&chr(-15140)&chr(-13639)&chr(-11325)&chr(33)&chr(60)&chr(47)&chr(102)&chr(111)&chr(110)&chr(116)&chr(62)&chr(60)&chr(47)&chr(98)&chr(62)
response.end
end if
%>
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from Bs_Admin"
rs.open sqltext,conn,1,1
%>
<!-- #include file="Inc/Head.asp" -->
<script language="javascript">
function confirmdel(id){
if (confirm("真的要删除此管理员帐号?"))
window.location.href="Bs_Admin_Del.asp?id="+id+"  "   }
</script>

<SCRIPT language=javascript id=clientEventHandlersJS>
<!--
function form1_onsubmit()
{
if (document.FORM1.pwd1.value!=document.FORM1.pwd2.value)
{
alert ("请确认您的密码。");
document.FORM1.pwd1.value='';
document.FORM1.pwd2.value='';
document.FORM1.pwd1.focus();
return false;
}
}


//-->
</SCRIPT>
<BR>
<table cellpadding="2" cellspacing="1" border="0" width="560" align="center" class="a2">
	<tr>
		<td class="a1" height="25" align="center"><strong>添加管理员</strong></td>
	</tr>
	<tr class="a4">
		<td align="center">
      <FORM language=javascript name=FORM1  onsubmit="return form1_onsubmit()" action="Bs_Admin_Add.asp" method=post>
			<table width="50%" border="0" align="center" cellpadding="0" cellspacing="2">
				<tr> 
					<td height="25" colspan="2">&nbsp;</td>
				</tr>
				<tr> 
					<td width="29%" height="22"> <div align="right">管理员帐号:</div></td>
					<td width="71%"><input type="text" name="UserName" size="16" maxlength="20"></td>
				</tr>
				<tr> 
					<td height="22"> <div align="right">身  份:</div></td>
					<td><input type="text" name="realname" size="16" maxlength="20"></td>
				</tr>
				<tr> 
					<td height="22"> <div align="right">管理员密码:</div></td>
					<td><input type="text" name="pwd1" size="16"></td>
				</tr>
				<tr> 
					<td height="22"> <div align="right">密码确认:</div></td>
					<td><input type="text" name="pwd2" size="16"></td>
				</tr>
				<tr> 
					<td height="22" colspan="2"><div align="center"><INPUT type=submit value='确认添加' name=Submit2></div></td>
				</tr>
			</table>
      </form>
		</td>
	</tr>
</table>
<BR>
<BR>
<table cellpadding="2" cellspacing="1" border="0" width="560" align="center" class="a2">
	<tr>
		<td class="a1" height="25" align="center"><strong>管理员帐号管理</strong></td>
	</tr>
	<tr class="a4">
		<td align="center">
			<FORM language=javascript action="Bs_Admin_Add.asp" method=post>
			<table width="550" border="0" align="center" cellpadding="0" cellspacing="2">
				<tr> 
					<td width="20%" height="25" bgcolor="#C0C0C0"> <div align="center">管理员帐号</div></td>
					<td width="20%" bgcolor="#C0C0C0"> <div align="center">身  份</div></td>
					<td width="20%" bgcolor="#C0C0C0"> <div align="center">管理员密码</div></td>
					<td width="20%" bgcolor="#C0C0C0"> <div align="center">操作</div></td>
					<td width="20%" bgcolor="#C0C0C0"> <div align="center">删除</div></td>
				</tr>
<%
if not rs.eof then
do while not rs.eof
%>
				<tr> 
					<td height="22" bgcolor="#E3E3E3"> <div align="center"><%=rs("UserName")%></div></td>
					<td bgcolor="#E3E3E3"><div align="center"><%=rs("realname")%></div></td>
					<td bgcolor="#E3E3E3"><div align="center"><%=decrypt(rs("PassWord"))%></div></td>
					<td bgcolor="#E3E3E3"><div align="center"><%response.write "<a href='Bs_AdminPass_Edit.asp?ID="&rs("Id")&"'  >修改密码</a>"%></div></td>
					<td bgcolor="#E3E3E3"><div align="center"><%response.write "<a href='javascript:confirmdel(" & rs("Id") & ")'>删除</a>"%></div></td>
				</tr>
<%
rs.movenext
loop
end if
%>
<%
rs.close
conn.close
%>
			</table>
			</form>
		</td>
	</tr>
</table>
<BR>
<%htmlend%>

⌨️ 快捷键说明

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