[2005] sending email using exchange server 2003

[steve_rm]

Hello,

Does any one have any information for sending e-mail using exchange server 2003.

I am using vs 2005 and need to be able to send e-mail from a windows application and have the exchange server send it to the destination e-mail.

If anyone can point me in the right direction or have some information that will be a great help. I have been told that this is very difficult to do.

Many thank for any help you can give me,

Steve

[steve_rm]

Hello,

I managed to find some code and created 2 different methods to send e-mail smtp, and using MS Exchange Server.

The code i used is below. But I got a warning saying that using system.web.mail is obsolete and system.net.mail is the recommended to be used instead.

Also using the MS Exchange is very slow, i tried to send an e-mail to my hotmail and gmail account it takes more than 10 minutes to get there.

Is there any setting on the microsoft exchange server that need to be set?

Another quick question, is there a way to get the server name and the e-mail account automatically instead of a user inputting in? They can just click the send button.

Many thanks for your time,

Steve

Code for using system.web.mail

 Private Sub btnSendExchangeServer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSendExchangeServer.Click
        Dim mailMsg As New MailMessage()

        mailMsg.To = "[email protected]"
        mailMsg.From = "[email protected]"
        mailMsg.Subject = "2nd Microsoft Exchange Server Mail Test"
        mailMsg.Body = "This email came from MS Exchange Server"

        Try
            SmtpMail.SmtpServer = "something.domain.com"
            SmtpMail.Send(mailMsg)

        Catch ex As Net.Mail.SmtpException
            MessageBox.Show(ex.Message)
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try

    End Sub
End Class

Code for using gmail smpt server using system.net.mail

Private Sub btnSendMail_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSendMail.Click
        Dim msgTo As New MailAddress("[email protected]")
        Dim msgFrom As New MailAddress("[email protected]")
        Dim msgSender As New MailAddress("[email protected]")

        Dim mailMsg As New MailMessage()
        mailMsg.Sender = msgSender
        mailMsg.To.Add(msgTo)
        mailMsg.Priority = MailPriority.High
        mailMsg.CC.Add("[email protected]")
        mailMsg.Subject = "This is a mail test"
        mailMsg.Body = "This is the body of the e-mail, Enjoy"
        mailMsg.From = msgFrom

        Dim client As New SmtpClient("smtp.gmail.com", 587)
        client.Credentials = New System.Net.NetworkCredential("[email protected]", "password")
        client.EnableSsl = True

        Try
            client.Send(mailMsg)
        Catch ex As SmtpException
            MessageBox.Show(ex.Message)
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try

    End Sub