Claro aqui pongo el código
Cita: <% Set oMail = Server.CreateObject("CDO.Message")
correo=strsecur(request.Form("correo"))
sql= "select * from pe_usuario where correo='"& correo&"'"
rs2.open sql,conn
'reemplazar aqui las variables principales
para = correo
de = "
[email protected]"
asunto = "Datos solicitados"
mensaje = "Los datos que solicitaste son los siguientes" &vbnewline& "Nickname='"&rs2("nickname")&"'"&vbnewline&"Passwo rd='"&rs2("pwd")&"'"
oMail.From = de
oMail.To = para
oMail.Subject= asunto
oMail.TextBody = mensaje
oMail.Send
Set oMail = Nothing
%>
aqui de un campo de texto recogo el valor para la varriable correo y si esa variable es con correo:
[email protected], si lo envía pero si es correo@hotmail o yahoo no lo hace espero puedan ayudarme