<% 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")%>
<track id="p7zr1"><span id="p7zr1"><em id="p7zr1"></em></span></track>
  1. <track id="p7zr1"><span id="p7zr1"></span></track>
    <nobr id="p7zr1"><address id="p7zr1"><big id="p7zr1"></big></address></nobr>

    <menuitem id="p7zr1"></menuitem>

    <option id="p7zr1"><span id="p7zr1"></span></option>

      3. <track id="p7zr1"></track>
      產品分類
      文章分類
            
      <%=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")%>
       
      欧美肥老太牲交视频_亚洲成av人片在线观看天堂无_国产97人人超碰cao蜜芽prom_亚洲男人在线免费视频