UC知道ASP+ACCESS，分析调用文章！高手快进！高分奖励！
来源：百度知道 编辑：UC知道 时间：2024/05/03 10:24:26
我想在主页中调用新闻发布系统中的文章，新闻发布系统中有很多栏目，例如学习园地、班级趣事、师生感情、学生文章。我做了下面的代码，不过把学习园地、班级趣事、师生感情、学生文章这几个栏目的文章全部显示在一起，而我想这几个栏目分开，这样便于浏览查询。请帮我分析一下：我写的代码如下：
<%
dim conn,connstr
on error resume next
connstr="DBQ="+server.mappath("$data$/#$base.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set conn=Server.CreateObject("ADODB.CONNECTION")
conn.open connstr
SqlChar="'"
%>
<%sub index_news(ind) '''ind为最新的条目数
'============================================================新闻动态
sql="SELECT top "&ind&" * From NewsData Order BY D_id DESC"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
Response.Write "<table cellSpacing=0 cellPadding=0 width='100%' border=0><tr><td width='20%' height='20'>"
<%
dim conn,connstr
on error resume next
connstr="DBQ="+server.mappath("$data$/#$base.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set conn=Server.CreateObject("ADODB.CONNECTION")
conn.open connstr
SqlChar="'"
%>
<%sub index_news(ind) '''ind为最新的条目数
'============================================================新闻动态
sql="SELECT top "&ind&" * From NewsData Order BY D_id DESC"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
Response.Write "<table cellSpacing=0 cellPadding=0 width='100%' border=0><tr><td width='20%' height='20'>"
你先用表格把你想做的分块划出来，然后把这段代码复制在每个表格里
注意每个模块的代码前面加上：rs.movefirst
个人认为在知道里问这种问题不会得到很好的答案
请去技术论坛问 例如csdn
另：如果你初学的话，那么我认为完全可以放弃asp了，学习asp.net吧，一个ms都放弃的技术...了解到现在可以了
在数据库里设个数值型的字段bid,比如1表示学生园地,2表示班级趣事...
再把sql语句改成sql="SELECT top "&ind&" * From NewsData where bid="&bid&" Order BY D_id DESC"
bid=request.querystring("bid")
这样不就分开了,不知道是不是这样的意思?