带有IF语句的SQL查询未将结果返回到VBA中的记录集

Question

我有一个VBA用户表单，可从SQL Server数据库中提取数据。我希望能够运行包含IF语句的SQL查询，并根据IF语句的结果运行其他SELECT查询。我从一个非常简化的版本开始，尝试并尝试将概念付诸实践，然后再进行任何太大而又复杂的事情。最终，如果结果是特定结果，我将向用户发送消息。

运行代码时，使用Msgbox命令到达该行时，出现以下错误。

我已经使用“即时”窗口来检查“记录计数”，但是出现以下错误。

就像根本没有填充记录集一样。

我已经在SQL Server中运行了此查询，并且得到了预期的结果，因此查询本身看起来还不错。

有什么主意我在做错什么，或者这仅仅是VBA的众多怪癖之一？

TEMPLATES = [
    {
        ...
        'DIRS': [os.path.join(BASE_DIR, 'templates'),
                 os.path.join(BASE_DIR, 'your_app_name', 'templates', 'your_app_name'),
                ...
                ]
    }
]