MS Access代码问题提醒

我试图设置提醒基于从任务中添加一个称为“任务”的表这里是我正在使用的代码，但有些东西是不正确的，因为它不断给我提出以下问题行：MS Access代码问题提醒

intStore = DCount("[TaskName]", "[Status]", "[DueDate] <=Now() AND [Complete] =0")

当代码运行出现错误：

Microsoft Access database engine cannot find the input table or query for 'Status' Make sure it exists and is spelled correctly.

在我的表我有任务名称，状态，并截止日期字段，所以我不确定为什么会出现这种情况。

下面是整行代码：

Private Sub Form_Load() 

    'On Load of the switchboard check Jobs table for any uncompleted jobs 

    Dim intStore As Integer 

    intStore = DCount("[Priority]", "[Tasks]", "[DueDate] <=Now() AND [PercentComplete] <=0") 

    If intStore = 0 Then 
     Exit Sub 
    Else   
     If MsgBox("There are " & intStore & " uncompleted jobs" & _ 
     vbCrLf & vbCrLf & "Would you like to see these now?", _ 
     vbYesNo, "You Have Uncomplete Jobs...") = vbYes Then 
      DoCmd.Minimize 
      DoCmd.OpenForm "Tasks", acNormal 
     Else 
      Exit Sub 
     End If 
    End If 

End Sub

来源

2016-10-26 Deke

你有叫状况的表？ –

不，我需要每个人都有一张桌子吗？我希望我可以使用表格下方的标题作为任务，因为我使用的表格添加了所有信息。 – Deke

'DCount'的3个参数是'field'，'table/query'，'expression'。您已将“状态”放在期望使用“表/查询”的部分，并且由于您没有具有该名称的表/查询，它会触发错误。我认为如果你只是用“任务”取代“状态”，它可能会工作..让我们知道如果没有和你得到什么错误消息。 –

只能执行一个领域的DCOUNT（主键是最好的，如果你只是在做餐桌上的普通计数）。您已输入“[状态]”，其中Access要求将表或查询名称用作[任务名称]字段的来源。

有关更多信息，请参阅here。

你其他的代码示例来看我期待你的代码需要：

intStore = DCount("[TaskName]", "[Tasks]", "[DueDate] <=Now() AND [Complete] =0")

来源

2016-10-26 14:43:29 finjo

MS Access代码问题提醒

回答

相关问题