Emad Ibrahim

• Programming

  Posted on January 6th, 2008

  Written by Emad Ibrahim

  Related Posts

  • Improve LINQ Query Performance
  • Fame, Fortune and WCF
  • Calling the WordPress XMLRPC API from VB.net

  Tags

  Office, Programming, Tips & Tricks, vb.net

  You can retrieve the list of tasks in your Outlook 2007 using the following code

  Dim ns As Outlook.NameSpace
  Dim tasks As Outlook.Items
  ns = Application.GetNamespace(“MAPI”)
  tasks = ns.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderTasks).Items

  Dim task As Object
  For Each task In tasks
      ‘ iterate through the tasks here
  Next

  This entry was posted on Sunday, January 6th, 2008 at 2:34 am and is filed under Programming. You can follow any responses to this entry through the RSS 2.0 feed. Both comments and pings are currently closed.
• captain

  For Each task In tasks
  ‘ iterate through the tasks here
  Next

  …
  ARGH!

  How do I actually get to the tasks then?
  how do I acess the subject, for example?

  Anytime I try using an object like
  dim task as outlook.taskitem I get a NULL reference exception.
  If I use
  dim task as new outlook.taskitem() I get a “can not be used in this context, as outlook.classitem is FRIEND”

  help, please?

• captain

  For Each task In tasks
  ‘ iterate through the tasks here
  Next

  …
  ARGH!

  How do I actually get to the tasks then?
  how do I acess the subject, for example?

  Anytime I try using an object like
  dim task as outlook.taskitem I get a NULL reference exception.
  If I use
  dim task as new outlook.taskitem() I get a “can not be used in this context, as outlook.classitem is FRIEND”

  help, please?

• http://www.emadibrahim.com Emad Ibrahim

  Outlook.OlTaskStatus.olTaskComplete _
  ).ToList

  You can take a look at my open source project that syncs RTM with Outlook you might find what you are looking for in the source code. There is more info at http://www.emadibrahim.com/2008/04/14/synchroni…

• http://www.emadibrahim.com Emad Ibrahim

  One more thing… if you want to create a new task, you do it like this:

  Dim MyApp As Outlook.Application = New Outlook.Application()

  Dim outlookTask As Outlook.TaskItem = MyApp.Application.CreateItem(Outlook.OlItemType.olTaskItem)

• http://www.emadibrahim.com Emad Ibrahim

  The way I get the outlook tasks is like this:

  ‘get outlook tasks
  Dim ns As Outlook.NameSpace

  ns = MyApp.Application.GetNamespace(“MAPI”)

  outlookTasksAll = ns.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderTasks).Items

  outlookTasks = (From outlookTask As Outlook.TaskItem In outlookTasksAll _
  Where outlookTask.Status <> Outlook.OlTaskStatus.olTaskComplete _
  ).ToList

  You can take a look at my open source project that syncs RTM with Outlook you might find what you are looking for in the source code. There is more info at http://www.emadibrahim.com/2008/04/14/synchronize-outlook-tasks-with-remember-the-milk/

• http://www.emadibrahim.com Emad Ibrahim

  One more thing… if you want to create a new task, you do it like this:

  Dim MyApp As Outlook.Application = New Outlook.Application()

  Dim outlookTask As Outlook.TaskItem = MyApp.Application.CreateItem(Outlook.OlItemType.olTaskItem)

• captain

  Thank you very much.

  No, I do not want to create a new task, I would like to grab the info for a better printout formatting.

• http://www.emadibrahim.com Emad Ibrahim

  @captain: The code in my first comment doesn't create a task it retrieves all the tasks… Here it is again:

  Dim ns As Outlook.NameSpace
  ns = MyApp.Application.GetNamespace(”MAPI”)
  outlookTasksAll = ns.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderTasks).Items

  Again, you can download the source code from the link in my first comment and take a look at it.

• captain

  Thank you very much.

  No, I do not want to create a new task, I would like to grab the info for a better printout formatting.

• http://www.emadibrahim.com Emad Ibrahim

  @captain: The code in my first comment doesn’t create a task it retrieves all the tasks… Here it is again:

  Dim ns As Outlook.NameSpace
  ns = MyApp.Application.GetNamespace(”MAPI”)
  outlookTasksAll = ns.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderTasks).Items

  Again, you can download the source code from the link in my first comment and take a look at it.

• captain

  Thanks a bunch.

  Yes, I have seen that your code did not create a task, I was commenting on your comment:

  “One more thing… if you want to create a new task, you do it like this:

  Dim MyApp As Outlook.Application = New Outlook.Application()

  Dim outlookTask As Outlook.TaskItem = MyApp.Application.CreateItem(Outlook.OlItemType.olTaskItem)”

  You have helped me a lot, thank you again!

• captain

  Thanks a bunch.

  Yes, I have seen that your code did not create a task, I was commenting on your comment:

  “One more thing… if you want to create a new task, you do it like this:

  Dim MyApp As Outlook.Application = New Outlook.Application()

  Dim outlookTask As Outlook.TaskItem = MyApp.Application.CreateItem(Outlook.OlItemType.olTaskItem)”

  You have helped me a lot, thank you again!

• Recent Posts

  • 30 Days of Rails
  • Nodejs on Windows
  • AppHarbor + ASP.NET MVC + Orchard = Awesome
  • Windows Phone in Numbers
  • Promote Your Windows Phone 7 App – Limited Time

• Shopping

  • Amazon