📄 del.asp
字号:
<%@ Language=VBScript %>
<!--#INCLUDE FILE="conn.asp" -->
<!--#INCLUDE FILE="config.asp" -->
<%
Set rs10= Server.CreateObject("ADODB.Recordset")
sql0="select * from admin where id=1"
rs10.open sql0,conn,1,3
admin=rs10("admin")
password=rs10("password")
user=trim(request("username"))
passwd=cstr(Request("password"))
if passwd=password and user=admin then
rs10.close
dim sql
dim rs
set rs=server.createobject("adodb.recordset")
sql="delete from enet where gbookid="&request("gbookid")
rs.open sql,conn,1,1
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect "index.asp"
else
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>...::删除留言:::...</title>
<style>
<!--
table,td{font:9pt "宋体";color:#999999}
.td{font:9pt "宋体";line-height:150%}
A{ COLOR: #ce0000; TEXT-DECORATION: none }
A:hover{ COLOR: #ce0000; TEXT-DECORATION:underline }
.input{ border-top:1 solid #efefef;border-left:1 solid #efefef;background:#ffffff;font:9pt;color:#ce0000;height:18px }
-->
</style>
</head>
<body bgcolor="#FFFFFF">
<p align="center"><font color="#FF0000">+ + + + + + 管 理 员 删 除 留 言 + + + + + +</font></p>
<form method="POST" action="del.asp?gbookid=<%=request("gbookid")%>">
<table width="300" border="1" cellspacing="0" cellpadding="1" align="center"
bordercolordark="#ecf5ff" bordercolorlight="#c0c0c0">
<tr>
<td><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td width="33%" align="right" height="30">用户名：</td>
<td width="67%">
<input name="username" maxlength="20" class="input" size="20">
</td>
</tr>
<tr>
<td width="33%" align="right" height="30">密 码：</td>
<td width="67%">
<input type="password" name="password" maxlength="16" class="input"
size="20">
</td>
</tr>
<tr>
<td colspan="2" height="15" align=center><input type="submit" value="提交" name="B1"> <input type="reset" value="全部重写" name="B2"></td>
</tr>
</table>
</td>
</tr>
</table>
</form>
<table width="750" border="0" cellspacing="2" cellpadding="1" align="center">
<tr>
<td align="center" class="td">版权所有:咖啡设计 设计制作:何必成<br>
Copyright (C)2001 - 2002 CoffeeDesign.126.com Co.,Ltd. All rights reserved.
</td>
</tr>
</table>
</body>
</html>
<% end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -