<% 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 %> 午夜在线观看视频在线播放版,亚洲欧美一区二区三区国产精品 ,2020在线不卡观看视频 " /> " />

四虎在线视频观看大全影视-四虎在线视频免费观看-四虎在线视频免费观看视频-四虎在线网站-欧美巨大精品欧美一区二区-欧美久久综合性欧美

產品分類

文章分類

<%=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")%>