Code equivalent for this.......Help

[jayakumar]

HI,

Below is the code in vb to send mail using CDO object. I
want to do the same in VB.Net , i need to know how to sent
the authentication in vb.net "
..Item(cdoSMTPAuthenticate) = cdoBasic"


VB
-------------------------------------------------------

Dim iMsg as New CDO.Message
Dim iConf as New CDO.Configuration

Dim Flds as ADODB.Fields
Set Flds = iConf.Fields

With Flds
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServerName)
= "so******@microsoft.com"
.Item(cdoSMTPConnectionTimeout) = 10 ' quick timeout
.Item(cdoSMTPAuthenticate) = cdoBasic
.Item(cdoSendUserName) = "username"
.Item(cdoSendPassword) = "password"
.Item(cdoURLProxyServer) = "server:80"
.Item(cdoURLProxyBypass) = "<local>"
.Item(cdoURLGetLatestVersion) = True
.Update
End With

With iMsg
Set .Configuration = iConf
.To = """User A"" <us***@microsoft.com>"
.From = """User B"" <us***@microsoft.com>"
.Subject = "Hows it going? I've attached my web
page"
.CreateMHTMLBody "http://mypage"
.AddAttachment "C:\files\mybook.doc"
.Send
End With
-------------------------------------------------------

thanks

[Sreejumon[MVP]]

Hi Jyakumar,

Please refer the System.Web.Mail namespace. This is the CDO implementation
in .net world. Please refer the following link.
http://www.codeproject.com/useritems/epsendmail.asp

--
Let me know if you need further help

Regards
Sreejumon[MVP]
www.mstechzone.com

"jayakumar" <ja********@hotmail.com> wrote in message
news:08****************************@phx.gbl...

HI,

Below is the code in vb to send mail using CDO object. I
want to do the same in VB.Net , i need to know how to sent
the authentication in vb.net "
.Item(cdoSMTPAuthenticate) = cdoBasic"


VB
-------------------------------------------------------

Dim iMsg as New CDO.Message
Dim iConf as New CDO.Configuration

Dim Flds as ADODB.Fields
Set Flds = iConf.Fields

With Flds
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServerName)
= "so******@microsoft.com"
.Item(cdoSMTPConnectionTimeout) = 10 ' quick timeout
.Item(cdoSMTPAuthenticate) = cdoBasic
.Item(cdoSendUserName) = "username"
.Item(cdoSendPassword) = "password"
.Item(cdoURLProxyServer) = "server:80"
.Item(cdoURLProxyBypass) = "<local>"
.Item(cdoURLGetLatestVersion) = True
.Update
End With

With iMsg
Set .Configuration = iConf
.To = """User A"" <us***@microsoft.com>"
.From = """User B"" <us***@microsoft.com>"
.Subject = "Hows it going? I've attached my web
page"
.CreateMHTMLBody "http://mypage"
.AddAttachment "C:\files\mybook.doc"
.Send
End With
-------------------------------------------------------

thanks

[Kevin Spencer]

Whatever account ASP.Net is running under, that is the account that is
sending the mail. Just add that account to the SMTP Server's authenticated
operators.

--
HTH,

Kevin Spencer
Microsoft MVP
..Net Developer
http://www.takempis.com
Neither a follower nor a lender be.

"jayakumar" <ja********@hotmail.com> wrote in message
news:08****************************@phx.gbl...

HI,

Thanks, but my smtp server is authenticated. How do u
specify the Username and password for the server.

-----Original Message-----
Hi Jyakumar,

Please refer the System.Web.Mail namespace. This is the

CDO implementation

in .net world. Please refer the following link.
http://www.codeproject.com/useritems/epsendmail.asp

--
Let me know if you need further help

Regards
Sreejumon[MVP]
www.mstechzone.com

"jayakumar" <ja********@hotmail.com> wrote in message
news:08****************************@phx.gbl...

HI,

Below is the code in vb to send mail using CDO object. I want to do the same in VB.Net , i need to know how to sent the authentication in vb.net "
.Item(cdoSMTPAuthenticate) = cdoBasic"


VB
-------------------------------------------------------

Dim iMsg as New CDO.Message
Dim iConf as New CDO.Configuration

Dim Flds as ADODB.Fields
Set Flds = iConf.Fields

With Flds
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServerName)
= "so******@microsoft.com"
.Item(cdoSMTPConnectionTimeout) = 10 ' quick timeout
.Item(cdoSMTPAuthenticate) = cdoBasic
.Item(cdoSendUserName) = "username"
.Item(cdoSendPassword) = "password"
.Item(cdoURLProxyServer) = "server:80"
.Item(cdoURLProxyBypass) = "<local>"
.Item(cdoURLGetLatestVersion) = True
.Update
End With

With iMsg
Set .Configuration = iConf
.To = """User A"" <us***@microsoft.com>"
.From = """User B"" <us***@microsoft.com>"
.Subject = "Hows it going? I've attached my web
page"
.CreateMHTMLBody "http://mypage"
.AddAttachment "C:\files\mybook.doc"
.Send
End With
-------------------------------------------------------

thanks

.