Ejemplo para crear un formulario de envío de correos en ASP:
<%@LANGUAGE="VBSCRIPT" %>
<!– Ejemplo de Formulario de envio de correos utilizando ASP –>
<!– Este codigo debe ser colocado en un archivo de extension .asp –>
<!–METADATA TYPE="TypeLib" FILE="E:\WINDOWS\system32\cdosys.dll" –>
<!– Formulario para completar con los datos –>
<form action="test_mail.asp" method="POST">
E-mail destinatario: <input type="text" name="destinatario" width="50"></input><br/>
Titulo Consulta: <input type="text" name="TituloConsulta" width="50" ></input><br/>
Texto Consulta: <TEXTAREA NAME="Consulta" ROWS="10" COLS="50"> </TEXTAREA> <br/>
<input type="submit" value="Enviar e-mail" /><input type="hidden" name="enviar" value="1"/>
</form>
<!– Fin Formulario para completar con los datos –>
<%
‘ Se verifica que los datos han sido enviados desde el formulario, para la validación con el SMTP
DestinatarioCorreo = Request("destinatario")
CuentaDesdeDondeSeEenvia = "CuentaDeCorreo" ‘debe ser una creada desde el panel de control nombre@dominio
TextoConsulta= Request("Consulta")
TituloConsulta= Request("TituloConsulta")
If Request("enviar") = 1 Then
If Not Request("usuario") = "" And Not Request("destinatario") = "" Then
‘ Se crean los objetos necesarios para el envío del correo
Set oMail = Server.CreateObject("CDO.Message")
Set iConf = Server.CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
‘ Se configuran los parametros necesarios para el envío
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "http://127.0.0.1"
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10
iConf.Fields.Update
‘ Se asignan las propiedades de configuración al objeto
Set oMail.Configuration = iConf
oMail.To = DestinatarioCorreo
oMail.From = CuentaDesdeDondeSeEenvia
oMail.Subject = TituloConsulta
oMail.TextBody = TextoConsulta
‘ Se envía el correo
oMail.Send
‘ Se destruyen los objetos
Set iConf = Nothing
Set Flds = Nothing
Else
‘ Respuesta en caso de que no se completen todos los datos
Response.Write("Complete todos los campos para ejecutar el ejemplo")
End If
End If
%>
Excelente atención y servicio, incomparable.
Muy satisfecha con el servicio brindado y la atención día a día.
Como siempre, excelente servicio y asesoramiento y muy buena predisposición para dar una mano!!!! 100% recomendables!!
Excelente, muy buena atención, son rápidos, el servicio funciona muy bien, y ante cualquier duda que hubiera surgido, siempre la respuesta fue muy rápida.
Gran servicio, rápida respuesta y buena atención sigan así!
Sin duda son los mejores de la ciudad y la zona. La relación precio/producto es excelente y además de la altísima calidad y su gran variedad de servicios, cuentan con personal altamente calificado para dar soporte a sus clientes. Su trayectoria los avala. Gracias por todo!
Excelente servicio y atencion! nunca un problema
Que puedo decir, hace años que trabajo con ellos y sin dudas son los mejores...RESPONSABILIDAD, CORDIALIDAD, SERIEDAD, PUNTUALIDAD son solo algunas cosas para destacar. Hoy en día eso no se consigue en ningún lado. 100% CONFIABLES y RECOMENDABLES!!! GRACIAS TOTALES
Felicitaciones por sus excelentes servicios, responsabilidad y rapidez, les deseamos lo mejor... MN PARTICIPACIONES (www.mnparticipaciones.com.ar)
El servicio es muy bueno! Excelente atención! El soporte técnico siempre está disponible para ayudar.
Excelente el servicio que dan la asistencia al cliente y todo el soporte de ayuda con el que cuentan. son los mejores de bahía. muchas gracias por todos. !!!
Estamos sumamente conformes con el servicio que nos brindan. Eficiencia profesional y excelente trato humano. No podemos pedir más. Seguiremos trabajando juntos (y esperemos que sea por mucho tiempo). Abrazo a la gente de Hosting Bahía. ECCO COMUNICACION CREATIVA / Radio Mitre Bahía Blanca
Excelente servicio! hace aproximadamente 3 años que estoy usando HostingBahia y siempre me brindo un servicio y una atención impecable, se los recomiendo!
Excelente y rápido asesoramiento en las soluciones a los inconvenientes que me surjen referentes a los servicios que me brindan!!! 100% recomendables!!
Hace mas de dos años que somos clientes de Hosting Bahia y la verdad es que estamos muy conformes en todo sentido. Atencion, funcionalidad,etc. Muy recomendables !! Abrazo CHENQUEANUNCIOS.COM
Sin duda son los mejores de la ciudad y la zona. La relación precio/producto es excelente y además de la altísima calidad y su gran variedad de servicios, cuentan con personal altamente calificado para dar soporte a sus clientes. Su trayectoria los avala. Gracias por todo!
Excelente servicio y excelente soporte técnico, siempre que tuve algún problema para resolver situaciones de hosting ellos respondieron inmediatamente, claramente y dando los pasos a seguir y si yo no podía resolverlo, Hosting Bahía lo hacía por mí. LOS FELICITO !! MI PUNTAJE: SUPER SUPER 10
Excelente servicio y atención. Muchas Gracias HB. http://gomces.com/
Excelente servicio y muy buena atencion! Satisfecho 100%
Impecable el servicio y la rapidez en solucionar nuestros problemas! Gracias por ayudarnos!!
Arte Marcial kimugan ( www.kimugan.com - www.gabrielgagliardini.com ) Estoy muy conforme con el servicio. Lo recomiendo ampliamente.
muy buen servicio de hosting, siempre al servicio del cliente la verdad que muy atentos!!!
Muy buena atención, excelente respuesta a los pocos problemas encontrados!! Gracias por la atencón y felices fiestas!!
Excelente servicio y soporte tecnico, el mejor servicio de hosting de Bahia Blanca, nunca un problema! gracias gente!!!
Muy satisfecha con el servicio brindado y la atención día a día.
Excelente servicio y respuesta inmediata! Muy atentos!
Felicitaciones por sus excelentes servicios, responsabilidad y rapidez, les deseamos lo mejor... MN PARTICIPACIONES (www.mnparticipaciones.com.ar)
El mejor servicio!!!!
Excelente atencion!! un servicio impecable! las consultas son respondidas al momento!!
Desde hace tiempo vengo contando con sus servicios y la verdad que impecables. Lo mejor es la atención, nada de 0800 ni sacar tickets y demás, respuestas y soluciones de inmediato. Muchas gracias.
