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

📄 delprofilelist.asp

📁 1 除掉了 时间 限制 2 除掉了 人数 限制 改为 500人 原为5人 3 发现一点小缺陷 增加人员的时候没有判断 登陆名是否重复! 自己写吧~~~:) 4 又 是一点缺陷
💻 ASP
字号:
<SCRIPT language='javascript'>window.resizeTo(350,250);window.focus()</SCRIPT>
<!--#include file="../config.ini" -->
<!--#include file="../commfunction.inc" -->
<%
Dim objcheck
Set objcheck=Server.CreateObject("SmartSales.CheckFunction")
objcheck.CheckUserFunction "profile","del"
set objcheck=nothing

if  Request("Mod") = "Delete" then
	dim conn
	dim rs
	set conn=server.CreateObject("adodb.connection")
	set rs=server.CreateObject("adodb.recordset")
	conn.Open connstring
		if request("ProFileListid")<>"" then
			set rsq=conn.execute("select count(*) AS andidcount from ProFileList where andid="&request("ProFileListid"))
				if cint(rsq("andidcount"))<>0 then
					response.write "<br><br><br><LINK href='../global.css' rel=stylesheet type=text/css>"
					response.write "<title>删除提示!</title>"
					response.Write "<div align=center>"
					response.Write "<FONT SIZE=2 class=title>"
					response.write "<img src=../images/jg.gif>"
					response.write "有下级菜单或内容,请先删除!"
					response.Write "<br><br>"
					response.write "<img src=../images/button_close.gif style=cursor:hand border=0 language=javascript onclick=window.close();>"
					response.write "</div>"
					response.end
				end if
			rs.Open "delete from ProFileList where ProFileListid="&request("ProFileListid"),conn,2,3,1
			rs.Open "delete from images where linkid="&request("ProFileListid"),conn,2,3,1
		end if

	set rs=nothing
	conn.Close 
	set conn=nothing 
		%>
<script language=javascript>
	window.opener.location.reload();
	window.close();
</script>		
<%	
end if
%>
<title>删除</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<Link href="../global.css" rel=stylesheet type=text/css>
<Script Language="javascript" >
function dosub()
{
	 form1.Mod.value = "Delete" ;
		form1.submit();
}    
</Script>
</head>
<body bgcolor="#FFFFFF" text="#000000" >
<form method="post"  id=form1 name=form1>
  <input type=hidden name="Mod" >
  <table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="FFFFFF">
    <tr height=50>
    <td class=title><div align="center">确信要删除吗?</div></td>
    </tr>
    <tr>
        <td align="center">
		<a onclick="return dosub()"><img src="../images/button_confirm.gif" style="cursor:hand"></a>&nbsp;	
        <img src="../images/button_cancel.gif" style="cursor:hand" border=0 language=javascript onclick="window.close();"> 
        </td>
    </tr>
    </table>  
  </form>
</body>
</html>

⌨️ 快捷键说明

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