[已解决]VBA中SQL运行

wffgg2008

各位大侠，小弟在运行一VBA时，里面有两句SQL，前面一句可以实现预期结果，说明相应的链接没问题呀，可后一句却不行，但这一句直接放在access里面却可以出结果，为啥呀？？
在VBA中为：
        sa = "select [Part_No] from [" & mytblName_AVL & "] as tmp group by [Part_No],[Project]  having (count(*)>1 and [Project] like '*UMA')"
        sSq = "delete * from " & mytblName_AVL & " where (((" & mytblName_AVL & ".Part_No) in (" & sa & ")) and ((" & mytblName_AVL & ".Project) like '*UMA'))"
        CNN.Execute sSq  ‘可以运行下去却相应的预期结果却没实行，没删除应删除的数据、、、、
mytblName_AVL为一变量了
在Access里面把mytblName_AVL改成对应的表名却可以出现结果，改成删除查询后可以删除数据、、、、

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2013-3-6 08:14

我加了UMB类似的记录，为了测试UMA后缀的条件。
还是SQL语句的写法不对。

1.     sa = "select Part_No from " & mytblName_AVL & " group by Part_No,Project having count(*)>1 and Project like '%UMA'"
   
2.     sSq = "delete * from " & mytblName_AVL & " where  Part_No in (" & sa & ")"
   

复制代码

如果只是从一个表里操作的话，数据库名这个前缀还是可以省略的。

跳转到最佳答案楼层

hwc2ycy

把附件传上来吧。

wffgg2008

hwc2ycy 发表于 2013-3-4 14:57
把附件传上来吧。

嗯嗯，帮忙看看哈、、、

wffgg2008

wffgg2008 发表于 2013-3-4 15:37
嗯嗯，帮忙看看哈、、、

呀呀没加成功再加上、、

hwc2ycy

你的SQL语句就查不到结果嘛，结果是空的，你先这条一条整明白吧。
delete * from HC where (((HC.Part_No) in (select [Part_No] from [HC] as tmp group by [Part_No],[Project]  having (count(*)>1 and [Project] like '*UMA'))) and ((HC.Project) like '*UMA'))

wffgg2008

hwc2ycy 发表于 2013-3-4 16:13
你的SQL语句就查不到结果嘛，结果是空的，你先这条一条整明白吧。
delete * from HC where (((HC.Part_No) ...

不是红色那部分呀?!我嵌的应是下面绿色这部分呀、、、
delete * from HC where (((HC.Part_No) in (select [Part_No] from [HC] as tmp group by [Part_No],[Project]  having (count(*)>1 and [Project] like '*UMA'))) and ((HC.Project) like '*UMA'))
我把整句放到access里面可以整出来呀，且可以转成图片上的呀、、、

hwc2ycy

hwc2ycy

执行删除前有44条记录。

wffgg2008

hwc2ycy 发表于 2013-3-4 19:20
执行删除前有44条记录。

没有呀，只有二十二条记录呀。。。班长可能执行两次了。
SQL那句呀，and 后面的也是主查询的，只有select 到and前面那点是子查询的。。。班长可以试下把子查询的语句放进access里面看看，有结果、、、

hwc2ycy

我直接在EXCEL里MQ运行查的，莫非在ACESS里的结果不同？