Solved

No modification in ten days to task reminder

Posted on 2009-07-15
14
234 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

Windows Server 2016: All you need to know

Learn about Hyper-V features that increase functionality and usability of Microsoft Windows Server 2016. Also, throughout this eBook, you’ll find some basic PowerShell examples that will help you leverage the scripts in your environments!

Question has a verified solution.

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

This process describes the steps required to Import and Export data from and to .pst files using Exchange 2010. We can use these steps to export data from a user to a .pst file, import data back to the same or a different user, or even import data t…
Following basic email etiquette rules will help you write a professional email and achieve a good, lasting impression with your contacts.
To add imagery to an HTML email signature, you have two options available to you. You can either add a logo/image by embedding it directly into the signature or hosting it externally and linking to it. The vast majority of email clients display l…
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…

821 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