Office中国论坛/Access中国论坛

标题: 求助呀! [打印本页]

作者: nagee 时间: 2005-3-17 00:32
标题: 求助呀!
Private Sub 数据清理_Click()

same = "delete * from 作业人员数据 where (((作业人员数据.作业日期) <> [作业排班表]![作业日期]) and ((作业人员数据.姓名)<>[作业排班表]![姓名]) and ((作业人员数据.班别)<>[作业排班表]![班别]))"

DoCmd.RunSQL same

End Sub

要删除一些不同记录的东东!过不了!

作者: 静儿 时间: 2005-3-17 00:48
......)<>[作业排班表]![班别]));"sql语句我不太会看，但语句最后应该有个；号做结束。

作者: nagee 时间: 2005-3-17 01:04
没有错!是我写漏了!我只是要删除"作业人员数据"表中的多余记录!条件是在"作业排班表"表里的"作业日期","姓名""班别"三个与"作业人员数据"表中三个同名字段内容对比,如果"作业排班表"里没有的,就删除!

作者: nagee 时间: 2005-3-17 01:25
DoCmd.RunSQL "delete * from 作业人员数据 where 作业人员数据.作业日期 <> (select 作业排班表.作业日期 from 作业排班表) and 作业人员数据.姓名 <>(select 作业排班表.姓名 from 作业排班表) and 作业人员数据.班别 <> (select 作业排班表.班别 from 作业排班表);"

这样也不行!会提示:"子查询最多返回一个记录"

作者: hi-wzj 时间: 2005-3-17 03:52
将例子放上来吧，做起来省事点。

作者: nagee 时间: 2005-3-18 04:31
传不上来!麻烦各位了!急!

作者: sgrshh29 时间: 2005-3-18 05:01
您的二个表之间没有任何关联性，那就有可能最多只能删除一条记录。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)