从Access发送多个自定义电子邮件

因此，我想将Building 443报告仅发送给John Doe。我想发送 建筑321报告给Mary Smit，依此类推。有什么方法可以自动执行此操作吗？此外，我无法安装任何可执行文件，所以我无法安装 兑换以解决Outlook的潜在问题。 任何想法都是非常感谢。 谢谢。 - 通过AccessMonster.com发布消息 http://www.accessmonster.com /Uwe/For...ccess/200609/1My app creates a building report.My users have requested that I provide functionality to e-mail these"building reports" to building managers once a month.So assuming that I have the following table that lists a building manager''sname, e-mail address and their building, is there a way that I can automatethis to send these monthly e-mails from Outlook. Ideally this would be aclick one button type of action:Example table:Name E-Mail Building NbrJohn Doe jo******@www.com 443Mary Smit ma*******@www.com 321Abe Adam ab******@www.com 69So, I want to send the Building 443 report to only John Doe. I want to sendthe Building 321 report to only Mary Smit and so on. Is there any way toautomate this? Also, I can''t install any executables, so I can''t installRedemption to get around potential issues with Outlook.Any ideas are greatly appreciated.Thanks.--Message posted via AccessMonster.com http://www.accessmonster.com/Uwe/For...ccess/200609/1推荐答案请参阅电子邮件参议院本页： http：//www.granite。 ab.ca/access/email.htmSee "e-mail senate" on this page: http://www.granite.ab.ca/access/email.htm谢谢，我熟悉这个例子，但据我所知它没有b $ b允许进行这种定制（例如，如我在第一篇文章中提到的那样，将特定报告发送给某个特定的个人）。 我想将Building 443报告仅发送给John Doe。我想发送 建筑321报告给只有Mary Smit等等。 所以毫无疑问需要某种循环。所以我想这个方法将是 1）从第一篇文章中提供的表中检索信息。 2）遍历该表中的每条记录。 3）在每个循环中，运行报告并创建一个名为 的电子邮件适当的设施管理员，包括标准信息和主题 4）然后发送电子邮件。 我听说可以有由于安全补丁，从 Outlook发送自动电子邮件的问题。如果有100个设施管理员，那么我想避免用户在Outlook中为每个 电子邮件（即100次）进行干预。 我不允许安装任何可执行文件，诸如Redemption之类的dll来帮助 。一切都必须在Access内。 pi********@hotmail.com 写道：Thanks, I''m familiar with this example, but as far as I can tell it doesn''tallow for the kind of customization (i.e. send a specific report to aspecific individual as I mentioned in my first post).I want to send the Building 443 report to only John Doe. I want to send theBuilding 321 report to only MarySmit and so on.So it would no doubt require some kind of loop. So I guess the method wouldbe1) Retrieve information from table provided in first post.2) Loop through each record in that table.3) Within each loop, run the report and create an e-mail with the name of theappropriate Facility Manager and include a standard message and subject4) Then Send the E-mail.I had heard that there can be a problem with sending automated e-mails fromOutlook because of the security patches. If there are 100 facility managers,I''d like to avoid the user having to intervene within Outlook for each of thee-mails (i.e. 100 times).I''m not allowed to install any executables, dlls such as Redemption to helpwith this. Everything has to be within Access. pi********@hotmail.com wrote: >参见电子邮件参议院本页： http：//www.granite。 ab.ca/access/email.htm - 通过AccessMonster.com发布的消息 http://www.accessmonster.com/Uwe/For ... ccess / 200609/1--Message posted via AccessMonster.com http://www.accessmonster.com/Uwe/For...ccess/200609/1 .. rdemyan通过AccessMonster.com写道：..rdemyan via AccessMonster.com wrote: 谢谢，我对这个例子很熟悉，但据我所知，它并不是允许进行这种定制（即发送一份特定的报告给一个 特定的个人，正如我在第一篇文章中提到的那样。 我想将建筑443报告仅发送给John Doe。我想发送 建筑321报告给只有Mary Smit等等。 所以毫无疑问需要某种循环。所以我想这个方法将是 1）从第一篇文章中提供的表中检索信息。 2）循环遍历该表中的每条记录。Thanks, I''m familiar with this example, but as far as I can tell it doesn''tallow for the kind of customization (i.e. send a specific report to aspecific individual as I mentioned in my first post).I want to send the Building 443 report to only John Doe. I want to send theBuilding 321 report to only MarySmit and so on.So it would no doubt require some kind of loop. So I guess the method wouldbe1) Retrieve information from table provided in first post.2) Loop through each record in that table. 3）在每个循环中，运行报告并创建一个名为 相应设施的电子邮件经理并包括标准消息和主题>3) Within each loop, run the report and create an e-mail with the name of theappropriate Facility Manager and include a standard message and subject> 4）然后发送电子邮件。4) Then Send the E-mail. 逻辑看起来不错。 如果你可以创建一个返回buidling＃和的查询收件人的姓名和电子邮件地址，你应该在营业。 < SNIP> 但你无法通过在将报告输出到 文件时，在VBA中的 标准OpenReport命令中使用过滤器或where子句。 Me.Filter =" ShipmentsID =" &安培;表格！[选择加载列表]！[加载ID] Me.FilterOn = True 因此你必须自己更改过滤器或where子句/> 报告OnOpen事件。 Me.Filter =" ShipmentsID =" &安培;表格！[选择加载清单]！[加载ID] Me.FilterOn = True < / SNIP> Dim rs as DAO。记录集''---收件人信息记录集和过滤器 信息一起 '' - 过滤此人感兴趣的记录集 in ''==语法是这样的... set rs = DBEngine（0）（0）.QueryDefs（" ; qryBuildingMailing"）。 OpenRecordset 直到rs.eof me.Filter =" BuildingID =" &安培; rs.Fields（" BuildingID"） me.FilterOn = True .... 然后你可以输出到快照和e - 发送报告的快照 （也在页面上列出）。 如果您阅读了该页面，您会看到有以下示例：所有的部分。 所以你要做的就是把它们放在一起。乐高的好工作， Tony！ PieterThe logic looks good.If you can create a query that returns the buidling# and therecipient''s name and e-mail address, you should be in business.<SNIP>However you can not pass a filter or where clause as you would in astandard OpenReport command in VBA when outputting the report to afile.Me.Filter = "ShipmentsID=" & Forms![Select Load List]![LoadID]Me.FilterOn = TrueTherefore you must change the filter or where clause yourself in thereports OnOpen event.Me.Filter = "ShipmentsID=" & Forms![Select Load List]![LoadID]Me.FilterOn = True</SNIP>Dim rs as DAO.Recordset ''---recordset of recipient info and filterinfo together''--filter the recordset for just the buldings this person is interestedin''==syntax is something like this...set rs=DBEngine(0)(0).QueryDefs("qryBuildingMailing"). OpenRecordsetdo until rs.eofme.Filter="BuildingID=" & rs.Fields("BuildingID")me.FilterOn=True....then you can output to snapshot and e-mail the snapshot of the report(also outlined on the page).If you read the page, you''ll see there are examples of all the pieces.So then all you have to do is put them together. Nice job of Legos,Tony!Pieter 这篇关于从Access发送多个自定义电子邮件的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！ 1403页，肝出来的..