<%= set_xx_nrfb_Clicks_add(Trim(Request("xx_nrfb_content_id"))) %>
<%
Function Get_SEO_news_MX_keywords(nrfb_content_id)
'网站新闻明细页Get_SEO_news_MX_keywords调用
Dim news_keywords_all
set rs_name = Server.CreateObject("ADODB.RecordSet")
sql_name="select * from xx_nrfb_content where xx_nrfb_content_id = "& CheckStr(nrfb_content_id) &""
rs_name.open sql_name, conn,1,1
if not rs_name.eof and not rs_name.bof then
news_keywords_all = rs_name("xx_nrfb_content_keywords_all")
else
news_keywords_all = ""
end if
If news_keywords_all = "" then
Get_SEO_news_MX_keywords = news_title(Trim(Request("xx_nrfb_content_id"))) & "," & get_keywords
Else
Get_SEO_news_MX_keywords = news_keywords_all
End if
rs_name.close
set rs_name=nothing
End Function
%>
<%= news_title(Trim(Request("xx_nrfb_content_id"))) & "_" & News_nrfb_name_1(Trim(Request.QueryString("xx_nrfb_content_id"))) & "_" & get_hostname %>
" />
" />