Solved

How to get Outlook to automatically move an email attachment to a windows folder or local drive (2)

Posted on 2007-03-26
16
561 Views
Last Modified: 2008-01-09
Bluedevilfan,

Using the final code below which you previously produced for me, can you amend this again so that the following can be done:

1.  The file that I previously mentioned in which the end date needed to be changed from "07" to "2007" needs to be changed again.  The file in question is emailed to me each day but is dated one WORKING day behind but as part of a system automation that I run, I need the file in today's date.  So if today is Friday 23 March I will receive a file called "TRSMTMReport_220307.xls" and on Monday 26 March I will receive a file called TRSMTMReport_230307.xls" (one working day behind).  Taking into account the number of days in each month and the working week, how can I now have the VB code edited so that on Monday 26th March, as Outlook receives the file TRSMTMReport_230307.xls it now changes the name to TRSMTMReport_26032007.xls

**Note** - Not only does the file now need to change "07" to "2007" but it also needs to change the file to today's date in $DD$MM$YYYY format

2. Can you also write some code that says if the file in question already exists with that file name, then do not make a duplicate copy of the file even if it adds "Copy (1) of".  So some sort of checking mechansim.  If it helps, the files in question are called as follows:

ARTS_AMS_20070323.txt (which each day will change name in the format $YYYY$MM$DD)
ARTS_NY_20070323.txt (which each day will change name in the format $YYYY$MM$DD)
TRSMTMReport_230307 (which each day will change name in the format $DD$MM$YY)

3. For some strange reason, Visual Basic opens the existing module with the code throughout the day automatially and I keep having to close it.  I dont know exactly when this happens as Im not always monitoring it but I see it open on my taskbar.  It doesn't happen when any ordinary email comes in so I cannot qualify when this happens.  It does not highlight any code in the module or indicate any error  however.

************************************
Sub SaveAttachmentsToDisk(Item As Outlook.MailItem)
    Dim olkFolder As Outlook.MAPIFolder, _
        olkAttachment As Outlook.Attachment, _
        objFSO As Object, _
        strRootFolderPath As String, _
        strFilename As String, _
        intCount As Integer
    'Change the path on the following line to the folder you want the attachments save in
    strRootFolderPath = "\\SPGBFAP20004\SharedData1\Group Data\GRGB001710\Data\"
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set olkFolder = Application.ActiveExplorer.CurrentFolder
    If Item.Attachments.Count > 0 Then
        For Each olkAttachment In Item.Attachments
            If Right(objFSO.GetBaseName(olkAttachment.FileName), 2) = "07" Then
                strFilename = Mid(objFSO.GetBaseName(olkAttachment.FileName), 1, Len(objFSO.GetBaseName(olkAttachment.FileName)) - 2) & "2007.xls"
            Else
                strFilename = olkAttachment.FileName
            End If
            intCount = 0
            Do While True
                If objFSO.FileExists(strRootFolderPath & strFilename) Then
                    intCount = intCount + 1
                    strFilename = "Copy (" & intCount & ") of " & olkAttachment.FileName
                Else
                    Exit Do
                End If
            Loop
            olkAttachment.SaveAsFile strRootFolderPath & strFilename
        Next
    End If

End Sub

****************************************

Thanks again.
0
Comment
Question by:inghfs
  • 9
  • 7
16 Comments
 
LVL 76

Expert Comment

by:David Lee
Comment Utility
Try this version.  I tested it here with the examples you gave and it worked fine.  I'm concerned though about the date format difference between our systems.  I'm also unclear on whether I need to be handling the date format differently based on the name of the file (i.e. the files that begin with ARTS have a different date format than the ones that begin with TRSMT) as appears to be the case in your #2, or if they are all handled the same as seems to be the case in your #1.

