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

📄 admin_url_delete.asp

📁 sfsfds设定方式分上述事实是事实是事实是事实是事实上
💻 ASP
字号:
<!--#include file="mdb.asp"-->
<%
if session("adminlogin")<>sessionvar then
Response.Write("<script language=javascript>alert('你尚未登录,或者超时了!请重新登录');this.location.href='admin_login.asp';</script>")
Response.End
End if
dim id
if Session("level")<2 then
	Call outcome("你的权限不足")
	Response.End
End if
id=request("id")
if id="" then
	Call outcome("非法操作")
	Response.End
end if
if request("action")="delete" then
	conn.execute "delete from O3888_website where id="&id
	Call outcome("删除网站成功")
	Response.End
end if
sql="select * from O3888_website where id="&id
set rs=conn.execute(sql)
if rs.eof and rs.bof then
	rs.close
	set rs=nothing
	Call outcome("无此网站")
	Response.End
else
	title=rs("title")
	url=rs("url")
	memo=rs("memo")
	classid=rs("classid")
	rs.close
	set rs=nothing
end if
sql="select * from O3888_class where classid="&classid
set rss=conn.execute(sql)
if rss.eof and rss.bof then
	rss.close
	set rss=nothing
	Call outcome("网站分类有误")
	Response.End
else
	classname=rss("classname")
	rss.close
	set rss=nothing
end if
%>
<LINK REL='stylesheet' HREF='css.css' TYPE='text/css'>
<table width='55%' border='0' cellspacing='1' cellpadding='8' align='center' class='a'><p> </p>
<tr>
<form action='admin_url_delete.asp?id=<%=id%>' method=post>
<td width='20%'>网站名称</td>
<td width='80%'><%=title%></td>
</tr>
<tr>
<td>网站地址</td>
<td><%=url%></td>
</tr>
<tr>
<td>所属分类</td>
<td><%=classname%></td>
</tr>
<tr>
<td>网站简介</td>
<td><%=memo%></td>
</tr>
<tr>
<td align='center' colspan="2"><input class='d' type='submit' value='删 除'>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input class='d' type="button" name="Submit4" value="返 回" class="a_input" onClick="history.back()"></td>
<input type='hidden' name='action' value='delete'>
</form>
</tr>
<tr>
<td align='center' colspan="2">[<A href='http://www.03888.com/' target=_blank>03888网址大全</A>]</td>
</tr>
</table>

⌨️ 快捷键说明

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