outlook

VBA - Find string in email body or subject

由 痞子三分冷 提交于 2020-04-18 07:16:13
问题 I am trying to create a simple macro, which reads the active email and checks whether or not a certain string is present. Now, the string can have two possible formats, and will only contains digits. The two formats: xxx-xxxxxxxx or xxxxxxxxxxx (x will always be a digit) I am unsure on how to do this. Below I have a macro, which reads the mail - but it can only find a specific string : Sub AutomateReplyWithSearchString() Dim myInspector As Outlook.Inspector Dim myObject As Object Dim myItem

ICAL.NET Recurring Elements: every Tuesday(weekly), Every 2nd, last Monday(monthly) from a start date to end date

由 人走茶凉 提交于 2020-04-18 05:47:56
问题 The ical attachment (.ics) works for every case except recurring weekly and once in a month cases. I'm trying to create a weekly recurrence for one of the weekday and also a monthly recurrence for last Tuesday/2nd Tuesday of every month. When I open the .ics file, it says "The operation failed". Weekly: evnt.Start = new CalDateTime(start); evnt.End = new CalDateTime(new DateTime(evnt.Start.Year, evnt.Start.Month, evnt.Start.Day, end.Hour, end.Minute, end.Second)); rrule = new

Why doesn't my shared calendar event show the updated attendee response statuses in Office365?

由 白昼怎懂夜的黑 提交于 2020-04-17 21:18:41
问题 If I create a calendar in Office365 and share it with user A, then create an event on that calendar with user A as an attendee, user A's response status is never reflected on the shared event. It always just says, "user A didn't respond." on my calendar. Even when viewing the shared event from user A's calendar, it says "You didn't respond." For example: I create an event on a shared calendar and add user A as an attendee User A sees two calendar events, one on their default calendar and one

Why doesn't my shared calendar event show the updated attendee response statuses in Office365?

由 孤者浪人 提交于 2020-04-17 21:14:11
问题 If I create a calendar in Office365 and share it with user A, then create an event on that calendar with user A as an attendee, user A's response status is never reflected on the shared event. It always just says, "user A didn't respond." on my calendar. Even when viewing the shared event from user A's calendar, it says "You didn't respond." For example: I create an event on a shared calendar and add user A as an attendee User A sees two calendar events, one on their default calendar and one

How to import email from a shared mailbox subfolder too, and mark the foldername in Excel

由 ぃ、小莉子 提交于 2020-04-16 02:55:28
问题 I have the following macro, where I'm importing emails from outlook. The macro only imports the emails from the Inbox folder, I would like the macro to go through al the subfolders of Inbox Folder (so no Sent items, etc, but the sub folders of the Inbox folder only). Sub GetFromOutlook() Dim OutlookApp As Outlook.Application Dim OutlookNamespace As Namespace Dim Folder As MAPIFolder Dim OutlookMail As Variant Dim i As Integer Dim objMail As Outlook.MailItem Dim objFlaggedMail As Outlook

利用MailSniper越权访问Exchange邮箱

由 怎甘沉沦 提交于 2020-04-08 06:52:27
0x01 概述 Microsoft Exchange用户可以授权给其他用户对其邮箱文件夹进行各种级别的访问。例如，用户可以授予其他用户读取访问其收件箱中里面的电子邮件，但是要是用户（或Exchange管理员）不小心设置了不正确的访问权限，那么这将导致所有的用户都能访问读取其的邮箱。 使用MailSniper，可以快速枚举任何用户可访问的邮箱。在这篇文章中，我将说明此问题是如何产生的，如何查找存在权限问题的邮箱，以及在无需获取邮箱管理员许可的情况下阅读邮箱中的邮件。 0x02 使用Outlook设置邮箱权限 更改邮箱权限是所有用户在Microsoft Outlook客户端中都能够轻松完成的事情。如果用户右键单击文件夹“收件箱”，然后单击“属性”，然后文件夹的属性菜单就会打开。 单击“权限”选项卡能看到文件夹当前的设置。这使得事情变得有趣了。单击“添加”按钮，用户可以指定某个账户来授予各种权限。这是非常理想的，因为用户能够限制特定人员的访问。但是你会注意到在“权限”中已经包含了“默认”和“匿名”选项。“默认”项目实质上已经包含了组织中的具有访问邮件权限的每个用户。 如果用户错误地将权限级别“默认”设置为“None”之外的其他选项（除Contributor之外），则这可能允许组织中的每个成员访问该邮件文件夹。 邮箱文件夹的权限也可以由Exchange管理员设置

