Date : Tue, 10 Nov 2009 17:20:42 -0000
From : mu.list@... (Mark Usher)
Subject: Who the message is from... Outlook fix
Outlook Express doesn't have VBA integrated so that is a no go I am afraid.
Yes, it is flexible enough to use the List-Post header.
Am just looking@... a rule though to add the Reply-To <List-Post> to
the messages as they come in.
-Mark
> -----Original Message-----
> From: bbc-micro-bounces+mu.list=aon.at@... [mailto:bbc-
> micro-bounces+mu.list=aon.at@...] On Behalf Of
> michael.firth@...
> Sent: 10 November 2009 17:13
> To: bbc-micro@...
> Subject: Re: [BBC-Micro] Who the message is from... Outlook fix
>
> Is this just for Outlook proper, or will it work for Outlook Express
> too?
>
> Also, is Outlook flexible enough to be able to extract the address to
> send to from the "List-Post" header in the messages, rather than having
> it hard coded in the macro?
>
> Regards
>
> Michael
>
> > -----Original Message-----
> > From:
> > bbc-micro-bounces+michael.firth=bt.com@...
> > [mailto:bbc-micro-bounces+michael.firth=bt.com@...
> > .uk] On Behalf Of Mark Usher
> > Sent: 10 November 2009 17:08
> > To: bbc-micro@...
> > Subject: Re: [BBC-Micro] Who the message is from... Outlook fix
> >
> > For those who want to create a button in Outlook to Reply to List,
> > here is some code for the macro behind it
> >
> > -Mark
> >
> > Sub Reply_list()
> >
> > Dim objItem As Object
> > Dim objReply As MailItem
> >
> > Set objItem = GetCurrentItem()
> > If objItem.Class = olMail Then
> > ' create the reply, add the address and display
> > Set objReply = objItem.Reply
> > objReply.To = "bbc-micro@..."
> > objReply.Display
> >
> > End If
> >
> > Set objReply = Nothing
> > Set objItem = Nothing
> >
> >
> > End Sub
> >
> > Function GetCurrentItem() As Object
> > Dim objApp As Outlook.Application
> >
> > Set objApp = Application
> > On Error Resume Next
> > Select Case TypeName(objApp.ActiveWindow)
> > Case "Explorer"
> > Set GetCurrentItem
> > objApp.ActiveExplorer.Selection.Item(1)
> > Case "Inspector"
> > Set GetCurrentItem = objApp.ActiveInspector.CurrentItem
> > Case Else
> > ' anything else will result in an error, which is
> > ' why we have the error handler above
> > End Select
> >
> > Set objApp = Nothing
> > End Function
> >
> >
> >
> > > -----Original Message-----
> > > From: bbc-micro-bounces+mu.list=aon.at@...
> > [mailto:bbc-
> > > micro-bounces+mu.list=aon.at@...] On Behalf Of
> Andrew
> > > Benham
> > > Sent: 10 November 2009 16:33
> > > To: bbc-micro@...
> > > Subject: Re: [BBC-Micro] Who the message is from...
> > >
> > > Mick Champion wrote:
> > >
> > > > It stays in the same place on my version of TB (
> > 2.0.0.23). It greys
> > > > out when no list is available. Are you using the same add
> > on version
> > > > as above? One of the links went to v.0.4.0?? Here is what
> > my version
> > > > looks like with no list to reply to ;
> > > > http://rs432.net/greyreplylist.JPG
> > >
> > > I've just (up|down|left|right)-graded my add-on to v0.4.2
> > (the latest
> > > available) and yes, the button is greyed out when not usable.
> > >
> > > > Secondly, the reply to list stayed faded out so back to hitting
> > > > "reply all", delete your e-mail and change bbc list field from
> > > > "cc" to "to" You've got to laugh :-)
> > >
> > > I don't see that - reply to list is available for my BBC
> > list messages,
> > > no matter how I sent them.
> > >
> > > --
> > > Andrew Benham adsb@...
> > > Southgate, London N14, United Kingdom
> > >
> > > The gates in my computer are AND OR and NOT, not "Bill".
> > >
> > > _______________________________________________
> > > bbc-micro mailing list
> > > bbc-micro@...
> > > http://lists.cloud9.co.uk/mailman/listinfo/bbc-micro
> >
> >
> > _______________________________________________
> > bbc-micro mailing list
> > bbc-micro@...
> > http://lists.cloud9.co.uk/mailman/listinfo/bbc-micro
> >
>
> _______________________________________________
> bbc-micro mailing list
> bbc-micro@...
> http://lists.cloud9.co.uk/mailman/listinfo/bbc-micro