'输出表中字段内容
strsql1 = "select 出勤统计.员工编号,出勤统计.员工姓名,出勤统计.年,出勤统计.月,迟到,早退,旷工,加班天数,特殊加班天数,加班参数,特殊加班参数,迟到参数,早退参数,旷工参数 from 出勤统计,工资参数 "
rs_jisuan.Open strsql1, conn

If rs_jisuan.EOF = False Then

‘插入做运算后的数据到表单中
strsql2 = "insert into 工资单 (员工编号,员工姓名,年,月,其他应加项,其他应减项) values(rs_jisuan.fields(0),rs_jisuan.fields(1),rs_jisuan.fields(2),rs_jisuan.fields(3),rs_jisuan.fields(7)*rs_jisuan.fields(9)+rs_jisuan.fields(8)*rs_jisuan.fields(10),rs_jisuan.fields(4)*rs_jisuan.fields(11)+rs_jisuan.fields(5)*rs_jisuan.fields(12)+rs_jisuan.fields(6)*rs_jisuan.fields(13))"
Text1.Text = rs_jisuan.Fields(0)’主要用作本人测试语句有否错误结果有数据 成功
rs_gongzidan.Open strsql2, conn
strsql3 = "update 工资单 set 实发工资=rs_jiazai.fields(7)+rs_jiazai.Fields(8)+rs_jiazai.Fields(9)+rs_jiazai.Fields(10)+rs_jiazai.Fields(11) where 员工编号=rs_jisuan.fields(0)"
rs_shifatongji.Open strsql3, conn
rs_jisuan.MoveNext
End If
现在的问题是对象名rs_jisuan.fields与 rs_jiazai.fields无效  sql中的字母也没有边为大写Fields
请问谁可以为小弟解决？？？

有没有设置rs_jisuan？