有没有高手帮忙解决这个问题啊，

贴出有问题的代码，大家看看

<% 
Dim S_Key,RST,StrSQL,M_key,Y_key,date1
S_Key = Trim(Request("key")) '得到搜索关键字的值 
M_key = Trim(Request("key1"))
If S_Key <>"" then 
Set RST=Server.CreateObject("ADODB.RecordSet") 
StrSQL="Select mailNum,sum(name) as 合计 from 工票 where mailNum like '%" & s_Key & "%' or 条码 like '%" & s_Key & "%' and date like '%"&m_key&"%' group by mailNum"
RST.Open StrSQL,conn,1,1 '得到搜索后的记录
If RST.BOF And RST.EOF Then 
%> 

上面这个代码如果去掉----and date like '%"&m_key&"%' 这个判断时间的语句就正常，加上去就会显示：

Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。
/财务.asp, 第 17 行

试了很多办法都搞不定，求各位高手帮忙解决一下，万分感谢！！在线急等

date ,是ASP默认函数，不建议使用

另外，提醒一下，尽量少用Request("key")，这样的形式，最好明确是来自URL还是表单