Office中国论坛/Access中国论坛

标题: [求助]求教！ [打印本页]

作者: asdf26 时间: 2005-9-17 17:11
标题: [求助]求教！
我在编写access程序时，遇到如下问题：

Dim con As Object

Dim rs As New ADODB.Recordset

Set con = Application.CurrentProject.Connection

strSQL = "select * from 水电记录表 where 水电记录表.抄表日期 = " & "'" & Forms!增加年月!请输入年月 & "'"

rs.Open strSQL, con, adOpenKeyset, adLockBatchOptimistic

程序执行到最后有下划线的这句话报错，信息为：“标准表达式中数据类型不匹配”

水电记录表中的“抄表日期”为日期型字段，窗体中“Forms!增加年月!请输入年月”也是日期型，strSQL = "select * from 水电记录表 where 水电记录表.抄表日期 = '2005年09月' "

我认为是条件语句where的问题，可是不知道怎样改写才能让程序通过，请前辈给予指点，谢谢啦！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)