<% id=ReplaceUnsafe(request.QueryString("id")) if not IsNumeric(id) then response.write"" response.End end if set arrs=server.createobject("adodb.recordset") arsql="select * from article where id="&id arrs.open arsql,conn,1,3 if arrs.eof then response.write"" response.End end if classname=arrs("classname") classid=arrs("classid") arttitle=arrs("title") if arrs("keywords")<>"" then Keywords=arrs("keywords") else Keywords=arrs("title")&"_"&website end if if arrs("Descrip")<>"" then Descrip=arrs("Descrip") else descrip=arrs("content") descrip=gotTopic(RemoveHTML(descrip),150) end if %> <%=arrs("title")%>
产品分类
文章分类
<%=classname%>
 

<%=arttitle%>

<% if showhit = true then hits=arrs("hits") arrs("hits")=hits+1 arrs.update response.Write " 阅读 " & hits+1 & " 次" end if %>      <%if showorigin=true then if arrs("origin")<>"" then origin=arrs("origin") else origin=lhorigin end if response.Write "来源:"&origin end if %>      <%if showauthor=true then if arrs("author")<>"" then author=arrs("author") else author=lhauthor end if response.Write "作者:"&author end if %>     <%if showtime=true then response.Write "日期:"&arrs("addtime")%>

信息内容
<%=arrs("content")%>