<%a=2%><%id=request("id")
if id<>"" then
set rs=server.createobject("adodb.recordset")
sql="select * from Case where ArticleID="&cint(id)
rs.open sql,conn,1,1
if rs.eof then
response.Write("Errow")
response.End()
else
num=rs("Hits")
sql2="update Case set Hits=Hits+1 where ArticleID="&cint(id)
conn.execute(sql2)
end if
end if
%>
<%
BigClass=rs("BigClassName")
if BigClass<>"" then
set bigrs=server.createobject("adodb.recordset")
sql="select top 1 * from BigClassCase where BigClassID="&cint(BigClass)
bigrs.open sql,conn,1,1
if not bigrs.eof then
BigClassName=bigrs("BigClassName")
BigClass=cstr(bigrs("BigClassID"))
bigrs.close
set bigrs=nothing
else
response.Write("Operation of the illegal")
response.End()
end if
end if
%>
<%=outkon(rs("title"))%>|<%if BigClassName<>"" then %><%=BigClassName%>|<%end if%><%=titlename%>
<%if BigClassName<>"" then %><%=BigClassName%><%end if%>