Sub SaveAttachmentsToDisk(Item As Outlook.MailItem)
    Dim olkFolder As Outlook.MAPIFolder, _
        olkAttachment As Outlook.Attachment, _
        objFSO As Object, _
        strRootFolderPath As String, _
        strFilename As String, _
        strBuffer As String, _
        strDay As String, _
        strMonth As String, _
        strYear As String, _
        datTemp As Date
    'Change the path on the following line to the folder you want the attachments save in
    strRootFolderPath = "\\SPGBFAP20004\SharedData1\Group Data\GRGB001710\Data\"
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    If Item.Attachments.Count > 0 Then
        For Each olkAttachment In Item.Attachments
            strBuffer = Right(objFSO.GetBaseName(olkAttachment.FileName), 6)
            If IsNumeric(strBuffer) Then
                strDay = Left(strBuffer, 2)
                strMonth = Mid(strBuffer, 3, 2)
                strYear = Right(strBuffer, 2)
                'May need to edit this line for non-US date formats
                datTemp = CDate(strMonth & "/" & strDay & "/" & strYear)
                Do While True
                    datTemp = DateAdd("d", 1, datTemp)
                    If (Weekday(datTemp) <> vbSaturday) And (Weekday(datTemp) <> vbSunday) Then
                        Exit Do
                    End If
                Loop
                strFilename = objFSO.GetBaseName(olkAttachment.FileName)
                strFilename = Left(strFilename, Len(strFilename) - 6) & Format(datTemp, "ddmmyyyy") & ".xls"
            Else
                strFilename = olkAttachment.FileName
            End If
            If Not objFSO.FileExists(strRootFolderPath & strFilename) Then
                olkAttachment.SaveAsFile strRootFolderPath & strFilename
            End If
        Next
    End If
End Sub
0
 

Author Comment

by:inghfs
Comment Utility
Hi

For avoidance of doubt, I'm in the UK so this is based on UK date format but for the sake of keeping the files in chronological order, we've opted for $YYYY$MM$DD rather than $DD$MM$YYYY.  All the files except the TRSMTM file will be in $YYYY$MM$DD as the source system is emailing it to us in this convenient format, however the TRSMTM file is a manually generated file sent by someone and they would not be willing to change their process as it affects other areas.

I know very little about VB code - what would I need to change above given that you now know I work in the UK date format?

Cheers.
0
 
LVL 76

Expert Comment

by:David Lee
Comment Utility
I thought you were in the UK.  I'm not sure that anything needs to change for this to work.  I'm in the US and therefore have a different date format on the computer I tested on from the one you'll be running this on.  My recommendation is to give it a try and see if it works properly.  If not, then I'll adjust the date processing portion.
0
 

Author Comment

by:inghfs
Comment Utility
Ok what happens is, apart from the TRSMTM file which changes the date and saves it correctly and therefore works a dream, we want the script to stop processing a filename change for any other file (except a second file which I am now introducing called Sphere) and simply save it to the location outlined in the script.

At present, the script is trying to rename every file that comes in with the data change code and actually incorrectly saves it (except for the TRSMTM file which is changing it correctly) with the wrong year and some incorrect date formats.  For example, it starts saving today's ARTS file as "ARTS_NY_2008032023.xls" and "Socrates_Trades_2009032026.xls" (which should retain its existing file name of "ARTS_NY_20070326.xls" and "Socrates_Trades_20070326.txt").  So in other words, the script you created to change the file name, should only apply to the TRSMTM file and a new Sphere file.

File "ABC7 CFD Current Parameters 23 Feb 2007 2007-Mar-26 16.31.19.xls" (exactly as spelt with the spaces) needs to be renamed to "Sphere_$YYYY$MM$DD.xls" (with the underscore).  The file for today 26 March 07 therefore should read "Sphere_20070326.xls" and tomorrow on 27 March 07 as "Sphere_20070327.xls".
The only dynamic part of that existing filename at present is the bit starting "23 Feb 2007 2007-March-26 16.31.19.xls".  Perhaps we use the designation or the words "CFD Current Parameters" in the name of any file that comes in, to rename it totally to "Sphere_$YYYY$MM$DD.xls".

I just realised something else.  If after coming from a long public holiday weekend e.g. Xmas, the automated files will arrive into my inbox, however, when I load Outlook, for those files where your script is going to automatically change the name, it will not work for say 3 files because it will only rename the oldest file with the latest date and stop processing for the 2 most recent files.  The result of this is that I will now have a file with today's date but with date from e.g. several days ago.  Therefore I think the script should be written so that as it works its way though saving each TRSMTM email with a date, the latest email will overwrite the first email which wasn't renamed a few days ago with an older date because Outlook may not have been loaded due to the holiday.  Do I make sense or is my theory flawed?

Thanks again.
0
 
LVL 76

Expert Comment

