Help concatenating From in CDO.Message

[Raju]

I am using CDO.Message to create an email. Currently the email sent
says the email id of the sender however i would like it to say the
name + email id something like this
Email From : " Name"<[e-mail]>

If I pass this as a constant like
Email From """Name"" <[e-mail]>" it works. However when I try
to
get the values and concatenate from the tables it fails. Any idea:
strSQL = "select top 1 * from tblEmail"
Set rs = Server.CreateObject("ADODB.Recordset")
Call GenerateRecordSet(strSQL,rs)
sCSName = rs("ConfirmationEmailName")
sCSEMail = rs("ConfirmationEmailSender")
sCSEmailFrom = sCSName & " <" & sCSEMail & ">" (This line will
fail)
rs.Close
Set rs = Nothing
Set oMail = Server.CreateObject("CDO.Message")
set oConf = CreateObject("CDO.Configuration")
With oMail
Set .Configuration = oConf
..HTMLBody = "Test"
..To = "[e-mail]"
..From = sCSEMailFrom
..Subject = " Test"
End With
Set oConf = Nothing
Set oMail = Nothing

[Anthony Jones]

"Raju" <na*****@yahoo.comwrote in message
news:11**********************@n60g2000hse.googlegr oups.com...

I am using CDO.Message to create an email. Currently the email sent
says the email id of the sender however i would like it to say the
name + email id something like this
Email From : " Name"<[e-mail]>

If I pass this as a constant like
Email From """Name"" <[e-mail]>" it works. However when I try
to
get the values and concatenate from the tables it fails. Any idea:
strSQL = "select top 1 * from tblEmail"
Set rs = Server.CreateObject("ADODB.Recordset")
Call GenerateRecordSet(strSQL,rs)
sCSName = rs("ConfirmationEmailName")
sCSEMail = rs("ConfirmationEmailSender")
sCSEmailFrom = sCSName & " <" & sCSEMail & ">" (This line will
fail)

sCSEmailFrom = """" & sCSName & """ <" & sCSEMail & ">"

rs.Close
Set rs = Nothing
Set oMail = Server.CreateObject("CDO.Message")
set oConf = CreateObject("CDO.Configuration")
With oMail
Set .Configuration = oConf
.HTMLBody = "Test"
.To = "[e-mail]"
.From = sCSEMailFrom
.Subject = " Test"
End With
Set oConf = Nothing
Set oMail = Nothing

[Raju]

sCSEmailFrom = """" & sCSName & """ <" & sCSEMail & ">"
Response.Write sCSEmailFrom

will give
Test

It removes the email...I had already tried this

[Anthony Jones]

"Raju" <na*****@yahoo.comwrote in message
news:11*********************@k79g2000hse.googlegro ups.com...

sCSEmailFrom = """" & sCSName & """ <" & sCSEMail & ">"
Response.Write sCSEmailFrom

will give
Test

It removes the email...I had already tried this

No it doesn't, it only looks like that in your email client because the
email client hides the actual email address in favor of the display name.
Thats the whole point of the "Test" <te**@somewhere.comformat.

In Outlook Express or Outlook you can right mouse in the Test text and
select properties, under that you see the email address.