7-2.asp

来自「windowsCE 串口」· ASP 代码 · 共 50 行

ASP
50 行
字号 
<html>
<!--#include file = adovbs.inc -->
<%
'设置每一页所要显示的记录条数，这里为10条。
PageSize=10
'以Recordset对象的Open方法参数设置的方法连接数据库
Set session("rs")=Server.CreateObject("Adodb.recordset")
Constr="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("test.mdb")
Session("rs").cursorlocation=aduseclient

'用Recordset对象的Open方法连接数据库。
Session("rs").open "article",Constr,adopenkeyset,adlockreadonly,adcmdtable

'设置Recordset对象的每一页数据记录条数大小。
Session("rs").PageSize=PageSize

Response.write "<center><table border=3 bgcolor=00ffee cellspacing=0>"
Response.write "<tr>"
Response.write "<td>顺序</td>"
'显示表的各个数据字段的名称
for i=0 to session("rs").fields.count-1
  Response.write "<td>"&Ucase(Session("rs")(i).name)&"</td>"
next
Response.write "</tr>"

for j=0 to Session("rs").PageSize-1
  Response.write "<tr>"
  '显示顺序值。
  Response.write "<td>"&Session("rs").Absoluteposition&"</td>"

'其中session("rs").fields.count表示表的字段数
  for i=0 to session("rs").fields.count-1
    '把当前的数据记录显示出来
    Response.write "<td>"&session("rs").fields(i).value&"</td>"
  next  
  Response.write "</tr>"

  '移到下一条数据记录，然后判断是否到表尾。
  session("rs").movenext
  if session("rs").Eof then
     Exit FOR
  End if
next

response.write "</table><br>"
%>
<%'引入另一个文件，完成翻页功能%>
<!--#include file=link2.asp-->
</html>

7-2.asp - 源码说明

本页面展示了「windowsCE 串口」中的 7-2.asp 源码文件，采用 ASP 编程语言编写，共 50 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与WindowsCE相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?