Sending an email in VB 2005

[si_owen]

Hi Guys,

I have been trying to update my existing email routine within my .net
v2 web app website, I currently have the following code:

Dim GroupMailSender As New
SmtpClient(Conf igurationManage r.AppSettings(" Mail.SMTP"))

Dim GroupFrom As MailAddress = New MailAddress("X@ X.uk")
Dim GroupTo As MailAddress = New MailAddress("T@ T.uk")
Dim GroupEmail As MailMessage = New MailMessage(Gro upFrom,
GroupTo)

GroupEmail.Subj ect = txtGroupSubject .Text
GroupEmail.Body = txtGroupMessage .Text

Try
GroupMailSender .Send(GroupEmai l)
Catch ex As Exception
txtGroupMessage .Text &= ex.ToString
End Try

lblGroupFeedbac k.Text = "Mail Message Has Been Sent"

clearGroupPanel ()

This code works fine, although I am trying to change the from address
to recognise the user currently using the system. The code below picks
up the users identity and retrieves their email from the database:

Dim user As New UserEntity
Session("UserEm ail") = user.Email

However the problem is when I have attempted to use this variable
rather than a fixed email address, for example (code replacement):

Dim user As New UserEntity
Session("UserEm ail") = user.Email

dim testEmail as string = Session("UserEm ail")

Dim GroupFrom As MailAddress = New MailAddress(tes tEmail)

However I get the following error, " Unable to cast object of type
'System.String' to type 'System.Net.Mai l.MailAddress'. ".

I have also tried changing the variable type from a string to a
system.net.mail .mailmessage, but i still encounter the same error.

Has anyone encountered and overcome this problem?? Any help would be
very much appreciated.

Thanks,

Simon

[Problematic Coder]

This is how I do it and it works just fine:

Dim body as string = "Whatever"

Dim subject as string = "Subject"

Dim fromAddress As New System.Net.Mail .MailAddress(fr omAddy)

Dim toAddress As New System.Net.Mail .MailAddress(to Addy)

Dim msg As New System.Net.Mail .MailMessage

msg.From = fromAddress

msg.To.Add(toAd dress)

msg.CC.Add(ccAd dress)

msg.Subject = Subject

msg.Body = body

msg.IsBodyHtml = True

Dim mailSender As New System.Net.Mail .SmtpClient()

mailSender.Host = "myhost.com "

mailSender.Send (msg)

Hope it helps...

"si_owen" <s.****@sstaffs .gov.ukwrote in message
news:11******** **************@ u2g2000hsc.goog legroups.com...

Hi Guys,

I have been trying to update my existing email routine within my .net
v2 web app website, I currently have the following code:

Dim GroupMailSender As New
SmtpClient(Conf igurationManage r.AppSettings(" Mail.SMTP"))

Dim GroupFrom As MailAddress = New MailAddress("X@ X.uk")
Dim GroupTo As MailAddress = New MailAddress("T@ T.uk")
Dim GroupEmail As MailMessage = New MailMessage(Gro upFrom,
GroupTo)

GroupEmail.Subj ect = txtGroupSubject .Text
GroupEmail.Body = txtGroupMessage .Text

Try
GroupMailSender .Send(GroupEmai l)
Catch ex As Exception
txtGroupMessage .Text &= ex.ToString
End Try

lblGroupFeedbac k.Text = "Mail Message Has Been Sent"

clearGroupPanel ()

This code works fine, although I am trying to change the from address
to recognise the user currently using the system. The code below picks
up the users identity and retrieves their email from the database:

Dim user As New UserEntity
Session("UserEm ail") = user.Email

However the problem is when I have attempted to use this variable
rather than a fixed email address, for example (code replacement):

Dim user As New UserEntity
Session("UserEm ail") = user.Email

dim testEmail as string = Session("UserEm ail")

Dim GroupFrom As MailAddress = New MailAddress(tes tEmail)

However I get the following error, " Unable to cast object of type
'System.String' to type 'System.Net.Mai l.MailAddress'. ".

I have also tried changing the variable type from a string to a
system.net.mail .mailmessage, but i still encounter the same error.

Has anyone encountered and overcome this problem?? Any help would be
very much appreciated.

Thanks,

Simon