Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/ms-access/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Ms access 使用日期的条件表达式中的数据类型不匹配 Dim myDate作为日期 myDate=CDate(日期) SQL=“从tblPO中选择过期计数(PONumber),其中POExpireDate_Ms Access_Vba - Fatal编程技术网

Ms access 使用日期的条件表达式中的数据类型不匹配 Dim myDate作为日期 myDate=CDate(日期) SQL=“从tblPO中选择过期计数(PONumber),其中POExpireDate

Ms access 使用日期的条件表达式中的数据类型不匹配 Dim myDate作为日期 myDate=CDate(日期) SQL=“从tblPO中选择过期计数(PONumber),其中POExpireDate,ms-access,vba,Ms Access,Vba,我正在运行此代码…在OpenRecordset上显示错误 条件表达式中的数据类型不匹配 我现在应该怎么做…为什么会出现此错误?由于Date返回当前日期,您只需直接在SQL中使用Date(): Dim myDate As Date myDate = CDate(Date) SQL = " Select Count(PONumber) As OverDue from tblPO where POExpireDate < '" & myDate & "'" Set d

我正在运行此代码…在OpenRecordset上显示错误

条件表达式中的数据类型不匹配


我现在应该怎么做…为什么会出现此错误?

由于
Date
返回当前日期,您只需直接在SQL中使用
Date()

Dim myDate As Date

    myDate = CDate(Date)

SQL = " Select Count(PONumber) As OverDue from tblPO where POExpireDate < '" & myDate & "'"
Set db = CurrentDb
Set rs = db.OpenRecordset(SQL)
SQL=“从tblPO中选择过期计数(PONumber),其中POExpireDate
SQL = "Select Count(PONumber) As OverDue from tblPO where POExpireDate < Date()"