自动转发outlook的邮件

由 筅森魡賤 提交于 2020-04-04 09:29:35
在MSDN上查到了一些代码，稍作修改，如下所示。（当然，和Excel上使用Vba的方法差不多） Option Explicit Public WithEvents myOlItems As Outlook.Items Public Sub Application_Startup() ' Reference the items in the Inbox. Because myOlItems is declared ' "WithEvents" the ItemAdd event will fire below. Set myOlItems = Outlook.Session.GetDefaultFolder(olFolderInbox).Items End Sub Private Sub myOlItems_ItemAdd(ByVal Item As Object) Dim myForward As Outlook.MailItem If TypeName(Item) = "MailItem" Then ' Forward the item just received Set myForward = Item.Forward ' Address the message myForward.Recipients.Add ("yourname @gmail.com ") ' Send

outlook 用宏发邮件

由 倖福魔咒の 提交于 2020-04-04 09:28:41
经常发面试邮件，通常只是修改一下收件人邮箱地址，和收件人姓名，其他全部一致，有木有发现每次都用用outlook写邮件很麻烦？ 使用宏发邮件，就会不麻烦了，直接修改下称呼，修改下收件人地址，按下F5，就可以直接发送了。 Private Sub send_mail() '新建邮件 Set OutApp = CreateObject("Outlook.Application") '创建outlook对象 OutApp.Session.Logon '登录MAPI Set outmail = OutApp.CreateItem(olMailItem) '新建邮件对象 Dim strTo, strCC, strSubject, strName strTo = "aaa@bbb.com.cn" strCC = "aaa@bbb.com.cn" strName = "面试人" strSubject = "我公司面试邀请-" & strName If strName = "" Then MsgBox "收件人名称不能为空哦" Exit Sub End If If MsgBox("确认要发送邮件?" & vbCrLf & "title:" & strSubject & vbCrLf & "to:" & strTo & vbCrLf & "cc:" & strCC, vbYesNo) = vbNo

C#与Outlook交互收发邮件

由 夙愿已清 提交于 2020-04-04 09:28:01
.Net对POP3邮件系统已经集成了相应的功能，但是如果是基于Exchange server的邮件系统，相对就比较复杂。如果仅仅是发送，可以简单地调用CDO来实现（参见我以前的一篇文章 http://www.cnblogs.com/Moosdau/archive/2007/09/28/908834.html ），但是如果要接收或进行其它一些更复杂一些操作，CDO就无法实现。 事实上，Exchange Server 2003根本不支持与.Net直接交互，据说Exchange Server 2007开放了一组Web Service接口，如果使用了Exchange Server 2007，则可以直接通过Web Service接口直接与Exchange server交互，不过我们公司目前还是使用exchange server 2003，所以也没有测试这组接口要如何使用。 对使用exchange server 2003的环境来说，代价最低的应该说就是调用outlook的功能了，以下列举与outlook交互的一些常用操作。 首先，在项目中添加对outlook组件的引用（Project—>Add Reference—>切换到COM标签页—>选择Microsoft Outlook 14.0 Object Library），这里outlook的具体版本号取决于本地安装的outlook版本

今天更新了ActiveSync4.2

由 天大地大妈咪最大 提交于 2020-03-30 17:04:05
早上收到微软的邮件说有更新到了AcitveSync4.2看看更新说明，很高兴以为可能解决日程表中的农历的问题。马上安装后，还是不能解决。真是失望。 如果你在Outlook里设置重复周期为每年，农历 每月的几号，本来以为这个功能很不错，很适合中国人用的。但没有想到这个功能根本就用不起来。气人呀。 出现的错误提示如下： 由于出现错误8018FF01 而无法从Microsoft Outlook读取 事件。该项将不与移动设备同步。 由于出现错误80180013 而无法将下列 是否定期 约会写入Microsoft Outlook 中。该项将被跳过。 来源： https://www.cnblogs.com/liubiqu/archive/2006/08/03/466390.html
订阅 outlook