📄 gbook.asp
字号:
<!--#include file="../Inc/Conn.asp" -->
<!--#include file="Check.asp" -->
<%
action=Request("action")
if action="del" then
ID=Request("ID")
Conn.Execute("delete from GBook where ID="&ID)
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理页面</title>
<LINK href="style.css" type=text/css rel=stylesheet>
</head>
<body leftmargin=0 bottommargin=0 rightmargin=0 topmargin=0>
<script src="images/admin.js" type="text/javascript"></script>
<div class=menuskin id=popmenu
onmouseover="clearhidemenu();highlightmenu(event,'on')"
onmouseout="highlightmenu(event,'off');dynamichide(event)" style="Z-index:100"></div>
<div align=center>
<script language = JavaScript>
function showsetting(myform){
for (var j=0;j<7;j++){
var tab = eval('document.all.settable'+j);
if(myform.AdsType.selectedIndex==j)
tab.style.display = '';
else
tab.style.display = 'none';
}
}
</script>
<!--#include file="Top.asp" -->
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
<tr>
<th>客户留言管理</th>
</tr>
<tr><td class=BodyTitle colspan=2 height=23 style="FONT-SIZE: 9pt; FILTER: dropshadow(color=#FFFFFF,offx=1,offy=1); COLOR: #000000;"> </td>
</tr>
</table>
<BR>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
<tr>
<th noWrap> </th>
</tr>
<tr height="25">
<td align=center class=forumRow><%
Set rs=server.CreateObject("adodb.recordset")
rs.open "select * from Gbook Order by ID desc",Conn,1,1
do while not rs.eof
%>
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td height="22" align="right">客户名称：</td>
<td width="39%"> <%=rs("UserName")%>(<%=rs("Sex")%>)</td>
<td width="41%"><span style="color: #666666">留言时间：<%=rs("UpDateTime")%></span></td>
</tr>
<tr>
<td width="20%" height="22" align="right">留言主题：</td>
<td colspan="2"> <%=rs("Title")%></td>
</tr>
<tr>
<td height="22" align="right">联系电话：</td>
<td> <%=rs("Phone")%></td>
<td> </td>
</tr>
<tr>
<td height="22" align="right">联系地址：</td>
<td> <%=rs("Address")%> </td>
<td>Email: <%=rs("Email")%></td>
</tr>
<tr>
<td align="right" valign="top">信息：</td>
<td colspan="2"> <%=rs("Content")%></td>
</tr>
<tr>
<td height="22" colspan="3" align="center">操作： <a href="?action=del&ID=<%=rs("ID")%>" onClick="ASK()">[删除]</a></td>
</tr>
</table>
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> </td>
</tr>
</table>
<%
rs.movenext
loop
rs.close
Set rs=nothing
%></td>
</tr>
</table>
</div>
</body></html>
<script language="vbscript">
sub ASK()
if not confirm("您确定要删除这条信息吗？") then
window.event.returnvalue=false
exit sub
end if
end sub
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -