<!--#include file="conn.asp"-->
<%
strCurrMenu=GetVariable("mnid")

if GetVariable("id")="" then 
	ShowMsg "You visted information can't being！"
end if
'新闻阅读次数＋1
conn.execute "Update web_news Set nHits=nHits + 1 Where id=" & GetVariable("id"),0,1
'读新闻
strSQL="Select * From v_web_news Where id=" & GetVariable("id")
rs.open strSQL,conn,1,1
if rs.recordcount<=0 then 
	ShowMsg "Can Not Fund!"
end if

%>

<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html;">
<link rel="stylesheet" href="common/style.css" type="text/css">

<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" BodyBegin>
<!--#include file="top.asp"-->
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td colspan="2" height="2" valign="top"><img src="images/mega_1_047.gif" width="208" height="12"></td>
  </tr>
  <tr> 
    <td width="208" height="46"> 
      <table width="208" border="0" cellspacing="0" cellpadding="0" height="100%">
        <tr> 
          <td width="198" height="44" bgcolor="f3f2f2" valign="top"> 
            <table width="198" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0" height="3" bgcolor="#CCCCCC">
                    <tr> 
                      <td bgcolor="#FFFFFF"></td>
                    </tr>
                  </table>
                  <table width="100%" border="0" cellspacing="1" cellpadding="0" height="5" bgcolor="#CCCCCC">
                    <tr> 
                      <td bgcolor="#FFFFFF"></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr> 
                <td background="images/lin-bg.gif" height="33">
                  <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif"><b><font color="#FFFFFF">The 
                    News Class</font></b></font></div>
                </td>
              </tr>
              <tr> 
                <td height="215"> 
                  <table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
                    <tr> 
                      <td height="168" valign="top"> <table width="100%" height="36" border="0" cellpadding="0" cellspacing="0">
                          <tr> 
                            <td height="10" colspan="2"></td>
                          </tr>
              <%
									'开始输出分类
									SourCode=trim(rs("c_code"))
									strcode=""
									for i=1 to Len(SourCode) \ 4
									strcode=strcode&" or c_code like '"&left(SourCode,i*4)&"____'"
									next
									if strcode<>"" then
									strcode="(1<>1"&strcode&" or Len(c_code)=4)"
									else
									strcode=" Len(c_code)=4"
									end if
									strSQL="Select * From web_news_class Where mn_id=" & strCurrMenu&" and " & strcode & "  Order by c_code"
									'response.Write(strsql)
									Set rsClass=Server.CreateObject("ADODB.RecordSet")
									rsClass.open strSQL,conn,1,1
									for i=1 to rsClass.recordcount
									Level=(Len(rsClass("c_code"))/4-1)*3
									%>
                          <tr> 
                            <td width="46" height="26" align="right" > 
                              <li></td>
                            <td width="132" > 
                              <%
			If Len(rsClass("c_code"))>4 Then Response.Write "├"
			Response.Write String(Level,"-")
			%>
                              <a href="<%=request.QueryString("uppage")%>?class=<%=rsClass("id")%>&classname=<%=trim(rsClass("c_name"))%>"><%=trim(rsClass("c_name"))%></a> 
                            </td>
                          </tr>
                          <%
									rsClass.movenext
								next
								%>
                        </table> </td>
                    </tr>
                    <tr>
                      <td height="20"> 
                        <div align="center"> </div>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
            <!--Link Begin-->
            <%
							isLink=GetKey("Enable",WebUserID,"link")
							if isLink="Yes" then
							%>
            <table width="198" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0" height="3" bgcolor="#CCCCCC">
                    <tr> 
                      <td bgcolor="#FFFFFF"></td>
                    </tr>
                  </table>
                  <table width="100%" border="0" cellspacing="1" cellpadding="0" height="5" bgcolor="#CCCCCC">
                    <tr> 
                      <td bgcolor="#FFFFFF"></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr> 
                <td background="images/lin-bg.gif" height="33"> 
                  <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif"><b><font color="#FFFFFF">Links</font></b></font></div>
                </td>
              </tr>
              <tr> 
                <td height="215"> 
                  <table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
                    <tr> 
                      <td height="169" align="center"><script language="JavaScript" src="admin/link/link.asp"></script></td>
                    </tr>
                    <tr> 
                      <td height="20"> 
                        <div align="center"> </div>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
            <%
							  end if
							  %>
            <!--Link End-->
          </td>
          <td width="9" height="44">&nbsp;</td>
        </tr>
      </table>
    </td>
    <td height="46" width="572" valign="top"> 
      <table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td height="21"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td background="images/lin-bg.gif" height="33" width="1%"><img src="images/left.gif" width="9" height="33"></td>
                <td background="images/lin-bg.gif" height="33" width="4%"><font color="#000000" face="Verdana, Arial, Helvetica, sans-serif"><b><font color="#FFFFFF"><img src="images/ys-j2g.gif" width="14" height="14"></font></b></font></td>
                <td background="images/lin-bg.gif" height="33" width="91%"><font color="#000000" face="Verdana, Arial, Helvetica, sans-serif"><b><font color="#FFFFFF"><%=request("classname")%></font></b></font></td>
                <td background="images/lin-bg.gif" height="33" width="4%"> 
                  <div align="right"><img src="images/right.gif" width="10" height="33"></div>
                </td>
              </tr>
            </table>
          </td>
        </tr>
        <tr> 
          <td height="48"><strong></strong></td>
        </tr>
        <tr> 
          <td><TABLE width="90%" 
                          border=0 align="center" cellPadding=0 cellSpacing=0>
              <TBODY>
                <TR> 
                  <TD width="65%" height="45" align="center" class="fs-13px"><strong><%=trim(rs("nTitle"))%></strong></TD>
                </TR>
                <TR> 
                  <TD height="25"><hr></TD>
                </TR>
                <TR> 
                  <TD height="200" valign="top" class="fs-14px"><%=trim(rs("nHtmlText"))%></TD>
                </TR>
                <TR> 
                  <TD height="33" align="right"><font color="#8F8F8F">D</font><font color="#8F8F8F">ate:<%=trim(rs("nTime"))%> 
                    Reads:<%=trim(rs("nHits"))%> From:<%=trim(rs("nOriginal"))%></font></TD>
                </TR>
                <TR> 
                  <TD height="13" align="right">&nbsp;</TD>
                </TR>
              </TBODY>
            </TABLE></td>
        </tr>
        <tr>
          <td>&nbsp;</td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="3" bgcolor="#CCCCCC">
  <tr> 
    <td bgcolor="#FFFFFF"></td>
  </tr>
</table>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td height="54" align="center" background="images/foot-bg.gif"> <font color="#FFFFFF">未设置<br></font><br>
      <script language="JavaScript" src="admin/count/counter.asp"></script></td>
  </tr>
</table>
<script language="JavaScript" src="common/init.js"></script>
</body>
</html>

