-- 作者:admin
-- 发布时间:2007-8-9 9:20:54
-- [学习]删除两个表中的相同记录
有数据表1和数据表2,两个数据表。它们有着一个相同的字段“电话号码”。并且两个数据表中都存储有大量的数据。为了管理上的方便,我决定将数据表2中的电话号码追加到数据表1中。但是问题由此产生了,数据表2与数据表1中的部分数据是相同的,将如何操作。 在项目窗口上,拖放两个ADO数据库连接、两个ADO数据表、两个数据源、两个浏览编辑网格、记录循环、普通按钮等构件。 属性设置: ADO数据库连接1数据库名称为“数据库1”;ADO数据表1数据库为“ADO数据库连接1”,表名称为“表1”,活动属性为“真”;数据源1的数据集为“ADO数据表1”;浏览编辑网格1的数据源为“数据源1”。 ADO数据库连接2数据库名称为“数据库2”;ADO数据表2数据库为“ADO数据库连接2”,表名称为“表2”,活动属性为“真”;数据源2的数据集为“ADO数据表2”;浏览编辑网格2的数据源为“数据源2”。 ADO数据表1的定位查询参数设置:定义属性设为“电话号码”;字段甲为“电话号码”。 ADO数据表1的操作数据,甲字段名称为“电话号码”。 ADO数据表2的操作数据,甲字段名称为“电话号码”。 记录循环的数据集属性为“ADO数据表2”
事件设置: 当鼠标单击“普通按钮1”时,执行记录循环的方法“开始记录循环”。 当开始记录循环的时候,取出表2的第一条记录与表1中的记录进行定位查询。如图1所示
此主题相关图片如下:
 图1 如果查询成功了,即表2中的一条记录与表1中的一条记录相同,就删除表2中的当前记录。当在ADO数据表1中查询成功了,事件如图2所示
此主题相关图片如下:
 图2 如果查询失败了,表明在表1中没有相同记录,就把表2的当前记录追加到表1中。当在ADO数据表2中查询失败了,事件如图3所示
此主题相关图片如下:
 图3
|