by:David Lee
Comment Utility
Ok, this version should eliminate the problem of processing attachments other than those that have TRSMTM in them.  I'm going to have to think about how to handle the Sphere attachment.  It has quite a complex file name and parsing the date portion we want out of it is going to be more difficult.  I don't think that processing these files after a holiday will be a problem unless I've misunderstood the rules.  As I understand it each file gets the date of the next weekday after the date in the filename.  I have no ready means of calculating all the possible holidays and excluding them too.  The calculation I'm using simply takes the date in the filename, adds 1 to it, and checks to see if that's Saturday or Sunday.  If it is, then it keeps adding 1 to the date until it finds a weekday.  If it isn't, then it stops there.  

Sub SaveAttachmentsToDisk(Item As Outlook.MailItem)
    Dim olkFolder As Outlook.MAPIFolder, _
        olkAttachment As Outlook.Attachment, _
        objFSO As Object, _
        strRootFolderPath As String, _
        strFilename As String, _
        strBuffer As String, _
        strDay As String, _
        strMonth As String, _
        strYear As String, _
        datTemp As Date
    'Change the path on the following line to the folder you want the attachments save in
    strRootFolderPath = "\\SPGBFAP20004\SharedData1\Group Data\GRGB001710\Data\"
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    If Item.Attachments.Count > 0 Then
        For Each olkAttachment In Item.Attachments
            If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "CFD Current Parameters") Then
                'Code for renaming file to SPHERE goes here
            End If
            If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "TRSMTMReport") Then
                strBuffer = Right(objFSO.GetBaseName(olkAttachment.FileName), 6)
                If IsNumeric(strBuffer) Then
                    strDay = Left(strBuffer, 2)
                    strMonth = Mid(strBuffer, 3, 2)
                    strYear = Right(strBuffer, 2)
                    'May need to edit this line for non-US date formats
                    datTemp = CDate(strMonth & "/" & strDay & "/" & strYear)
                    Do While True
                        datTemp = DateAdd("d", 1, datTemp)
                        If (Weekday(datTemp) <> vbSaturday) And (Weekday(datTemp) <> vbSunday) Then
                            Exit Do
                        End If
                    Loop
                    strFilename = objFSO.GetBaseName(olkAttachment.FileName)
                    strFilename = Left(strFilename, Len(strFilename) - 6) & Format(datTemp, "ddmmyyyy") & ".xls"
                Else
                    strFilename = olkAttachment.FileName
                End If
                If Not objFSO.FileExists(strRootFolderPath & strFilename) Then
                    olkAttachment.SaveAsFile strRootFolderPath & strFilename
                End If
            End If
        Next
    End If
End Sub
0
 

Author Comment

by:inghfs
Comment Utility
Hi again

1. Apart from the TRSMTM file, your latest script does not now save any of the files to the given location.  I have pasted the slightly amended code below so that the correct date format is reflected for the TRSMTM file.  So let's use that version to work from.  

2. For the Sphere file, is there not a way we can just strip out everything in the filename regardless of what it is called when receiving the source file and then get the system to apply the name "Sphere_" followed by some sort of system getdate (RTC Clock) command (if there such a thing)?

If it is any help, in the Sphere spreadsheet cell B3, there is a date field (one weekday behind) in the format DD-MMM-YY, but I'm guessing this is a messy way of obtaining a date?

***************************
Sub SaveAttachmentsToDisk(Item As Outlook.MailItem)
    Dim olkFolder As Outlook.MAPIFolder, _
        olkAttachment As Outlook.Attachment, _
        objFSO As Object, _
        strRootFolderPath As String, _
        strFilename As String, _
        strBuffer As String, _
        strDay As String, _
        strMonth As String, _
        strYear As String, _
        datTemp As Date
    'Change the path on the following line to the folder you want the attachments save in
    strRootFolderPath = "\\SPGBFAP20004\SharedData1\Group Data\GRGB001710\Data\"
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    If Item.Attachments.Count > 0 Then
        For Each olkAttachment In Item.Attachments
            If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "CFD Current Parameters") Then
                'Code for renaming file to SPHERE goes here
            End If
            If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "TRSMTMReport") Then
                strBuffer = Right(objFSO.GetBaseName(olkAttachment.FileName), 6)
                If IsNumeric(strBuffer) Then
                    strDay = Left(strBuffer, 2)
                    strMonth = Mid(strBuffer, 3, 2)
                    strYear = Right(strBuffer, 2)
                    'May need to edit this line for non-US date formats
                    datTemp = CDate(strDay & "/" & strMonth & "/" & strYear)
                    Do While True
                        datTemp = DateAdd("d", 1, datTemp)
                        If (Weekday(datTemp) <> vbSaturday) And (Weekday(datTemp) <> vbSunday) Then
                            Exit Do
                        End If
                    Loop
                    strFilename = objFSO.GetBaseName(olkAttachment.FileName)
                    strFilename = Left(strFilename, Len(strFilename) - 6) & Format(datTemp, "ddmmyyyy") & ".xls"
                Else
                    strFilename = olkAttachment.FileName
                End If
                If Not objFSO.FileExists(strRootFolderPath & strFilename) Then
                    olkAttachment.SaveAsFile strRootFolderPath & strFilename
                End If
            End If
        Next
    End If
