1188
社区成员
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
tztz520 2004-09-12
Dim db As Database
Dim rs As Recordset
Set db = OpenDatabase("C:\AA\dev.mdb")
Set rs = db.OpenRecordset("select* from tablename")
if rs.RecordCount>0 then rs.MoveLast
msgbox "当前记录总数: " & str(rs.RecordCount)
Dim rs As Recordset
Set db = OpenDatabase("C:\AA\dev.mdb")
Set rs = db.OpenRecordset("select* from tablename")
if rs.RecordCount>0 then rs.MoveLast
msgbox "当前记录总数: " & str(rs.RecordCount)
xxfeiyu 2004-09-12
rs是记录集
rs.movelast
N=rs.recordcount
RUKYO 2004-09-12
那可以用SQL语句来实现啊，举个例子说：
SELECT TOP 105 * FROM 表1 WHERE 房屋类型 = '大' ORDER BY 地址,房屋类型 DESC
SELECT TOP 105 * FROM 表1 WHERE 房屋类型 = '大' ORDER BY 地址,房屋类型 DESC
xhstudio 2004-09-12
我所用的那个表是一个相关住房信息的，里面用到地址
我正常是按地址+房屋类型排序打开表，
表打开以后，地址按序列排下去的，但不是每次都用到全部的，可能只用其中100~105条
所以想按记录号来取数据（相关打印，要不每次得取全部数据）
如果按记录号操作的话，相对的方便一些
我正常是按地址+房屋类型排序打开表，
表打开以后，地址按序列排下去的，但不是每次都用到全部的，可能只用其中100~105条
所以想按记录号来取数据（相关打印，要不每次得取全部数据）
如果按记录号操作的话，相对的方便一些
RUKYO 2004-09-12
我不明白楼主为何非要用根据一个号来表识一个记录，其实你完全可以用SQL语句结合你字段某值来查询出你所需要的记录
xhstudio 2004-09-12
要是在记录里加入自动编号字段的话，那我删除记录以后，号就不连续，我想这不是取当前记录的办法，我记着自动编号字段不会把你删除记录的号重新加入，还有就是打开表的时候是按一个字段排序的，而不能用自动编号字段打开表，这样编号字段的数据也就不对了
星魂.net说的是个办法
可是还有没有别的办法啊？？？？？
星魂.net说的是个办法
可是还有没有别的办法啊？？？？？
starsoulxp 2004-09-12
你的记录是怎么移动的？把代码贴出来看看。
记录移动时记录序号，例如
rs.movenext
i=i+1
记录移动时记录序号，例如
rs.movenext
i=i+1
RUKYO 2004-09-12
你可以在表中建立一个名为“ID”的自动编号字段，范例如下：
'工程->引用 Microsoft DAO3.x Object Library
Option Explicit
Public mDbs As Database
Public mWrk As Workspace
Dim mRst As Recordset
Private Sub Form_Load()
Set mWrk = CreateWorkspace("", "admin", "", dbUseJet)
Set mDbs = mWrk.OpenDatabase(App.Path & "\db1.mdb")
Set mRst = mDbs.OpenRecordset("Select * From Table1", dbOpenDynaset, dbDenyWrite)
If mRst.RecordCount > 0 Then
mRst.MoveLast '也是RecordCount属性
Debug.Print "记录总数是：" & mRst.RecordCount
mRst.MoveFirst
Do While Not mRst.EOF
Debug.Print mRst.Fields("ID") 'ID字段是你Access表中自动编号字段
mRst.MoveNext
Loop
Else
Debug.Print "记录总数是：0"
End If
mRst.Close
Set mRst = Nothing
End Sub
'工程->引用 Microsoft DAO3.x Object Library
Option Explicit
Public mDbs As Database
Public mWrk As Workspace
Dim mRst As Recordset
Private Sub Form_Load()
Set mWrk = CreateWorkspace("", "admin", "", dbUseJet)
Set mDbs = mWrk.OpenDatabase(App.Path & "\db1.mdb")
Set mRst = mDbs.OpenRecordset("Select * From Table1", dbOpenDynaset, dbDenyWrite)
If mRst.RecordCount > 0 Then
mRst.MoveLast '也是RecordCount属性
Debug.Print "记录总数是：" & mRst.RecordCount
mRst.MoveFirst
Do While Not mRst.EOF
Debug.Print mRst.Fields("ID") 'ID字段是你Access表中自动编号字段
mRst.MoveNext
Loop
Else
Debug.Print "记录总数是：0"
End If
mRst.Close
Set mRst = Nothing
End Sub
xhstudio 2004-09-12
不好意思，是我没说明白，不是取得表的总记录数
是当前正在操作的记录是第几条
比如
当前打开的表有1000条记录
我怎么知道我正在操作的是哪条呢
是当前正在操作的记录是第几条
比如
当前打开的表有1000条记录
我怎么知道我正在操作的是哪条呢
VC DAO 操作Access的测试例子.rar VC DAO 操作Access的测试例子，本演示是VC 使用DAO连接Access数据库的一个测试程序，学习如何使用DAO操作Access，通过添加一个数据库记录来演示添加、删除、插入数据的例子，比较简单，面向VC 初学者的一个例子。...
VBA+SQL+Access：访问数据表的第二种方式DAO 通常情况下，使用ADODB就可以满足物料...上面三句代码，可以获得当前Access数据库的控制权。 Tips: 申明变量时：Dim CurDB as DAO.database，DAO写不写好像都可以，但是方式一ADODB就不行。 常用语句： CurDB.execut
Spring入门第一讲——Spring框架的快速入门 就拿持久层（也即dao层，data access object，数据访问对象）的开发来说，官方推荐做法是先创建一个接口，然后再创建接口对应的实现类。所以，这里，我会以dao层的开发为例来证明Spring的IoC的底层实现原理就是工厂...
mfc利用SQL、DAO调用access数据库 程序效果图：如图1、图2 图1 图2 1、首先应包含dao的头文件 #include "afxdao.h" 2、声明数据库及数据记录集 CDaoDatabase db; //数
Dao设计思想 为什么存在Dao设计思想？ 一般来说，在一个数据库访问操作中，都具有数据库中取数据的... Dao：data Access Object，数据访问对象，在一个系统中，将所有和数据库打交道的操作封装成单独的API，所有需要访问数据...
Access+2000中文版高级编程 Access2000中文版高级编程 目录 第一部分 编程基础 1 第1章 宏与代码 3 1.1 何时使用代码代替宏 4 1.1.1 何时用宏 4 1.1.2 何时用代码 4 1.2 宏到代码的转换 5 1.2.1 使用DoCmd对象 5 1.2.2 与宏...
DAO读写ACCESS文件 我在网上想寻找一个使用CDao*类来从数据表读出或写入数据资料，但是我没有得到什么线索。现在自己完成了这个功能，从一个微软的Access文件（.MDB）文件中快速、动态、简便的创建/写入/读出数据 。我们的例子是一个...
JSP开发模式（DAO模式）并使用DAO模式完成用户的添加与用户的登陆以及用户信息的输出等 DAO（Data Access Object，数据访问对象）， JSP Model1采用JSP+JavaBean的技术，将页面显示和业务逻辑分开。其中，JSP实现流程控制和页面显示，JavaBean对象封装数据和业务逻辑。JSP Model1的工作原理如下图所示。 ...
Java+MyEclipse+Tomcat (六)详解Servlet和DAO数据库增删改查操作 此篇文章主要讲述DAO、Java Bean和Servlet实现操作数据库，把链接数据库、数据库操作、前端界面显示分模块化实现。其中包括数据的CRUD增删改查操作，并通过一个常用的JSP网站前端模板界面进行描述。这篇文章可以认为...
spring boot(13)-logback和access日志 tomcat中默认是有access访问日志的，用于记录访问者的IP，不过在spring boot中这个日志默认是关闭的。如果你的服务器结构中有nginx类的http服务器，access日志应该是在nginx中配置的。而tomcat这样的后台服务器只...
如何快速使用Access实现一个登录验证界面？ 上学期末的时候信管班的一个同学问我会不会Access，能不能用它实现一个登录验证界面，说实话，之前对Access只是有所耳闻，随便敷衍了几句。 过了几天看到协会有一本Access数据库程序设计的计算机二级考试的书，...
直接通过ADO操作Access数据库（修改版） 本文根据VCKBASE网站的上的《直接通过ADO操作Access数据库》 修改而来，版权归原作者/徐景周直接通过ADO操作Access数据库 作者/徐景周 下载源代码 我在《VC知识库在线杂志》第十四期和第十五期上曾发表了两篇文章...
DAO设计模式详细--实例开发 DAO设计模式详细–实例开发 文章目录DAO设计模式详细--实例开发1.0 程序的分层...Data Access Object,数据访问对象 javabean是把视图和业务进行分离,dao是把数据库的操作和业务逻辑进行分离. 主要的功能是用于进行数
VO AO PO DAO 我告诉你 （转载） DAO(data access object) 数据访问对象 是一个sun的一个标准j2ee设计模式，这个模式中有个接口就是DAO，它负持久层的操作。为业务层提供接口。此对象用于访问数据库。通常和PO结合使用，DAO中包含了各种数据库的...
DAO及相关实现类 DAO：Data Access Object访问数据信息的类和接口，包括了对数据的CRUD（Create、Retrival、Update、Delete），而不包含任何业务相关的信息。有时也称作：BaseDAO。 作用：为了实现功能的模块化，更有利于代码的维护...
JScript 快速开发框架 Edk:DAO 数据库连接 当前 DAO 支持 Access、MySQL（要装ODBC驱动）和 SQLite（同样，也要装驱动）的字符连接串。 针对已查询出来的记录集，是不是要再经过一定的处理呢？是的。我们是 JS 的语言，就转换为转换为天然的 JSON 结构吧...
使用GetRows（）从DAO记录集中检索数据 从DAO到ADO，此方法略有不同，因此出于讨论目的，我们将讨论DAO记录集。 下面的技巧将介绍ADO方法。 对于DAO和ADO讨论，我们将使用一个由5个字段组成的查询，该查询基于示例Northwind数据库的Employees表。...
