如何选择我自己的OutLook Calender而不是默认日历到Redemption loader appointmentitem

时间:2018-03-15 07:52:47

标签: vb.net outlook calendar outlook-redemption

使用Redemption库将约会同步到Outlook日历

以下是将默认日历设置为Outlook约会项目的Vb代码。

默认情况下,它从Outlook中选择默认日历。但我需要设置我自己的日历,其中包含我在Outlook中添加到约会项目的日历名称。

for i in $dir/*.log; do
  if [[ ! -f "${i}.zip" ]]; then
    zip $i
  else
    echo "$i has already been zipped"
  fi
done

我尝试通过循环设置我的日历以将测试日历设置为objAppointmentRecord。

Dim objAppointmentRecord As Object 'Outlook.AppointmentItem

 objAppointmentRecord = Redemption.RedemptionLoader.new_SafeAppointmentItem

 Dim objAppointmentFolder As Object 'Outlook.MAPIFolder

 objAppointmentFolder = Redemption.RedemptionLoader.new_MAPIFolder

 objAppointmentFolder = modMain.gobjMAPI.GetDefaultFolder(9)

 objAppointmentRecord = objAppointmentFolder.Items.Add ' In this line it is setting default calendar .

这里最后一行用我的TestCalendar设置objAppointmentRecord,但这种方法没有选择我的日历。

有没有办法直接选择日历到objAppointmentRecord或任何新方法请建议我。

我期待您的回复。

2 个答案:

答案 0 :(得分:0)

首先,不要使用Redemption.MAPIFolder对象 - 它已被弃用。创建RDOSession对象的实例,并将其MAPIOBJECT属性设置为Namespace.MAPIOBJECT返回的值。

如果你有来自OOM的Outlook.MAPIFolder对象,并且想要在兑换中打开它,请致电RDOSession.GetFolderFromIDRDOSession.GetRDOObjectFromOutlookObject

答案 1 :(得分:0)

最后得到Redumption支持的回答,在Outlook中选择用户定义的日历进行同步

objAppointmentFolder = modMain.gobjMAPI.GetDefaultFolder(9).Folders.Item(“My Folder Name”)