He creado un formulario en asp, este formulario envia todos los mensajes a una sola direccion de e-mail...
pero me interesaria que se enviaran a UNA SOLA DIRECCIÓN DE EMAIL ha seleccionar de UNA DE LAS DOS VENTANAS DESPLEGABLES que hay en el mismo formulario (se han classificado los diferentes destinatarios en dos ventanas desplegables).
Además, debería salir un mensaje de error, si las dos ventanas desplegables tienen activada la opcion [Ninguno] que está como predeterminada.
Alguién me puede pasar el CODIGO INTEGRO para que pueda hacer esto?
Actualmente mi codigo es así:
Código:
<%
if Request.Form("email") <> "" Then
first = Request.Form("first")
last = Request.Form("last")
address = Request.Form("address")
city = Request.Form("city")
zip = Request.Form("zip")
phone = Request.Form("phone")
email = Request.Form("email")
bustiaDep = Request.Form("bustiaDep")
bustiaPgm = Request.Form("bustiaPgm")
subject = Request.Form("subject")
message = Request.Form("message")
body = "Nombre: " & first & vbCrLf & "Apellidos: " & last & vbCrLf & "Direccion: " & address & vbCrLf & "Poblacion: " & city & vbCrLf & "Codi Postal: " & zip & vbCrLf & "Telefono: " & phone & vbCrLf & "Email: " & email & vbCrLf & "Departamento: " & bustiaDep & vbCrLf & "Programa: " & bustiaPgm & vbCrLf & "Asunto: " & subject & vbCrLf & "Mensaje: " & message
tema = "Comentari des de la web: " & subject
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.**.com"
Mail.From = "mail@**.com"
Mail.FromName = "MiNombre" ' Specify sender's name
Mail.AddAddress "webmaster@**.com"
Mail.AddReplyTo "webmaster@**.com"
Mail.Subject = tema
Mail.Body = body
On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error detectat: </FONT>" & Err.Description
End If
%>
Muchas gracias por facilitarme sus codigos integros, es que no tengo ni idea de ASP.