End Sub


*********************************

Thanks.
0
 

Author Comment

by:inghfs
Comment Utility
Further to the above, just realised that all the other files in question that need to get saved (but dont need their date changed or touched in anyway) are not all *.xls  Not sure if this has any impact on the reason why it is not saving the files to the required location.

Given the complexity of this, I'm happy to open another question to award an additional 500 points as I have increased the number of questions or tasks within these tasks.

Cheers.
0
 
LVL 76

Expert Comment

by:David Lee
Comment Utility
Sorry to be slow responding.  

> is there not a way we can just strip out everything in the filename regardless of what it is called when receiving the source file and then get the system to apply the name "Sphere_" followed by some sort of system getdate (RTC Clock) command (if there such a thing)?

Yes, that's possible.  I must have misunderstood what you wanted.  I thought that the naming of this file needed to follow the same convention as the naming of the "TRSMTMReport" file (i.e. that the date needed to be one workday forward from the date in the original file name).

> Further to the above, just realised that all the other files in question that need to get saved (but dont need their date changed or touched in anyway) are not all *.xls  Not sure if this has any impact on the reason why it is not saving the files to the required location.

Sorry, I interpreted this statement, "... we want the script to stop processing a filename change for any other file ..." as meaning that you didn't want to handle other files at all.  I see know that it meant that you just didn't want to rename any other files.

This revised version of the script adds handling for the Sphere file and saves all other files with their original file name.

Sub SaveAttachmentsToDisk(Item As Outlook.MailItem)
    Dim olkFolder As Outlook.MAPIFolder, _
        olkAttachment As Outlook.Attachment, _
        objFSO As Object, _
        strRootFolderPath As String, _
        strFilename As String, _
        strBuffer As String, _
        strDay As String, _
        strMonth As String, _
        strYear As String, _
        datTemp As Date
    'Change the path on the following line to the folder you want the attachments save in
    strRootFolderPath = "\\SPGBFAP20004\SharedData1\Group Data\GRGB001710\Data\"
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    If Item.Attachments.Count > 0 Then
        For Each olkAttachment In Item.Attachments
            If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "CFD Current Parameters") Then
                strFilename = "Sphere_" & Format(Date,"YYYYMMDD") & ".xls"
                olkAttachment.SaveAsFile strRootFolderPath & strFilename
            Else
                If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "TRSMTMReport") Then
                    strBuffer = Right(objFSO.GetBaseName(olkAttachment.FileName), 6)
                    If IsNumeric(strBuffer) Then
                        strDay = Left(strBuffer, 2)
                        strMonth = Mid(strBuffer, 3, 2)
                        strYear = Right(strBuffer, 2)
                        'May need to edit this line for non-US date formats
                        datTemp = CDate(strDay & "/" & strMonth & "/" & strYear)
                        Do While True
                            datTemp = DateAdd("d", 1, datTemp)
                            If (Weekday(datTemp) <> vbSaturday) And (Weekday(datTemp) <> vbSunday) Then
                                Exit Do
                            End If
                        Loop
                        strFilename = objFSO.GetBaseName(olkAttachment.FileName)
                        strFilename = Left(strFilename, Len(strFilename) - 6) & Format(datTemp, "ddmmyyyy") & ".xls"
                    Else
                        strFilename = olkAttachment.FileName
                    End If
                    If Not objFSO.FileExists(strRootFolderPath & strFilename) Then
                        olkAttachment.SaveAsFile strRootFolderPath & strFilename
                    End If
                End If
            Else
                olkAttachment.SaveAsFile strRootFolderPath & olkAttachment.Filename
            End If
        Next
    End If
End Sub
0
Better Security Awareness With Threat Intelligence

See how one of the leading financial services organizations uses Recorded Future as part of a holistic threat intelligence program to promote security awareness and proactively and efficiently identify threats.

 

