Re: Hiding exchange server in header

What to do with this script?
How to make this working?


"wasonce" schreef:

> 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@xxxxxxxxxxx> wrote in message
> news:uX4x%23rZSFHA.248@xxxxxxxxxxxxxxxxxxxxxxx
> > 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!
> >
> >
>
>
>
.

Relevant Pages

  • Re: client close the socket. how the server knows?
    ... the server know that the socket is closed from the client side. ... > Private Delegate Sub UpdateListBoxDel(ByVal Data As String) ... > Private Sub Button1_Click(ByVal sender As System.Object, ...
    (microsoft.public.dotnet.languages.vb)
  • .Net remoting doesnt work in Wan area.
    ... i try to broadcast events raised in server to ... Public Sub DoSomething ... Dim del As ... Dim clientProv As New BinaryClientFormatterSinkProvider ...
    (microsoft.public.dotnet.framework)
  • Re: How to get fastForward to work in the Windows Media Player Control?
    ... Sub ShutMeDown ... WMP is *client side*. ... Even if you could try to run WMP somehow at the server end, ... "Player" is not a child of Form1, it's a child of the Document object. ...
    (microsoft.public.windowsmedia.player.web)
  • Re: Chat client/server print failed
    ... is the print statement in the send_msg_all sub. ... leave the server running for testing purposes. ... # This would be the end of file, so close the client ... # just read means there is a complete request waiting ...
    (comp.lang.perl.misc)
  • Re: Hiding exchange server in header
    ... Private Sub IEventIsCacheable_IsCacheable ... Public Sub ISMTPOnArrival_OnArrival(ByVal iMsg As CDO.Message, EventStatus ... Dim Flds As ADODB.Fields ... > full server name and internal ip address to be available. ...
    (microsoft.public.inetserver.iis.smtp_nntp)
Loading