Hi Walshy,
in Application_Startup you can loop through the folder and check each
item if it is unread, if so forward the item.

Signature
Viele Grüße
Michael Bauer
> I dont think there is a way to forward messages automatically or using VB in
> outlook without the programme running.. If so could someone please let me
[quoted text clipped - 8 lines]
>
> Regards
Walshy - 09 Nov 2004 16:14 GMT
Any chance you could give me the code please ? Im still learning slowly... doh
would be grateful thanks
> Hi Walshy,
>
[quoted text clipped - 18 lines]
> >
> > Regards
Michael Bauer - 09 Nov 2004 16:41 GMT
Yes, of course.
private sub Application_Startup()
dim obj as object
for each obj in application.session.getfolder(olfolderinbox).items
if typeof obj is outlook.mailitem then
set omail=obj
' the rest Eric gave to you
endif
next
end sub

Signature
Viele Grüße
Michael Bauer
> Any chance you could give me the code please ? Im still learning slowly... doh
>
[quoted text clipped - 22 lines]
> > >
> > > Regards
Michael Bauer - 09 Nov 2004 17:39 GMT
> for each obj in application.session.getfolder(olfolderinbox).items
Sorry, that should be
for each obj in
application.session.GetDefaultFolder(olfolderinbox).items

Signature
Viele Grüße
Michael Bauer