将RSS源项目转换为Outlook中的任务

Question

  

可能重复：
  Processing an RSS Feed using Outlook VBA Macro

我通过RSS Feed收到家庭作业，我希望能够将Feed项目转换为任务。

如何在VBA中获取RSS源？我找不到“RSSItem”，但我可以找到一个TaskItem。

我尝试通过以下方法获取RSS提要但我不能将提要项的正文放入字符串中。它甚至不会让我找到字符串的长度。我运行时收到“无效限定符”错误。

Sub ProcessRSS()
' Read RSS items and process the usful ones.
Dim objList As Object
Dim objItem As Object
Dim contents As String

Set objList = Application.ActiveExplorer.CurrentFolder.Items
contents = objList(1).Body

'Print Lenght of String
MsgBox (Str(contents.Lenght))
End Sub

如何将RSS源项目转换为Outlook 2010 VBA中的任务？

Answer 1

我不确定您的整体问题，但这会修复您的代码：

Sub ProcessRSS()
' Read RSS items and process the usful ones.
Dim objItem As Object

Set objItem = Application.ActiveExplorer.CurrentFolder.Items(1)
'Print Length of String
MsgBox Len(objItem.Body)
End Sub