Solved

No modification in ten days to task reminder

Posted on 2009-07-15
14
233 Views
Last Modified: 2012-05-07
I have many tasks active in outlook and while I try and keep on top of them some I forget about. It is not until I work my way down the list, sorting from modified last that I can clear some of the ones I have forgotten about. It many cases if I had just set a reminder within the task to remind me in a weeks time I wouldn't have missed things.
So is there anyway to make the task tell you that you have not amended it, added notes or such like, ie you have not modified the task in say the last ten days.

I am running Outlook 2007 with exchange on Win XP
Thanks Ed
0
Comment
Question by:edmacey
  • 7
  • 7
14 Comments
 
LVL 76

Expert Comment

by:David Lee
ID: 24857854
Hi, Ed.

There's no built-in means of doing this.  Of course it's possible with a bit of scripting.  Are you interested in pursuing that?
0
 

Author Comment

by:edmacey
ID: 24857868
Hi BlueDevilFan, yes definitely interested in a bit of scripting, it would have to run with all my other scripts of course. I can email them to you if you need them in their entirety. Ed.
0
 
LVL 76

Expert Comment

by:David Lee
ID: 24857893
I don't think I need them.  What action do you want to take if the task hasn't been modified in however many days?  Do you want it to open, categegorize it using a certain color, simply build a list, ...?
0
What is SQL Server and how does it work?

The purpose of this paper is to provide you background on SQL Server. It’s your self-study guide for learning fundamentals. It includes both the history of SQL and its technical basics. Concepts and definitions will form the solid foundation of your future DBA expertise.

 

Author Comment

by:edmacey
ID: 24857905
If a reminder could pop up, maybe as part of the calendar reminders that you usually get at the beginning of a session. Or a pop up alert box, You have not done anything with this task in 10 days, titleoftask. and then simply click OK to carry on.
0
 
LVL 76

Expert Comment

by:David Lee
ID: 24858141
Try this, Ed.
Sub ActivityCheck()
    'Change the interval on the next line'
    Const INTERVAL_DAYS = 10
    Dim olkTask As Outlook.TaskItem, olkPost As Outlook.PostItem
    Set olkPost = Application.CreateItem(olPostItem)
    olkPost.Subject = "Tasks Not Edited Since " & DateAdd("d", -5, Date)
    For Each olkTask In Session.GetDefaultFolder(olFolderTasks).Items
        If Not olkTask.Complete Then
            If DateDiff("d", olkTask.LastModificationTime, Now) > INTERVAL_DAYS Then
                olkPost.HTMLBody = olkPost.HTMLBody & "<a href=""outlook:" & olkTask.EntryID & """>" & olkTask.Subject & "</a><br>"
            End If
        End If
    Next
    olkPost.Save
    olkPost.Display
    Set olkTask = Nothing
    Set olkPost = Nothing
End Sub

Open in new window

0
 

Author Comment

by:edmacey
ID: 24858244
Thanks BlueDevilFan, so that I can check it, how would I set the interval to half an hour? or is that difficult?
0
 
LVL 76

Accepted Solution

by:
David Lee earned 500 total points
ID: 24858420
This version is set to 30 minutes.
Sub ActivityCheck()
    'Change the interval on the next line'
    Const INTERVAL_DAYS = 30
    Dim olkTask As Outlook.TaskItem, olkPost As Outlook.PostItem
    Set olkPost = Application.CreateItem(olPostItem)
    olkPost.Subject = "Tasks Not Edited Since " & DateAdd("n", INTERVAL_DAYS, Date)
    For Each olkTask In Session.GetDefaultFolder(olFolderTasks).Items
        If Not olkTask.Complete Then
            If DateDiff("n", olkTask.LastModificationTime, Now) > INTERVAL_DAYS Then
                olkPost.HTMLBody = olkPost.HTMLBody & "<a href=""outlook:" & olkTask.EntryID & """>" & olkTask.Subject & "</a><br>"
            End If
        End If
    Next
    olkPost.Save
    olkPost.Display
    Set olkTask = Nothing
    Set olkPost = Nothing
End Sub

Open in new window

0
 

Author Comment

by:edmacey
ID: 24861048
Forgive me for being silly, I just create a module and put this in it save and reboot?
0
 
LVL 76

Expert Comment

by:David Lee
ID: 24861275
Don't have to reboot.  Just add the code.
0
 

Author Comment

by:edmacey
ID: 25404184
I haven't been able to get this to work at all, is it because it is looking for things older than 30 days?
0
 
LVL 76

Expert Comment

by:David Lee
ID: 25432333
It's only looking for things that are older than 30 minutes.  Have you tried stepping through the code in the debugger to see what happens?
0
 

Author Comment

by:edmacey
ID: 25439070
Dear BlueDevilFan,

I see my error, of course it works it just needs to be started, I have popped into Application_Startup so that it runs whenever I turn on Outlook.

Thanks so much. Ed.
0
 

Author Closing Comment

by:edmacey
ID: 31603649
Thanks Ed.
0
 
LVL 76

Expert Comment

by:David Lee
ID: 25442980
You're welcome, Ed.
0

Featured Post

Microsoft Certification Exam 74-409

Veeam® is happy to provide the Microsoft community with a study guide prepared by MVP and MCT, Orin Thomas. This guide will take you through each of the exam objectives, helping you to prepare for and pass the examination.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Find out what you should include to make the best professional email signature for your organization.
Read this checklist to learn more about the 15 things you should never include in an email signature.
This Experts Exchange video Micro Tutorial shows how to tell Microsoft Office that a word is NOT spelled correctly. Microsoft Office has a built-in, main dictionary that is shared by Office apps, including Excel, Outlook, PowerPoint, and Word. When …
A short tutorial showing how to set up an email signature in Outlook on the Web (previously known as OWA). For free email signatures designs, visit https://www.mail-signatures.com/articles/signature-templates/?sts=6651 If you want to manage em…

773 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question