<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% dim tag tag = request.querystring("tag") if tag = "" then response.write "" response.end end if %> <%=tag%>-<%=all_rs("Web_name")%>
<% dim news_rs,news_sql set news_rs = server.createobject("adodb.recordset") news_sql = "select * from content_yfcms where Nav_content_name like '%"&tag&"%' and Nav_content_url_y = 1 order by Id desc" news_rs.open news_sql,conn,1,1 do while not news_rs.eof nimgpath = news_rs("Nav_content_pic") nimgpath1 = web_url&"yfcms/" nimgpath2 = replace(nimgpath,"../",nimgpath1) %> ">
<%=news_rs(">
Date:<%=FormatDateTime(news_rs("Nav_content_date"),2)%>

<%=left(news_rs("Nav_content_name"),22)%>

<%=left(news_rs("Nav_content_info"),50)%>

<% news_rs.movenext loop %>