设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 2801|回复: 8
打印 上一主题 下一主题

[查询] 关于用代码写查询的问题

[复制链接]
跳转到指定楼层
1#
发表于 2011-5-2 17:23:48 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
用代码写查询两个查询应该如何写(注:必须用代码!如在查询中实现很简单)?如:
查询1="SELECT 公司名称,员工名称 FROM 考勤表 GROUP BY 公司名称,员工名称"
查询2="SELECT 公司名称, Count(员工名称) AS 员工数量 FROM 查询1 GROUP BY 公司名称"
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2011-5-2 19:46:29 | 只看该作者
首先要说明的是,你写来的目的是做什么呢???
3#
发表于 2011-5-2 21:57:42 | 只看该作者
创建查询的方法很多:
1、用DAO的Createquerydef方法。
2、用ADO中Connection子对象的Execute方法。
如果不需要创建,只需要执行的话,Docmd的RunSQL方法也可以考虑。
Roy不建议大家这样创建查询。如果从执行效率来看,写了代码并不比直接执行查询快很多;如果不想用户看到查询的话,可以设置工作组的权限,没必要为这个写那么复杂的代码。——当然,如果想秀下Coding的话,可以考虑下。
4#
 楼主| 发表于 2011-5-4 15:13:24 | 只看该作者
回复 roych 的帖子

因我是用在VB中所以一定要写代码,请用我的例子说明一下,我是很明白你的意思,谢谢了!
5#
发表于 2011-5-4 15:35:04 | 只看该作者
先附上DAO的代码吧,很简单,就两句:
Private Sub CmdDAOQry_Click()
Dim qry As DAO.QueryDef
Set qry = CurrentDb.CreateQueryDef("DAO查询", "select * from cf2000eorder where [Substr Code]='CFP'")
End Sub
稍后完成了ADO部分再传上附件
6#
 楼主| 发表于 2011-5-4 17:44:32 | 只看该作者
回复 roych 的帖子

先谢谢roych 的帮忙!
7#
 楼主| 发表于 2011-5-5 15:50:19 | 只看该作者
回复 roych 的帖子

roych 可能没有明白我的意思,我是说查询2利用查询1的结果作为表再查询.不是创建一个查询.
8#
 楼主| 发表于 2011-5-5 17:17:21 | 只看该作者
我已经解决问题了.
9#
发表于 2012-9-23 16:24:13 | 只看该作者
如何实现的?我也需要这个功能
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-18 06:33 , Processed in 0.085857 second(s), 32 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表