objNewMail dévil, objNewMail1
Fijar el objCDOMail = Server.CreateObject (“CDONTS.NewMail”)
objCDOMail.To = “[email protected]”
objCDOMail.From = “[email protected]”
txtBody = “alguien le ha entrado en contacto con de su sitio” y VbCrLf y VbCrLf y “nombre: ” y nombre y VbCrLf y VbCrLf y “teléfono: ” y teléfono y VbCrLf y VbCrLf y “email: ” y email y descripción de VbCrLf y de VbCrLf y “del caso: ” y descrip
objCDOMail.Subject = “alguien le ha entrado en contacto con de su Web site”
objCDOMail.Body = txtBody
objCDOMail.Send
Fijar el objCDOMail = nada
Si "" <> del email entonces
Fijar objCDOMail1 = Server.CreateObject (“CDONTS.NewMail”)
objCDOMail1.To = email
objCDOMail1.From = “[email protected]”
txtBody = “esto es una respuesta automatizada. No contestar por favor ........ ha recibido su mensaje. Gracias por decirnos sobre su caso. Intentaremos entrarle en contacto con usar la información que usted ha proporcionado. Usted puede también alcanzarnos en el en blanco 1-888 durante horas de oficina normales o usted puede dejar un mensaje después de que las horas de oficina” y VbCrLf y VbCrLf y VbCrLf y VbCrLf y “usted hayan presentado la información siguiente: ” Y VbCrLf y VbCrLf y “nombre: ” y nombre y VbCrLf y VbCrLf y “teléfono: ” y teléfono y VbCrLf y VbCrLf y “email: ” y email y descripción de VbCrLf y de VbCrLf y “del caso: ” y descrip
se ha recibido objCDOMail1.Subject = “su sumisión”
objCDOMail1.Body = txtBody
objCDOMail1.Send
Fijar objCDOMail1 = nada
Terminar si
|