asp调用数据库内容后在对应表格显示怎么处理

id=request("id")

set rs = servercreateobject("adodbrecordset")

sql="select from news where id="&id

rsopen sql,conn,1,1

responsewrite "<table width=""100%""><tr><td>标题</td><td>日期</td></tr>"

if not rdsArtEOF then

do while not rdsArtEOF

responsewrite "<tr><td>“”&biaoti&"“</td><td>""&riqi&""</td></tr>"

responsewrite "<tr><td colspan=""2"">“”&neirong&"“</td></tr>"

rsmovenext

loop

else

responsewrite "<tr><td colspan=""2"">没有新闻！</td></tr>"

end if

responsewrite "</table>"

rsclose

set rs = nothing

你的要求大致这样，可根据要求修改

<!--列表-->

<%

connopen connsdiv

set rs=serverCreateObject("adodbrecordset")

sql="select from test order by id desc"

rsOpen sql,conn,1,1

page=requestquerystring("page")

if page="" then

page=1

else

page=Cint(page)

end if

Section=requestquerystring("section")

if Section="" then

Section=1

else

Section=Cint(Section)

end if

'变量赋值

intPageSize=5 '每页显示记录数

intSectionSize=5 '多少页为一段，像GOOGLE一样

PrevSectionText="<FONT face=webdings>7</FONT>" '上一段的链接文字

NextSectionText="<FONT face=webdings>8</FONT>" '下一段的链接文字

PrevPageText="<FONT face=webdings>3</FONT>" '上页的链接文字

NextPageText="<FONT face=webdings>4</FONT>" '下页的链接文字

strPageUrl="t=" & strQueryString

rspagesize=intPageSize

intCount=rsRecordCount

intPageCount=rspagecount

intSectionCount=(intPageCount - 1) \ intSectionSize + 1

if intCount>0 then

rsAbsolutePage=page

end if

for i=1 to intPageSize

if rseof then exit for

responseWrite("<a herf="&id&">")

responseWrite("<font>"&rs("aa")&"</font>")

responseWrite("<a>")

rsmovenext

next

%>

<!--列表结束-->

<!--翻页按钮-->

<font>共有<%=intCount%>记录，分<%=intPageCount%>页，当前页<%=Page%>，每页显示<%=intPageSize%>条记录

<%

'计算每一段的开始页

intStarPage=(Section-2) intSectionSize + 1

'前一段

if Section<=1 then

responseWrite(PrevSectionText & " ")

else

responseWrite("<a href='" & strPageUrl & "&page=" & intStarPage & "&section=" & Section-1 & "'>" & PrevSectionText & "</a> ")

end if

'显示页码列表

responseWrite("第")

intStarPage=(Section-1) intSectionSize + 1

for p=intStarPage to intStarPage + intSectionSize - 1

if p > intPageCount then exit for

if p=page then

responseWrite("<strong>[" & p & "]</strong> ")

else

responseWrite("<a href='" & strPageUrl & "&page=" & p & "&section=" & Section & "'>[" & p & "]</a> ")

end if

next

responseWrite("页")

'后一段

intStarPage=(Section) intSectionSize + 1

if Section>=intSectionCount then

responseWrite(" " & NextSectionText)

else

responseWrite(" <a href='" & strPageUrl & "&page=" & intStarPage & "&section=" & Section+1 & "'>" & NextSectionText & "</a> ")

end if

%>

<select name="page" size="1" onChange="windowlocation='<%=strPageUrl & "&section="%>' + (Mathfloor((parseInt(thisvalue)-1)/<%=intSectionSize%>)+1) + '<%="&page="%>' + thisvalue">

<option value="<%=page%>" selected>第<%=page%>页</option>

<%

for i=1 to rspagecount

%>

<option value="<%=i%>" >第<%=i%>页</option>

<%

next

%>

</select>

</font>

<!--翻页按钮结束-->

sql="select from admin where admin='"&admin&"'" 改成

sql="select from admin "

这样admin查询的就显示所有用户了

如果是要用户查询就显示所有用户那个下面这句要改下

sql="SELECT From ad where user='"&user&"' Order By time desc"改成

sql="SELECT From ad Order By time desc"

以上就是关于asp调用数据库内容后在对应表格显示怎么处理全部的内容，包括:asp调用数据库内容后在对应表格显示怎么处理、ASP读取数据库全部数据，然后分页显示，每个页面15条。那位大大帮帮我。。、asp程序的数据读取问题，如何将全部显示出来等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！