"Billnitro45" <billnitro45@comcast.net> wrote in message
news:uX4x%23rZSFHA.248@TK2MSFTNGP15.phx.gbl...
> Hello,
>
> Hopefully this will be a quick one. I am wondering how to hide the
> internal
> ip addresses and server name of my internal exchange servers? When I send
> email outbound to my external test account and I then check I can see the
> route the mail has taken (which is of course helpful) but I don't want the
> full server name and internal ip address to be available.
>
> Thanks!
>
>

> Option Explicit
>
> Implements IEventIsCacheable
> Implements ISMTPOnArrival
>
> Private Sub IEventIsCacheable_IsCacheable()
> ' Only returns S_OK.
> End Sub
>
> Public Sub ISMTPOnArrival_OnArrival(ByVal iMsg As CDO.Message, EventStatus
> As CdoEventStatus)
>
> Dim Flds As ADODB.Fields
>
>
>
> Set Flds = iMsg.Fields
>
> With Flds
> .Delete ("urn:schemas:mailheader:received")
> .Update
> End With
>
> iMsg.DataSource.Save
>
> EventStatus = cdoRunNextSink
>
> End Sub
>
>
>
> "Billnitro45" <billnitro45@comcast.net> wrote in message
> news:uX4x%23rZSFHA.248@TK2MSFTNGP15.phx.gbl...
> > Hello,
> >
> > Hopefully this will be a quick one. I am wondering how to hide the
> > internal
> > ip addresses and server name of my internal exchange servers? When I send
> > email outbound to my external test account and I then check I can see the
> > route the mail has taken (which is of course helpful) but I don't want the
> > full server name and internal ip address to be available.
> >
> > Thanks!
> >
> >
>
>