📄 read.asp
字号:
<!--#include file="ubb/ubbcode.asp" -->
<!--#include file="../config/sys.asp" -->
<%
if (session("user_name")="" and session("user_password")="") then
if (not youkeYN) then
response.Redirect url&"error.asp?msg=对不起，本页面目前禁止游客浏览！"
end if
end if
id =cint( request.querystring("id"))
s = cint(request.querystring("s"))
sql = "update news set views = views + 1 where id = " & id
conn.Execute(sql)
sql = "select * from news where id = " & id
set rs = conn.Execute(sql)%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style.css" rel="stylesheet" type="text/css" />
<script language="JavaScript" src="ubb/ubbcode.js" type="text/JavaScript"></script>
</head>
<body>
<script>
function delete_eintrag(id, p, s, parent) {
msg=window.open("delete2.asp?id="+id+"&p="+p+"&s="+s+"&parent="+parent,"","height=200,width=350");
}
</script>
<%while not rs.eof
retitle = rs("title")
parent = rs("id")%>
<div align="center">
<TABLE style="TABLE-LAYOUT: fixed" height=100% cellSpacing=0 cellPadding=0 width="98%" border=0>
<TBODY>
<TR height=3 width="100%">
<TD> <TABLE style="TABLE-LAYOUT: fixed" height=3 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=1>
<TD width=1></TD>
<TD width=1></TD>
<TD width=1></TD>
<TD bgColor=#DCDCDC></TD>
<TD width=1></TD>
<TD width=1></TD>
<TD width=1></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD bgColor=#f7f8f9></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC></TD>
<TD bgColor=#f7f8f9 colSpan=3></TD>
<TD bgColor=#DCDCDC></TD>
<TD></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD> <TABLE style="TABLE-LAYOUT: fixed" height="100%" cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR>
<TD width=1 bgColor=#DCDCDC></TD>
<TD id=oINNER bgColor=#FFFFFF>
<table border="0" width="100%" id="table1" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td height="24" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px" colspan="3">
<font color="#999999"><b> 读文</b></font></td>
</tr> <tr>
<td bgcolor="#FFFFFF" valign="top">
<div align="center">
<table cellspacing="1" cellpadding="4" width="98%" border="0" class="a2" bgcolor="#FFFFFF">
<tr class="a1"><td colspan="5"><table width=100%><tr><td width="89%"><b>标题：<font color="#0000FF"><%=formatierung(rs("title"))%></font></td>
<td width=11% align=center> </td></tr></table></td></tr>
<tr class="a3">
<td width="13%" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"> <b>作者</b>：<a href="../other_user.asp?user_name=<%=rs("autor")%>"><%=selectlook(rs("autor"),"user_name")%></a></td>
<td width="18%" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px">
<b>类别</b>：<%=selectnews(rs("newstype"))%></td>
<td width="17%" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px">
<a target="_blank" href="<%=selectlook(rs("autor"),"homepage")%>" title="<%=selectlook(rs("autor"),"homepage")%>">
<img border="0" src="images/home.gif" width="23" height="22"></a><a target="_blank" href="mailto:<%=selectlook(rs("autor"),"email")%>" title="<%=selectlook(rs("autor"),"email")%>"><img border="0" src=images/email.gif></a><a target="_blank" href="http://wpa.qq.com/msgrd?V=1&Uin=<%=selectlook(rs("autor"),"qq")%>&Site=心理咨询平台&Menu=yes" title="<%=selectlook(rs("autor"),"qq")%>"><img border="0"src=images/qq.gif></a><a target="_blank" href="http://spaces.msn.com/<%=msn(selectlook(rs("autor"),"msn"))%>" title="<%=selectlook(rs("autor"),"msn")%>"><img border="0"src=images/msn.gif></a><img border="0" src="images/friend.gif" width="23" height="22" alt="加为好友"><img border="0" src="images/help.gif" width="23" height="22" alt="帮助说明"></td>
<td width="26%" align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><img src=images/time.gif> <%=rs("datum")%></td>
<td width="20%" align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"> <%if SELECTROLE3(SESSION("USER_NAME")) then%><a href="javascript:delete_eintrag('<%=id%>','all','<%=s%>','<%=parent%>');"><img src=images/del.gif border=0></a><a href="news_EDIT.asp?ID=<%=id%>&readid=<%=id%>"><img border="0" src="images/update.gif" ></a><%END IF%></td></tr>
<tr class="a4">
<td colspan="5" height=40 valign=top class=365ye style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style:dotted; border-bottom-width:1px"><p> <%=ubbcode(formatierung(rs("message")))%></p>
</td></tr>
<%rs.movenext
wend
sql = "select title, autor, views, replies, datum, datum_updated, id, message,editflog from news where connected = "& id &" order by id"
set rs = conn.Execute(sql)
while not rs.eof
count = count +1%>
<tr class="a1"><td colspan="5"><table width=100%><tr><td width="89%"><b>
<img border="0" src="images/forum_readme.gif" width="10" height="10"> 评论：</b><a name="<%=count%>"><%=formatierung(rs("title"))%></a></td>
<td width=11% align=center> </td></tr></table></td></tr>
<tr class="a3">
<td style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px" colspan="2"> 作者：<a href="../other_user.asp?user_name=<%=rs("autor")%>"><%=selectlook(rs("autor"),"user_name")%></a></td>
<td width="17%" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px">
<a target="_blank" href="<%=selectlook(rs("autor"),"homepage")%>" title="<%=selectlook(rs("autor"),"homepage")%>">
<img border="0" src="images/home.gif" width="23" height="22"></a><a target="_blank" href="mailto:<%=selectlook(rs("autor"),"email")%>" title="<%=selectlook(rs("autor"),"email")%>"><img border="0" src=images/email.gif></a><a target="_blank" href="http://wpa.qq.com/msgrd?V=1&Uin=<%=selectlook(rs("autor"),"qq")%>&Site=心理咨询平台&Menu=yes" title="<%=selectlook(rs("autor"),"qq")%>"><img border="0"src=images/qq.gif></a><a target="_blank" href="http://spaces.msn.com/<%=msn(selectlook(rs("autor"),"msn"))%>" title="<%=selectlook(rs("autor"),"msn")%>"><img border="0"src=images/msn.gif></a><img border="0" src="images/friend.gif" width="23" height="22" alt="加为好友"><img border="0" src="images/help.gif" width="23" height="22" alt="帮助说明"></td>
<td align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><img src=images/time.gif> <%=rs("datum")%></td>
<td align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><%if not adminreply then%><a href="replay.asp?id=<%=id%>&s=<%=s%>"><img src=images/replay.gif border=0></a><%else if SELECTROLE2(SESSION("USER_NAME")) then%><a href="replay.asp?id=<%=id%>&s=<%=s%>"><img src=images/replay.gif border=0></a><%end if%><%end if%><%if SELECTROLE3(SESSION("USER_NAME")) then%><a href="javascript:delete_eintrag('<%=rs("id")%>','one','<%=s%>','<%=parent%>');"><img src=images/del.gif border=0></a><a href="EDIT.asp?ID=<%=RS("id")%>&readid=<%=id%>"><img border="0" src="images/update.gif"></a><%END IF%></td></tr>
<tr class="a4">
<td colspan="5" height=40 valign=top class=365ye style="border-bottom:1px solid #000000; border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; "><p><img src=images/icon2.gif> <%=ubbcode(formatierung(rs("message")))%></p>
<p align="right"><%if rs("editflog") then%>本论点由 <%=selectlook(rs("autor"),"user_name")%> 于 <%=rs("datum_updated")%> 编辑<br><%end if%> ★ ☆ ★ 本文为 <%=formatierung(rs("autor"))%>个人意见，与本站立场无关！☆ ★ ☆</p></td></tr>
<%rs.movenext
wend
rs.close
CONN.close
set rs = nothing
set conn = nothing%></table>
</div>
</td>
</tr>
</table>
</TD>
<TD width=1 bgColor=#DCDCDC></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR height=3 width="100%">
<TD> <TABLE style="TABLE-LAYOUT: fixed" height=3 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=1>
<TD width=1></TD>
<TD width=1 bgColor=#DCDCDC></TD>
<TD width=1 bgColor=#f7f8f9></TD>
<TD bgColor=#f7f8f9></TD>
<TD width=1 bgColor=#f7f8f9></TD>
<TD width=1 bgColor=#DCDCDC></TD>
<TD width=1></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD bgColor=#f7f8f9></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD></TD>
</TR>
<TR height=1>
<TD colSpan=3></TD>
<TD bgColor=#DCDCDC></TD>
<TD colSpan=3></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
</div>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -