ms-access - 更新 SendEmail 命令后访问 2010

Question

如果表（列）被更新并且产品存储达到低水平，我目前有一个数据库可以发送电子邮件。我得到了所有工作正常。但是，在发送电子邮件操作中，我有一些问题。

有没有办法让响应自定义生成？

例如，管理员电子邮件在另一个表中，产品名称可以附加到电子邮件响应中？

我曾尝试使用构建器的表达式（在帮助下），但没有成功。

任何帮助将非常感激！

Answer 1

您用来创建和发送电子邮件消息的 VBA 代码可以做很多事情来自定义它。例如，要根据某些条件检索不同收件人的姓名和电子邮件地址，您可以使用如下代码：

Select Case productType
    Case "bacon"
        adminName = "Gord"
        adminEmail = DLookup("email", "tblAdminInfo", "adminName=""" & adminName & """")
    Case Else
        adminName = "(generic admin)"
        adminEmail = "admin@example.com"
End Select

同样，您可以通过执行以下操作自定义电子邮件的正文：

emailBody = ""
emailBody = emailBody & "Hey " & adminName & "," & vbCrLf
emailBody = emailBody & vbCrLf
emailBody = emailBody & "OMG, we're running low on " & productType & "!" & vbCrLf
emailBody = emailBody & vbCrLf
emailBody = emailBody & "Product details for " & productType & ":" & vbCrLf
emailBody = emailBody & DLookup("description", "tblProductDetails", "productType=""" * productType & """") & vbCrLf

尝试使用类似这样的几种技术，如果遇到任何困难，请针对您的具体问题创建一个新问题。