- Java 双重比较
- java - 比较器与 Apache BeanComparator
- Objective-C 完成 block 导致额外的方法调用?
- database - RESTful URI 是否应该公开数据库主键?
我目前正在学习如何使用 VBA 中的 ADO(从 Excel 运行)创建数据库和表格。我能够创建格式为 .mdb(使用连接“Microsoft.Jet.OLEDB.4.0;”)或 .accdb(使用连接“Microsoft.Ace.OLEDB.12.0;”)的数据库 - 我能够创建表并插入记录。到目前为止一切顺利。
但是我注意到,在我通过 ADO 创建这样一个数据库之后,如果我在 MS Access 中打开它,文件大小会显着减小。注意:只有在 Access 中打开它的 Action 才有这个效果。我不会对那里的数据进行任何更改。
举个例子:ADO新建的数据库是1304k;然后在Access中打开后是816k。
据我所知,在 Access 中打开时没有数据丢失。我只能猜测 Access 在打开时会以某种方式自动优化数据库,或者以其他方式删除由 ADO 插入的不必要的内容。显然,我希望文件大小尽可能小。所以我想知道:
1) 有谁知道这里发生了什么?
2) 如果 ADO 插入了不必要的数据,我有什么办法可以通过编程对其进行优化吗?我的最终用户将只运行 Excel,所以我不能要求他们定期在 Access 中打开数据库来优化数据。
最佳答案
不知 Prop 体如何创建表、导入记录、结构和模式;或您的环境 2000/02/03 mdb 或 2007/10/13 accdb 版本、机器(32 位/64 位、笔记本电脑/台式机)、Windows 操作系统(XP、Vista、7、8、10)、单 CPU 或局域网,只能推测。
首先重要的是要了解奇怪的、难以定义的程序,即 MS Access .本质上,MS Access 是一套相互连接的对象:Jet/ACE SQL 引擎、GUI 前端应用程序、报告生成器和 IDE 编码接口(interface)。它实际上不是数据库,但默认情况下附带 ACE 引擎,顺便说一下,它不限于 MS Access,而是完全适用于所有 Office 和其他 PC 应用程序的 Windows 技术(.dll 文件)。 Excel 甚至可以在没有安装 Access 的情况下运行 accdb/mdb 文件!当与其他数据库(例如另一个文件服务器(流行的、开源的)对应物 SQLite 和客户端服务器(SQL Server、MySQL、PostgreSQL))相比时,它实际上是 Jet/ACE 组件,它是被比较的关系引擎。有趣的是,Access 可以通过关闭其默认设置来连接到所有上述 RDBMS。
话虽如此,MS Access 的多面性在 SQL 后端引擎和 VBA 前端都使用了临时对象,与硬盘和内存交互,尤其是在导入记录和各种查询时。甚至 MSN 网站在其 Compact and repair 中也提到了它页。
Access creates temporary, hidden objects to accomplish various tasks. Sometimes, these temporary objects remain in your database after Access no longer needs them.
此外,生成表和操作查询(附加/更新/删除)实际上在提交最终更改之前复制了整个结果集。因此,系统会提示用户在更改完成之前添加的记录数,并有机会回滚操作。因此在迁移数据后,您的数据库可能会略微恢复到以前的状态。然后,有 garbage collection in VBA当对象不再使用并且 OLEDB 驱动程序中断连接时释放内存。您可能会看到文件大小有所不同,因为在您的 VBA 处理完成并超出范围后恢复了一些空间。我想知道您在什么情况下查看了较大的 Access 文件?刷新的 Windows 资源管理器或 CPU 重启会改变 View 吗?您是否阅读了文件属性(通过右键单击)或资源管理器的详细信息部分,它们的近似值不同?您是否看到其他文件大小发生变化,例如 Excel 工作簿?这是经常发生还是异常?
管理数据库创建过程 purely in code可能是使用数据库而不是使用 Access 的图形用户界面的最有效方式,因为多用户访问锁定和应用程序对象会增加一些开销。
总而言之,ADO 不太可能在您不具备开发知识的情况下添加任何数据或组件。定期,decompile, compact ,并显式删除 VBA 对象(即 set obj = Nothing
)。查看有帮助 performance tips .此外,不要过分关注文件大小,而是性能和完整性,因为在应用程序的整个过程中,文件大小将是一个波动的指标。最后一点,尽管 Excel 非常流行且易于使用,如 MS Access 强大的 native 组件所述,请考虑在 Access 中开发您的最终使用需求(免费 runtimes 可通过 Microsoft 获得,允许使用,因为 Jet 是一种 Windows 技术).在各个方面,Access 都提供了更稳定的多用户应用程序和自动化环境。
关于由 ADO(来自 VBA)创建的数据库在 MS Access 中打开后减小了文件大小。为什么?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/32999627/
我有一个 VBA 脚本,可以将数据从一张表复制到另一张表。复制的数据被放入公式中,计算出的数量被复制回原始工作表。我正在尝试获取它,以便 VBA 脚本为每一行执行此操作。我有 1000 行数据。 Su
如何让 excel 在我的“临时”表上列出所有可用的环境变量?下面的代码没有为我返回任何东西...... Sub ListEnvironVariables() Dim strEnviron A
好的,这就是我想要完成的事情:我正在尝试将所有 VBA 代码从“Sheet2”复制到“Sheet 3”代码 Pane 。我不是指将模块从一个模块复制到另一个模块,而是指 Excel 工作表对象代码。
我正在做一个项目来使用 rule-triggered 处理一些传入的 Outlook 邮件。 VBA 代码。 但是,我不想在代码需要更改的任何时候手动更新每个用户收件箱的代码。所以我的想法是把一个文本
我想从另一个代码 VBA 中评论包含 Msg Box 的行。我正在尝试使用 Library VBA EXTENSIBILITY,但我没有找到解决方案。 欢迎任何帮助。 这是我的代码: Sub Comm
我正在尝试编写程序的最后一部分,我需要从 Access 文档中提取数据并将其打印到新的工作簿中。 首先,我将获取产品供应商的名称并创建一个包含每个供应商名称的工作表,然后我想遍历每个工作表并打印每个供
我有一个要求,我试图查找数据中的日期是否大于或等于当前日期,那么它应该显示"is"。 这是我的代码, RDate = Application.WorksheetFunction.if(RSDate>=
我试图想出一个宏来检查单元格中是否存在任何数字值。如果存在数字值,请复制该行的一部分并将其粘贴到同一电子表格内的另一个工作表中。 Sheet1 是包含我所有数据的工作表。我正在尝试查看 R 列中是否有
我有一个具有密码保护(防止未经授权访问宏)的 VBA 宏,它按预期运行。用户单击按钮,宏运行。内容大致如下: Sub sample() ActiveSheet.Unprotect Pass
我想通过VBA删除工作表中包含的VBA代码。目前,我有一个代码可以将工作表复制到新工作簿并从中删除所有图像。但是,这些图像被设置为在代码中的 Worksheet_Activate 上执行操作,每当我轻
我有一个 vba 代码,它指定要查看的特定工作表名称,例如工作表 2, 但是,如果有人忘记将工作表名称更改为sheet2,我可以添加一段动态代码来自动更改调用工作表名称的vba代码吗?例如,从左边算起
VBAExcel 2016 如果执行某些代码后该范围的列数较少,我将尝试动态调整该范围的大小。引用了 MS 文件和各种在线示例,但没有成功。 https://msdn.microsoft.com/en
我在任何地方都找不到这个问题。在 Visual Basic (excel) 中,我可以按 F8 并循环浏览每一行。但是假设我想开始子程序,然后在执行前两行之后,我想跳到第 200 行。到目前为止,我一
这是我昨天的问题的补充,所以我开始一个新问题。基本上,我在 excel 的工作表上得到不同范围的数据,并且数据范围每周都不同,因此最后使用的列和最后使用的行会有所不同。 我想根据名称合并第 3 行和第
我的想法是创建一个函数来传递这样的双数组: Function pass(a() As Double, b() as double) As Boolean Dim i As Integer, j As
我正在使用 vlookup 运行 VBA 代码,但是,它需要几秒钟才能完成,尽管具有行的工作表只有不到 150 行。 滞后主要出现在 col 23 的生成期间。 包含此代码的主工作表有大约 2300
我在 VBA 中有一个小问题,我想将 Range 函数的行和列以 String 格式放置,如下所示: debut = "BH" & LTrim(Str(i)) fin = "DB" &
我正在尝试使用 Visual Basic 编写 Webcrawler。我有一个包含链接的列表,存储在 Excel 中(第 1 列)。然后宏应打开每个链接并将网站中的某些信息添加到 excel 文件中。
我正在尝试自动生成报告(请原谅我缺乏 Excel 经验),但遇到了这个错误。在单元格中显示#NAME。代码应为工作簿另一页上的所有列 E 选择单元格和 COUNTIF <1。这是一个简单的语法错误吗?
我正在使用“Sheet1”上的命令按钮使用 VBA 创建图表,但是该图表正在添加到另一个工作表(“Sheet2”)。 添加图表后,我使用以下代码根据 DataLabel 值对条形图进行着色并更改 Da
我是一名优秀的程序员,十分优秀!