Author Comment

by:inghfs
Comment Utility
Hi - no problem about the delay, I appreciate this can take time and harder to explain something over email/forum so easy to misunderstand.  You are correct in your revised assumption, the desired TRSMTM filename format is different from Sphere filename format.

I'm trying out each file as you prepare the new code.  With the new code, as any of the files come in, I get a compile error dialog: Else without If.

It then higlights the ELSE statement in VB code below:
Else
                olkAttachment.SaveAsFile strRootFolderPath & olkAttachment.FileName


Sorry I dont know VB scripting at all, so it is probably something minor that I cannot do myself hence need to revert to you.

Thanks.
0
 

Author Comment

by:inghfs
Comment Utility
Hi - any chance at looking at this one again when you get a moment?  I think we're nearly there.

Many thanks.
0
 
LVL 76

Accepted Solution

by:
David Lee earned 500 total points
Comment Utility
Sorry again to be so slow.  Try this version.  I had one too many Else's.

Sub SaveAttachmentsToDisk(Item As Outlook.MailItem)
    Dim olkFolder As Outlook.MAPIFolder, _
        olkAttachment As Outlook.Attachment, _
        objFSO As Object, _
        strRootFolderPath As String, _
        strFilename As String, _
        strBuffer As String, _
        strDay As String, _
        strMonth As String, _
        strYear As String, _
        datTemp As Date
    'Change the path on the following line to the folder you want the attachments save in
    strRootFolderPath = "\\SPGBFAP20004\SharedData1\Group Data\GRGB001710\Data\"
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    If Item.Attachments.Count > 0 Then
        For Each olkAttachment In Item.Attachments
            If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "CFD Current Parameters") Then
                strFilename = "Sphere_" & Format(Date,"YYYYMMDD") & ".xls"
                olkAttachment.SaveAsFile strRootFolderPath & strFilename
            Else
                If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "TRSMTMReport") Then
                    strBuffer = Right(objFSO.GetBaseName(olkAttachment.FileName), 6)
                    If IsNumeric(strBuffer) Then
                        strDay = Left(strBuffer, 2)
                        strMonth = Mid(strBuffer, 3, 2)
                        strYear = Right(strBuffer, 2)
                        'May need to edit this line for non-US date formats
                        datTemp = CDate(strDay & "/" & strMonth & "/" & strYear)
                        Do While True
                            datTemp = DateAdd("d", 1, datTemp)
                            If (Weekday(datTemp) <> vbSaturday) And (Weekday(datTemp) <> vbSunday) Then
                                Exit Do
                            End If
                        Loop
                        strFilename = objFSO.GetBaseName(olkAttachment.FileName)
                        strFilename = Left(strFilename, Len(strFilename) - 6) & Format(datTemp, "ddmmyyyy") & ".xls"
                    Else
                        strFilename = olkAttachment.FileName
                    End If
                    If Not objFSO.FileExists(strRootFolderPath & strFilename) Then
                        olkAttachment.SaveAsFile strRootFolderPath & strFilename
                    End If
                End If
                olkAttachment.SaveAsFile strRootFolderPath & olkAttachment.Filename
            End If
        Next
    End If
End Sub
0
 

Author Comment

by:inghfs
Comment Utility
Hi

Ok no further errors are being reported, which is good and it almost works satisfactorily.  The only last issue is that the script saves two versions of the TRSMTM file.  One is called TRSMTMReport_04042007.xls (which is the one I want) and also one called TRSMTMReport_030407.xls

Can we get it stop saving the 2nd duplicate file with the format TRSMTMReport_030407.xls (or otherwise called TRSMTMReport_$dd$mm$yy)?

And very finally, I keep getting the macro script warning every time one of the relevant files comes in and unless I select "enable or run the macro" it won’t save the file.  Will reducing the security level in Outlook from medium to low resolve this?  Is there any other way of making this macro a trusted macro so I dont need to keep enabling it?

Many thanks again.
0
 
LVL 76

Expert Comment

by:David Lee
Comment Utility
Try this version.  Yes, you can sign the code which should eliminate the macro warning without the need to lower the security level to low.  Here's a link to instructions on how to sign the code: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnoxpta/html/odc_dsvba.asp

