1个回答
展开全部
<%
dim conn,connstr
set conn=server.CreateObject("adodb.connection")
connstr="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="&server.MapPath("数据库路径")
conn.open connstr
qsl="select * from [表名] order by [条件] desc" '查询符合要求的记录按倒序排列
set rs=server.CreateObject("adodb.recordset")
rs.open qsl,conn,1,1
if rs.recordcount=0 then
response.Write("无记录")
else
for i=1 to 100 '循环输出100条记录
%>
循环输出前100条查询记录的html代码
<%
rs.movenext
if rs.eof=true then
exit for
end if
next
end if
rs.close
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
网易云信
2023-12-06 广告
UIkit是一套轻量级、模块化且易于使用的开源UI组件库，由YOOtheme团队开发。它提供了丰富的界面元素，包括按钮、表单、表格、对话框、滑块、下拉菜单、选项卡等等，适用于各种类型的网站和应用程序。UIkit还支持响应式设计，可以根据不同...
点击进入详情页
本回答由网易云信提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
