Rstmp必须是个前面已经声明了的对象,从你的句子里看应该是个记录集。
你改为这个试试,得先定义connRstmp.Open "select * from f单头 where 状态='已审核'and 单号 like '费用%' and 日期 between '" & a1 & " 00:00:00' and '" & a1 & " 23:59:59'",conn,3,1
Rstmp是一个控件还是对象变量!如果是控件的话需要一个Rstmp控件,如果不是的话定义一下Rstmp变量就OK了!