|
<%
set news=server.createobject("adodb.recordset")
exec="select top 4 * from [news] where lm_id=10 and btype_id=50 order by id desc " 'top 3代表每栏目显示5条新闻
news.open exec,conn,1,1
if news.eof and news.bof then
response.Write(" 此分类暂无新闻 !")
end if
for j=1 to news.recordcount
clinks2="news.asp?did="&news("id")
%>
|
"><%=InterceptString(news("title"),22)%>... |
<%
news.moveNext
if j=9 or news.eof then exit for
next
news.close
set news=nothing
%>
|
|
|
|
|
温岭市胜南水泵厂是一家专业研究设计、制造生产塑料轴流泵、排洪泵 |
|
|
|
|
|
<%
set rs=server.createobject("adodb.recordset")
sql="select top 14 * from CMS_Products order by id desc"
rs.open sql,conn,1,1
do while not rs.eof
if rs("bigpic")<>"" then
%>
|
|
<%
end if
rs.MoveNext
loop
rs.Close
%>
|
|
|
|
|
|
|