<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp" -->
<!--#include file="config.asp" -->
<!--#include file="syscode.asp" -->
<%	
  id= GetSafeInt(Trim(Request("id")),0)
		If id < 1 Then
response.Redirect"index.asp"
		End If
set rs=server.CreateObject("adodb.recordset")
	sql= "select * from news  where id="&id
	rs.open sql,conn,1,3
	rs("hits")=rs("hits")+1
	rs.update
	title=rs("title")
	
	content=rs("content")
	
	hits=rs("hits")
	
	smallclassname=rs("smallclassname")
	rs.close
	set rs=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=title%></title>
<!--关键字修改 config.asp 就可以了-->
<meta name="keywords" content="<%=key%>">
<meta name="description" content="<%=descrip%>">
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body>
<!--#include file="top.asp" -->
<table width="950" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="235" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="34" background="images/left.jpg"><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="10%" align="right"><img src="images/arrow.gif" width="9" height="9"></td>
              <td width="27%">&nbsp;<span class="baifont">分类介绍</span></td>
              <td width="47%">&nbsp;</td>
              <td width="16%">&nbsp;</td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td height="100" valign="top"><table width="232" border="0" align="right" cellpadding="0" cellspacing="0" background="images/abbg.jpg">
            <tr>
              <td width="230" height="100" valign="top"><%
		set rs=conn.execute("select * from smallclass where bigclassid=4  order by s_order asc")
			  %>
                  <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
                    <%
			  do while not rs.eof 
			  %>
                    <tr>
                      <td height="30"><img src="images/t1.gif"> <a href="huanjing.asp?cls=<%=rs("smallclassname")%>"><%=rs("smallclassname")%></a></td>
                      <%
				  rs.movenext
				  if rs.eof then exit do 
				  %>
                      <td><img src="images/t1.gif"> <a href="huanjing.asp?cls=<%=rs("smallclassname")%>"><%=rs("smallclassname")%></a></td>
                      <%
				  rs.movenext
				  if rs.eof then exit do 
				  %>
                    </tr>
                    <%
			 loop
			 %>
                </table></td>
            </tr>
        </table></td>
      </tr>
    </table>
    <table width="100%" height="5" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td ></td>
  </tr>
</table>

	<table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="34" background="images/left1.jpg"><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="10%" align="right"><img src="images/arrow.gif" width="9" height="9"></td>
              <td width="27%">&nbsp; <span class="baifont">招生动态</span></td>
              <td width="47%">&nbsp;</td>
              <td width="16%"><a href="newslist.asp?cls=招生动态"><img src="images/more.gif" width="27" height="18" border="0"></a></td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td height="148" valign="top" background="images/left3bg.jpg" bgcolor="#CEE9FE"><table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td><%
				dim sql
	sql="select top 6 * from news where smallclassname='招生动态'order by ord desc,id desc"
	set rs = conn.execute(sql)
	if rs.bof and rs.eof then
		response.write("<table ><tr><td>暂无记录</td></tr></table>")
	else
	%>
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <%
	while not rs.eof
		if len(rs("title"))>15 then
		stitle=left(rs("title"),15)&"..."
	else
		stitle=rs("title")
	end if
	i=i+1
	%>
                    <tr >
                      <td width="19" align="center"><img src="images/PLUS.GIF" width="15" height="15"></td>
                      <td height="22"><a href="shownews.asp?id=<%=rs("id")%>" target="_blank" title="<%=rs("title")%>"><%=stitle%></a></td>
                    </tr>
                    <%
	rs.movenext
	wend
	%>
                  </table>
                <%
	rs.close
	set rs=nothing
	end if
%>
              </td>
            </tr>
        </table></td>
      </tr>
    </table>
	<table width="100%" height="5" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td ></td>
      </tr>
    </table>
	<table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="34" background="images/left1.jpg"><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="10%" align="right"><img src="images/arrow.gif" width="9" height="9"></td>
              <td width="27%">&nbsp;<span class="baifont">行业新闻</span></td>
              <td width="47%">&nbsp;</td>
              <td width="16%"><a href="newslist.asp?cls=招生动态"><img src="images/more.gif" width="27" height="18" border="0"></a></td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td height="148" valign="top" class="lbk"><table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td><%
	sql="select top 6 * from news where smallclassname='行业新闻'order by ord desc,id desc"
	set rs = conn.execute(sql)
	if rs.bof and rs.eof then
		response.write("<table ><tr><td>暂无记录</td></tr></table>")
	else
	%>
                <table width="100%" border="0" cellspacing="0" cellpadding="0">
                  <%
	while not rs.eof
		if len(rs("title"))>15 then
		stitle=left(rs("title"),15)&"..."
	else
		stitle=rs("title")
	end if
	i=i+1
	%>
                  <tr >
                    <td width="19" align="center"><img src="images/PLUS.GIF" width="15" height="15"></td>
                    <td height="22"><a href="shownews.asp?id=<%=rs("id")%>" target="_blank" title="<%=rs("title")%>"><%=stitle%></a></td>
                    </tr>
                  <%
	rs.movenext
	wend
	%>
                </table>
              <%
	rs.close
	set rs=nothing
	end if
%>
            </td>
          </tr>
        </table></td>
      </tr>
    </table></td>
    <td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="39" background="images/ctoptbg.jpg"><table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td width="4%" align="center"><img src="images/Sm_MainDayIcon.gif" width="15" height="15"></td>
            <td width="96%"><A href="huanjing.asp">校园风貌</A><A href="zuopin.asp"></A> >>  <A href="zuopin.asp?cls=<%=smallclassname%>"><%=smallclassname%></a> >> <%=title%></td>
          </tr>
        </table></td>
      </tr>
    </table>
      <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
        <tr>
          <td valign="top" class="crt"><table width="708" border="0" align="right" cellpadding="4" cellspacing="2">
            <tr>
              <td width="696" height="484" valign="top" class="hg"><%=content%></td>
            </tr>
          </table></td>
        </tr>
      </table></td>
  </tr>
</table>
<!--#include file="end.asp" -->
</body>
</html>
