<!--#include file="sub/conn.asp"-->
<!--#include file="sub/webvar.asp"--> 
<!--#include file="sub/fun.asp"--> 
<!--#include file="sub/online.asp"-->
<%online%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=webtitle%></title>
<link href="sub/main.css" rel="stylesheet" type="text/css">
</head>
<%=webbody%>
<!--#include file="top.asp"-->
<table width="778" height="7" border="0" align="center" cellpadding="0" cellspacing="0" background="images/05_title_son_back.gif" bgcolor="FFC3DD">
  <tr> 
    <td width="98"><img src="images/05_title_son2.gif" width="26" height="7" hspace="58"></td>
    <td width="68"></td>
    <td width="82"></td>
    <td width="78" ></td>
    <td width="79"></td>
    <td width="79"></td>
    <td width="77"></td>
    <td width="67"></td>
    <td width="55"></td>
    <td width="95"></td>
  </tr>
</table>
<table width="778" height="9" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style="border-left:#FFD7E2 1px solid;border-right:#FFD7E2 1px solid;">
  <tr> 
    <td align="center" valign="top"><img src="images/hehe8.gif" width="760" height="22"></td>
  </tr>
</table>
<table width="778" height="30" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style="border-left:#FFD7E2 1px solid;border-right:#FFD7E2 1px solid;">
  <tr> 
    <td align="center" valign="top"><%
	if request.cookies("yxlove")("username")<>"" then
	   response.write topnews2
	else
	   response.write topnews1
	end if
	%>
</td>
  </tr>
</table>
<table width="778" height="349" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style="border-left:#FFD7E2 1px solid;border-right:#FFD7E2 1px solid;">
  <tr valign="top"> 
    <td width="49" align="right">&nbsp;</td>
    <td width="682" align="center" >
<%
testid=replace(request("ClassID"),"'","''")
If not isnumeric(testid) or len(testid)>7 Then
	closeconn
	call msg("错误或没有找到该信息","-1")
End if
conn.execute"update love_news set click=click+1 where id="&testid
set rs=server.createobject("adodb.recordset")
sql="select * from love_news where id="&testid
rs.open sql,conn,1,1
  IF  (rs.State =adStateClosed)  or (rs.BOF=true and rs.EOF =true)  or  rs.RecordCount=0 THEN     
    Response.Write "<BR><BR>&nbsp;&nbsp;<font color='#666666' style='font-size: 9pt'>错误或没有找到该信息！</FONT><BR><BR>"
    Response.Write "<p align=""center""><input onclick='history.back();' type='button' value='返回' style='font-size: 9pt'></p>"
  Else
%>
      <table width="90%" height="40" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF" style="border:#CEF2FD 1px dotted;">
        <tr bgcolor="#D2F5FF"> 
          <td width="88%" align="center" bgcolor="#D2F5FF" style="padding-top:5px;"><b><font style="font-size:18px;color:#FF6600;"><%=ChkBadWords(rs("title"))%></font></b></td>
          <td width="12%" align="center" style="padding-top:5px;"><font color="#666666">阅读</font> 
            <font color="#FF0000"><%=rs("click")%></font><font color="#666666"> 
            次</font></td>
        </tr>
      </table>
      <table width="90%" height="63" border="0" align="center" cellpadding="0" cellspacing="0" style="TABLE-LAYOUT: fixed; WORD-BREAK: break-all;">
        <tr> 
          <td valign="top" style="line-height:180%;font-size:10.3pt;color:#5B5B5B;"><br> 
            <%=ubbcode(ChkBadWords(rs("content")))%><br>
            <br> </td>
        </tr>
      </table>
<%
rs.close:set rs=nothing
End If%>
	  </td>
    <td width="49" align="left">&nbsp;</td>
  </tr>
</table>
<table width="778" height="22" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style="border-left:#FFD7E2 1px solid;border-right:#FFD7E2 1px solid;">
  <tr> 
    <td align="center" valign="top">&nbsp; </td>
  </tr>
</table>
<table width="778" height="7" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style="border-top:#FFD7E2 1px solid;">
  <tr>
    <td align="center" valign="top"></td>
  </tr>
</table>
<!--#include file="bottom.asp"-->
</body>
</html>
<%Closeconn%>