Question

asp新闻动态标题title如何让其随着新闻的题目不同而显示出来？

调用部分如下：
<%
dim nextNews,previousNews

sql = "select top 1 * from 2_News where id>"&request("id")&" and Cla1id=1"
set rso = Conn.execute(sql)
if not rso.eof then
nextNews = "<a href=newsShow.asp?ID="&rso("id")&" target='_self'>"&rso("title")&"</a>"
else
nextNews = "暂无"
end if

sql = "select top 1 * from 2_News where id<"&request("id")&" and Cla1id=1"
set rso = Conn.execute(sql)
if not rso.eof then
previousNews = "<a href=newsShow.asp?ID="&rso("id")&" target='_self'>"&rso("title")&"</a>"
else
previousNews = "暂无"
end if

rso.close
%>

动态新闻列表如下：
<%
sqls="select * from 2_News where id="&request("id")
rs.open sqls,conn,1,3
if rs.eof or rs.bof then
response.Write("暂无信息")
else
rs("hits")=rs("hits")+2
rs.update

%>

Answer 1

这个很简单的;
你只要读取数据库资料的时候查询上限制类型就可以了
请看查询语句的修改,查询出来的是按文章ARTICLEID排序后的前5条类型为咨询的数据,
<td width="7%" height="25" align="center">编号</td>
<td width="51%" height="25" align="center">标题</td>
<td width="20%" height="25" align="center">类型</td>
<td width="22%" height="25" align="center">更新日期</td>
<%
Set Rs=conn.Execute("Select top 5 * From article where ntype="咨询" Order By articleid ")

If Not Rs.Eof Then
Do While Not Rs.Eof
%>
<tr>
<td align="center" bgcolor="#FFFFFF"><%=Rs("articleid")%></td>
<td align="center" bgcolor="#FFFFFF">"><a href="showarticle.asp?articleid=<%=Rs("articleid")%>"><%=Rs("title")%></a></td>
<td align="center" bgcolor="#FFFFFF"><%=Rs("ntype")%></td>
<td align="center" bgcolor="#FFFFFF"><%=Rs("idate")%></td>

</tr>
<%
Rs.Movenext
Loop
Else
%>
<tr>
<td colsapn=4 align="center"></td>
</tr>
<%End If%>

Answer 2

<%
dim Titletop
sqls="select * from 2_News where id="&request("id")
rs.open sqls,conn,1,3
if rs.eof or rs.bof then
response.Write("暂无信息")
else
Titletop = rs("title") '########### 网页标题
rs("hits")=rs("hits")+2
rs.update
end if
%>
<title><%=Titletop%></title>

Answer 3

在newsShow.asp里加一段js脚本
<SCRIPT LANGUAGE="JavaScript">
<!--
document.title=<%=request("title")%>;
//-->
</SCRIPT>

Answer 4

看了半天没搞明白要问的问题是什么，不知道是我理解能力差还是你表达能力差，郁闷