主题：加载表报错

Select Case e.DataTableName

    Case  "HOME","CUSTOMER_EVENT","CIPHER"

        

    Case "ACTIVE_RECORD"  

        Dim EndDate As Date = Date.Today().AddDays(-40)

        e.SelectString = "Select * From {ACTIVE_RECORD} Where [END_DATE] > #" & EndDate & "#"   

           

    Case Else 

        e.Cancel = True

        

End Select

表  ACTIVE_RECORD  加载时报错，代码哪里写错了吗？  数据源是 oracle

报错信息如下：

此主题相关图片如下：报错.jpg