<% id=cstr(replace(trim(request("id")),"'","")) Set rsnews=Server.CreateObject("ADODB.RecordSet") sql="select * from okuoo_news where id="&id rsnews.Open sql,conn,1,3 if rsnews.eof and rsnews.bof then response.write"" else rsnews("Hits")=rsnews("Hits")+1 rsnews.update title=rsnews("title") BigClass=rsnews("BigClassName") SmallClass=rsnews("SmallClassName") if SmallClass="" then HeadTitle=BigClass&"-"&title else HeadTitle=BigClass&"-"&SmallClass&"-"&title end if %> <% const ChannelID=2 if HeadTitle<>"" then SiteTitleAll= HeadTitle & "-" & SiteTitle else SiteTitleAll=SiteTitle end if %> <%=SiteTitleAll%>

干洗店加盟哪家好?干洗加盟连锁就找卡博尼洗衣连锁,卡博尼中国干洗加盟品牌

 

<% Set rslist = Server.CreateObject("ADODB.Recordset") sql="select BigClassID,BigClassName from okuoo_BigClass_New order by BigClassID" rslist.open sql,conn,1,3 do while not rslist.eof %>
" class="left_link"><%= rslist("BigClassName") %>
<%rslist.movenext loop rslist.close set rslist=nothing %>
  <% end if rsnews.close set rsnews=nothing %>
<%= rsnews("title") %>
双击自动滚屏 发布者:<%= rsnews("user") %> 发布时间:<%= FormatDateTime(rsnews("AddDate"),2) %> 阅读:<%= rsnews("hits") %>次 【字体:

<%=rsnews("content") %>

  • 上一条新闻: <% call ShowPrevNews(200) %>
  • 下一条新闻: <% call ShowNextNews(200) %>
  • 查看全部新闻
  •