Sql 访问VBA以基于查询发送Outlook电子邮件

Sql 访问VBA以基于查询发送Outlook电子邮件,sql,vba,email,outlook,Sql,Vba,Email,Outlook,我正在尝试创建一个按钮,单击该按钮时,将根据查询填充outlook电子邮件收件人字段。部分查询条件基于几个组合框。如果在查询中添加以下条件,则在运行代码时会出现此错误-参数太少。预期1。如果我没有在查询中引用组合框,代码将运行得很好,除非我无法根据条件限制向谁发送电子邮件。我自己打开了这个查询,看看我是否引用了错误的内容,但它工作正常 我对使用Access还不熟悉,所以如果这是一件非常简单的事情,我非常感谢您的耐心 VBA代码: 查询条件: [表格]![电子邮件列表]![bxState]您应该能

我正在尝试创建一个按钮,单击该按钮时,将根据查询填充outlook电子邮件收件人字段。部分查询条件基于几个组合框。如果在查询中添加以下条件,则在运行代码时会出现此错误-参数太少。预期1。如果我没有在查询中引用组合框,代码将运行得很好,除非我无法根据条件限制向谁发送电子邮件。我自己打开了这个查询,看看我是否引用了错误的内容,但它工作正常

我对使用Access还不熟悉,所以如果这是一件非常简单的事情,我非常感谢您的耐心

VBA代码:

查询条件:


[表格]![电子邮件列表]![bxState]

您应该能够在where子句中过滤查询,如下所示:

strSQL = "SELECT [Principal Email] FROM qry_EmailOut WHERE <column name> = " & Chr(34) & [forms]![Email Lists]![bxState] & Chr(34)
以下链接提供了其他信息: 概述:

具体相关问答:


问候,

谢谢!成功了。我以前曾尝试在代码中添加Where子句,但它位于引号内,格式不完全正确。我真的很感谢你的帮助。顺便说一下-谢谢你的链接。。。他们很有帮助!
strSQL = "SELECT [Principal Email] FROM qry_EmailOut WHERE <column name> = " & Chr(34) & [forms]![Email Lists]![bxState] & Chr(34)