<% option explicit %>
<!-- #include file="odbcconn.asp"-->
<html>
<head>
<title>欢迎使用留言板</title>
<link rel="stylesheet"href="says.css">
<script language="javascript">
<!--
function check_null(){
if(document.form1.title.value==""){
alert("主题不能为空！");
return false;
}
if(document.form1.name.value==""){
alert("主题不能为空！");
return false;
}
return true;
}
//-->
</script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><style type="text/css">
<!--
body {
background-color: #999999;
}
-->
</style></head>
<body>
<h2 align="center">留言板<h2>
<center>
<table border="1"width="80%" cellspacing="0" bordercolorlight="#000000" bordercolordark="#ffffff" cellpadding="0" height="114">
<tr bgcolor="#6699CC">
<td>
<table width="100%" border="0" bgcolor="#666666">
<form method="post" action="add.asp"name="form1"onsubmit="javascript:return check_null();">
<tr><td><font color=while>主题:</font></td><td><input type="text" name="title" size="60"><font color="white">* *</font></td></tr>
<tr><td><font color=while>内容:</font></td><td><textarea name="body" rows="4" cols="60" WRAP="soft"></textarea> </td></tr>
<tr><td><font color=while>姓名:</font></td><td><input type="text" name="name" size="10"><font color="white">* *</font></td></tr>
<tr><td><font color=while>email:</font></td><td><input type="text" name="email" size="60"></font></td></tr>
<tr><td></td><td><input Type="submit"VALUE="提交">
<input Type="reset"VALUE="重写"></td></tr>
</form>
</table>
</td>
</tr>
</table>
<p>
</CENTER>
<%
dim Sql,rs
Sql="SELECT guest_id,title,body,name,email,submit_date FORM guest"
Sql=Sql+"order by submit_date desc,guest_id desc"
SET rs=db.execute(Sql)
If Not rs.bof And Not rs.eof then
%>
<CENTER>
<table border="0" bordercolor="#8800FF" width="80%">
<%
DO WHILE NOT RS.EOF
%>
<tr>
<td colspan="2"><hr></td>
</tr>
<tr>
<td width=20%>主题</td>
<td><%=rs("title")%></td>
</tr>
<tr>
<td>内容</td>
<td><%=rs("body")%></td>
</tr>
<tr>
<td>留言人</td>
<td><a
href="mailto:<%=rs("email")%><%=RS("name")%></a></td>
</tr>
<tr>
<td>时间</td>
<td><%=rs("submit_date")%></td>
</tr>
<tr>
<td></td>
<td><ahref="delete.asp?guest_id=<%=rs("guest_id")"
%>
删除</a></td>
</tr>
<%
RS.MOVENEXT
LOOP
rs.close
db.close
%>
</table>
</CENTER>
<%end if %>
</body>
</html>
您所在位置：
T台风F
[专家分：0] 发布于 2007-06-08 14:45:00 
