📄 member_del.asp
字号:
<!--#include file="../inc/Config.asp"-->
<%
Dim Language
delid=Request("delid")
if delid="" then
response.Redirect(request.servervariables("HTTP_REFERER"))
response.End
end if
%>
<!--#include file="../inc/conn.asp"-->
<%
errorstr="<center>已经成功删除您所选<a href='Member_Admin.asp'>返回</a></center>"
sql="select * from Members where id in (" & delid & ")"
set rsdel=createobject("adodb.recordset")
rsdel.open sql,conn,1,3
while not rsdel.eof
rsdel.delete
rsdel.update
rsdel.movenext
wend
rsdel.close
set rsdel=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link href="css_admin.css" rel="stylesheet" type="text/css">
</head>
<body>
<% response.write errorstr %>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -