asp新闻标题怎么实现?(在线等)
效果要求:从数据库调出"标题",显示5条在页面上。点击标题,在新页上出现内容。请问:除了数据控件,标题用什么做!!!一楼,这是写在后台代码里的吗?谢谢!...
效果要求:从数据库调出"标题",显示5条在页面上 。点击标题,在新页上出现内容。
请问:除了数据控件,标题用什么做!!!
一楼,这是写在后台代码里的吗?谢谢! 展开
请问:除了数据控件,标题用什么做!!!
一楼,这是写在后台代码里的吗?谢谢! 展开
2个回答
展开全部
<%
set rs=server.CreateObject("adodb.recordset")
sql="select top 6 * from info_co where lm=56 and pass='yes' order by toptime desc "
rs.open sql,conn,1,1
if rs.eof then
response.write"<br><br><center>没有信息,梢后发布...</center>"
else
%>
<%
a=1
while not rs.eof and a<=6
%>
<li><a href="disp.asp?Id=<%=rs ("id")%>&lm=<%=rs ("lm")%>" target="_blank"><img src="pic/news.gif" width="10" height="10" border="0" /> <%=getstr(rs("title"),30)%></a></li>
<%
a=a+1
rs.movenext
wend
end if
rs.close
set rs=nothing
%>
set rs=server.CreateObject("adodb.recordset")
sql="select top 6 * from info_co where lm=56 and pass='yes' order by toptime desc "
rs.open sql,conn,1,1
if rs.eof then
response.write"<br><br><center>没有信息,梢后发布...</center>"
else
%>
<%
a=1
while not rs.eof and a<=6
%>
<li><a href="disp.asp?Id=<%=rs ("id")%>&lm=<%=rs ("lm")%>" target="_blank"><img src="pic/news.gif" width="10" height="10" border="0" /> <%=getstr(rs("title"),30)%></a></li>
<%
a=a+1
rs.movenext
wend
end if
rs.close
set rs=nothing
%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询