📄 display.asp
字号:
<!--#include file="conn.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>:::网上答疑:::</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="css.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR>
<script language="javascript">
function confirmDel(id){
if ( confirm("你确定要删除吗?")) {
window.location.href = "delmessage.ASP?id=" + id
}
}
</script>
</HEAD>
<BODY leftMargin=0 topMargin=0
marginheight="0" marginwidth="0">
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center border=0>
<TBODY>
<TR>
<TD vAlign=top width=778 background=images/02.jpg height=138>
</TD>
</TR>
<TR>
<TD vAlign=top>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR vAlign=top>
<TD width="18%">
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD background=images/07.jpg>
<TABLE cellSpacing=0 cellPadding=0 width=184 border=0>
<TBODY>
<TR>
<TD><IMG height=353 src="images/03.jpg"
width=183 useMap=#Map border=0 href="bmwd.htm"> </TD>
</TR>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width=182 border=0>
<TBODY>
<TR>
<TD><IMG height=6 src="images/04.jpg"
width=183></TD></TR>
<TR>
<TD background=images/05.jpg>
<TABLE cellSpacing=0 cellPadding=0 width="100%"
border=0>
<TBODY>
<TR>
<TD width=10> </TD>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width="100%"
border=0>
<TBODY>
<TR>
<TD vAlign=top height=252> </TD>
</TR></TBODY></TABLE></TD>
<TD
width=10> </TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD><IMG height=9 src="images/06.jpg"
width=183></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
<TD width="82%">
<%
on error resume next
set rs=server.createobject("adodb.recordset")
sql="select * from table_dayi where id="&cstr(request("id"))
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<script>alert('对不起,该信息并不存在,请返回!');window.close();</Script>"
response.end
else
%>
<%
if session("iamcoming")="" then
if rs("dayi_isreply")=0 then
response.write "<script>alert('对不起,该信息并不存在,请返回!');window.close();</Script>"
response.end
End If
end if
%>
<TABLE width="558" cellSpacing=1 cellPadding=6 align=centerborderColorLight=#c0c0c0 border=0>
<TBODY>
<TR>
<TD width="15%" bgcolor="#336699"><font color="#FFFFFF">询问人:</font></TD>
<TD width="25%"><%=rs("dayi_who")%> </TD>
<TD width="17%" bgcolor="#336699"><font color="#FFFFFF">填写日期:</font></TD>
<TD width="43%"><FONT color=#ff0000><%=rs("dayi_date")%></font></TD>
</TR>
<TR>
<TD vAlign=top bgcolor="#336699"><font color="#FFFFFF">标题:</font></TD>
<TD colspan="3"><%=rs("dayi_title")%> </TD>
</TR>
<TR>
<TD vAlign=top bgcolor="#336699"><font color="#FFFFFF">内容:</font></TD>
<TD colspan="3" vAlign=center><%=rs("dayi_question")%></TD>
</TR>
<% If rs("dayi_isreply")<>0 Then %>
<TR>
<TD vAlign=top bgcolor="#336699"><font color="#FFFFFF">回复:</font></TD>
<TD colspan="3" vAlign=center> <%=rs("dayi_reply")%> </TD>
</TR>
<TR>
<TD vAlign=top bgcolor="#336699"> <font color="#FFFFFF">回复日期:</font></TD>
<TD vAlign=top><font color=#ff0000><%=rs("dayi_replydate")%></font></TD>
<TD colspan="2" vAlign=top> </TD>
</TR>
<% End If %>
<TR>
<TD colspan="4" vAlign=top>
<% If session("iamcoming")<>"" Then %>
管理员操作:
<% If rs("dayi_isreply")<>0 Then %>
<a href="dayi_reply.asp?id=<%=rs("id")%>"> <font color="#000000">重新回复</font> </a>
<% Else %>
<a href="dayi_reply.asp?id=<%=rs("id")%>"><font color="#000000">回复</font> </a>
<% End If %>
<a href='javascript:confirmDel(<%= rs("id") %>)'><font color="#000000">删除</font></a>
<a href="repass.asp"><font color="#000000">修改密码</font></a>
<a href="loginout.asp"><font color="#000000">退出管理</font></a>
<% End If %>
</TD>
</TR>
<TR>
<TD> </TD>
<TD colspan="3"> </TD>
</TR>
</TBODY>
</TABLE></TD>
</TR></TBODY></TABLE></TD></TR>
<TR>
<TD background=images/bg2003.jpg height=90>
<DIV
align=center><BR>
<BR>
推荐用IE5.0或NS6.0以上版本浏览,最佳显示800*600<BR>
COPYRIGHT@ 2004 <BR>
<BR>
<BR>
</DIV></TD></TR></TBODY></TABLE></BODY></HTML>
<%
set rs=Nothing
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -