vb复合查询

来源：百度知道 编辑：UC知道 时间：2024/07/08 15:12:04
我在写一个会议查询模块，现在要求有两个text进行查询条件的录入：会议编码和签到状态（状态不输入则表示查询该会议编码的全体人员） 点击查询按钮时 还要统计 选中会议编码的应到人数 实到人数和出勤率 麻烦哪位大侠帮帮忙 分数不是问题
补充一下： 我用的access 为方便起见 我的数据库名叫gl 表为rs 所有信息都在里面
还有就是我前面做的时候都是用控件链接数据库，现在看你们的都不用控件 我一下有点接受不了
看的不是很懂，希望哪位大侠能在帮帮忙 我的QQ363670784 希望今天就能解决问题 可以要求追加分数

已完成
=================
1 当会议编号为空时，查询所有会议内容信息
2 当输入会议编号时，计算符合会议编号的信息
3 DATAGRID显示的是同时符合状态标志和会议编号的信息
4 应到人数、未到人数和签到率计算的是符合会议编号的信息
5 输入会议编号敲回车键或状态值选定，所有数据自动计算

其实这是一个SQL查询问题，条件是从两个TEXT中得到。
假设会议编码从txtNo中输入，签到状态从txtStatus中输入
查询按钮cmdSearch
数据库：TEST 表：tmpTB 字段：会议编码，签到状态，员工工号，……
工程－引用－"Microsoft ActiveX Data Objects 2.x"
Private Sub cmdSearch_Click()
dim rs as adodb.recordset
dim tSql as string
dim ydID as integer '应到人数
dim sdID as integer '实到人数
dim cql as single '出勤率
set rs=new adodb.recordset
rs.activeconnetion="Driver={SQL Server};Server=.;Database=Test;Uid=sa;Pwd=" '------------数据库连接，根据自己的数据做相应改动
'统计选中会议编码的应到人数
tsql="select Count(员工工号) from tmpTB where 会议编码='"+txtNo.Text+"'"
rs.open tSql,,adOpenStatic, adLockOptimistic
ydID=rs.fields(0).value
rs.close
'统计选中会议编码的实到人数
tsql="select Count