<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <%=web_title%> >
<% id=request.QueryString("id") set rs=server.CreateObject("adodb.recordset") conn.execute "Update web_news Set hits=hits + 1 Where id="&id,0,1 rs.open"select * from web_news where id="&id,conn,1,3 classname=rs("class") if classname="网站新闻" then classname1="News" end if if classname="展会发布" then classname1="Exhibition" end if %>
<%=classname1%>

 
<%=rs("title")%>
 
 
From:<%=rs("from")%> Time:<%=rs("datetime")%>
 
  <%=rs("content")%>  
<%rs.close%>
  <%=classname1%>
<% set web_rs=server.CreateObject("adodb.recordset") web_rs.Open "select * from web_news where class='"&classname&"' order by id ",conn,1,1 do while not web_rs.eof %> <% web_rs.movenext loop %>
 · " style=" font-size:12px; font-weight:bold;"><%=web_rs("title")%>