【原创 / 源码】窗体操作回溯器（RsUndo）发布贴（当前版本：V2.01）

LucasLynn

（注意：由于本贴不断更新，请下载本贴中最后发布的最新版本）

名称：窗体操作回溯器（Recordset Undo）
版本：V1.0 Beta 1

介绍：
　　这个程序源于静儿的一个构思，我当时听了觉得很有实用价值，因此在EDF完成的后期动手设计编码的。设计开发时间到目前为止已经超过了一个月，算是我学Access以来第一个心血之作吧。
　　程序的设计目标是允许用户对于他们在窗体上对于数据进行操作的时候，可以回溯操作。类似于Access本身的Undo功能，不同的是这个程序提供的是无限级的回溯，能够恢复编辑过的数据/删除的数据等等。


特点：
1、普遍适用于各种数据操作窗体，包括子窗体。
2、便于使用者调用（目前只要1行定义，1行初始化，1行面板激活，共三行代码）。
3、能够在同时打开的多个数据操作窗体上同时使用，相互之间不冲突。
4、能够记录下每一个数据操作，包括：添加记录，删除记录，编辑字段。
5、能够对于每一个记录进行回溯。
6、窗体关闭/打开的时候，能够选择删除/保留操作记录。
7、回溯操作支持OLE对象，也就是长二进制数据格式。
8、回溯操作能够完全恢复带自动编号的字段。
9、回溯操作支持多步操作回溯，一次点击完成。
10、回溯操作面板可自定义风格，自定义方法简单，用户可以在自己的系统中设计自己喜欢的面板风格。目前系统提供三种风格的回溯操作面板（简洁、紧凑、动态），动态风格面板当你点击标题栏的时候，可以在摘要/详细模式之间切换。
11、由于本系统在Recordset层实现，因此回溯操作不仅限于绑定了控件的可见字段，只要是窗体数据源中有的字段，都将进行回溯。

12、在本贴中随后发布的2.0版中，已经全面支持Redo功能。


测试声明：由于是测试版本，本程序有以下几点需要注意（这些问题都将在正式版中被解决）：
1、测试版为了测试多种环境的应用，为了广泛发现问题，以便改进，所以取消了大量的容错代码，使用者如果发现错误，请回帖告诉我，回帖中请详细描述错误发生的环境，操作，最好能附上附件和截图。
2、测试版由于可能在正式版中进行大量修正，因此暂时不包含使用文档，但是我想这个软件的使用我已经做得足够简单了，只要稍微有一点VBA基础的开发者都能够很顺利地调用。
3、测试版必然存在大量问题，因此请勿在操作重要数据时使用，否则引起的任何损失使用者自负。

发布方式：公开源码

程序下载：

游客，如果您要查看本帖隐藏内容请回复

[此贴子已经被作者于2006-3-31 8:47:32编辑过]

ui

瞧 瞧 精品!

ui

看完了源码,很有启发,谢谢!!

LucasLynn

测试报告：

问题概括：

　　当删除记录被回溯后，由于对于自动编号字段进行了强制写入，导致下一条记录直接使用下一个自动编号，从而导致编号重复而出错。

本问题将在正式版中被修正。

[此贴子已经被作者于2005-9-21 23:29:56编辑过]

LucasLynn

测试报告：

问题概括：

　　当进行批量回溯的时候，尤其是删除和添加操作比较多的时候，由于回溯操作速度太快……（@#$#$#%!#$!@#$），导致数据引擎跟不上，会引起程序错误，目前的解决办法很简单，只要在出错后进入调试模式，然后按F5继续运行即可（人工延时）。

本问题将在正式版中被修正。

Grant

呵呵,果然厉害....测试版也杀.

真主

谢谢,看我能不能学会

tonywong

快下!

ahtyyygy

下载中

laowu

看看