Sub SaveAttachmentsToDisk(Item As Outlook.MailItem)
    Dim olkFolder As Outlook.MAPIFolder, _
        olkAttachment As Outlook.Attachment, _
        objFSO As Object, _
        strRootFolderPath As String, _
        strFilename As String, _
        strBuffer As String, _
        strDay As String, _
        strMonth As String, _
        strYear As String, _
        datTemp As Date
    'Change the path on the following line to the folder you want the attachments save in
    strRootFolderPath = "\\SPGBFAP20004\SharedData1\Group Data\GRGB001710\Data\"
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    If Item.Attachments.Count > 0 Then
        For Each olkAttachment In Item.Attachments
            If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "CFD Current Parameters") Then
                strFilename = "Sphere_" & Format(Date, "YYYYMMDD") & ".xls"
                olkAttachment.SaveAsFile strRootFolderPath & strFilename
            Else
                If InStr(1, objFSO.GetBaseName(olkAttachment.FileName), "TRSMTMReport") Then
                    strBuffer = Right(objFSO.GetBaseName(olkAttachment.FileName), 6)
                    If IsNumeric(strBuffer) Then
                        strDay = Left(strBuffer, 2)
                        strMonth = Mid(strBuffer, 3, 2)
                        strYear = Right(strBuffer, 2)
                        'May need to edit this line for non-US date formats
                        datTemp = CDate(strDay & "/" & strMonth & "/" & strYear)
                        Do While True
                            datTemp = DateAdd("d", 1, datTemp)
                            If (Weekday(datTemp) <> vbSaturday) And (Weekday(datTemp) <> vbSunday) Then
                                Exit Do
                            End If
                        Loop
                        strFilename = objFSO.GetBaseName(olkAttachment.FileName)
                        strFilename = Left(strFilename, Len(strFilename) - 6) & Format(datTemp, "ddmmyyyy") & ".xls"
                    Else
                        strFilename = olkAttachment.FileName
                    End If
                    If Not objFSO.FileExists(strRootFolderPath & strFilename) Then
                        olkAttachment.SaveAsFile strRootFolderPath & strFilename
                    End If
                Else
                    olkAttachment.SaveAsFile strRootFolderPath & olkAttachment.FileName
                End If
            End If
        Next
    End If
End Sub

0
 

Author Comment

by:inghfs
Comment Utility
Hi - sorry was away for the Easter break.  I think we can close this question as it seems be working very well especially after having tested it over the Easter public holiday weekend where a series of files would be waiting to be saved to the local drive.  No problems at all.

I will accept your penultimate solution in this thread, and at the same time opened a new question located at http://www.experts-exchange.com/Software/Office_Productivity/Groupware/Outlook/Q_22504617.html in order to award you a further 500 points for the last solution you provided here.  Please copy and paste your last solution there.  I think this is a fair solution given your assistance in the multiple question asked here.  

Also not sure if you have an answer to an unrelated question regarding emails on Outlook at http://www.experts-exchange.com/Software/Internet_Email/Email/Q_22485808.html

Finally, please continue to be notified if there are any further comments to this thread as there is a good possibility I would like to call upon your assistance again in future.  Does EE allow used to post questions directly to a single expert do you know?

Thanks again!
0
 
LVL 76

Expert Comment

by:David Lee
Comment Utility
> sorry was away for the Easter break
No problem, I hope you had a nice Easter.

> ... in order to award you a further 500 points for the last solution you provided here.  Please copy and paste your last solution there.
Thanks, I appreciate the thought, but that'd be a violation of EE's rules.  There's a maximum of 500 points per question and even though this question ended up being expanded I'm okay with just getting credit once.

> ... not sure if you have an answer to an unrelated question regarding emails on Outlook
I'll have a look in aminute

> ... there is a good possibility I would like to call upon your assistance again in future
I'll be here.  :-)

> Does EE allow used to post questions directly to a single expert do you know?
They can't be posted to one expert alone, but they can be addressed to a particular expert to draw their attention.  You can also send me an email, my address is in my profile, asking me to look at a question.

You're welcome.  Always happy to be of service.
0
 

Author Comment

by:inghfs
Comment Utility
very modest - will ask for the 3rd question to be deleted, although someone else has already replied to it.

Cheers.
0

Featured Post

Zoho SalesIQ

Hassle-free live chat software re-imagined for business growth. 2 users, always free.

Join & Write a Comment

Resolve DNS query failed errors for Exchange
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…
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 …
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…

744 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

Need Help in Real-Time?

Connect with top rated Experts

17 Experts available now in Live!

Get 1:1 Help Now