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
%>
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.
Excelente atención y servicio, incomparable.
Excelente servicio, siempre que manifesté duda o consulta me respondieron al instante y resolvieron mis inquietudes.
Increíble servicio, gran soporte y excelente relación calidad/precio. Gracias Chicos!
El mejor servicio!!!!
EXCELENTEEEEEEEE!! servicios y atención que son para aplaudir! siempre disponibles y dedicados. Muchas gracias!
Muy buen servicio. Siempre me atendieron cordialmente y respondieron mis inquietudes. Además están dispuestos a satisfacer las necesidades de sus clientes, componiéndolos en los que necesiten y les sea más favorable. Nunca tuve inconvenientes, no me han cortado el servicio y mi página siempre anduvo desde el principio sin problemas. Además cuentan con una oficina en la ciudad, lo que hace todo más fácil y confiable.
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. !!!
Excelente el apoyo que me dieron con los tramites en nic.ar - La calidad y calidez en la atención es de destacar!! Gracias Martín!!
Tenemos alojada la página de Cáritas Bahía Blanca y realmente el servicio técnico siempre fue muy bueno. Las consultas telefónicas son respondidas con mucha amabilidad y eficacia y cumplen en el envío de mails cuando uno requiere alguna ayuda por esa via. Recomendables.
Excelente servicio y atención. Muchas Gracias HB. http://gomces.com/
Excelente servicio y muy buena atencion! Satisfecho 100%
Excelente, felicitaciones son gente de confianza, estamos muy conformes con el servicio que nos prestan .Sigan creciendo y los mejores deseos de prosperidad!!!
Chicos! excelente servicio! la verdad que muy conforme porque ademas siempre estan para resolverme todos los problemas :) muchas gracias! Desde ya super confiables, responsables y recomendables... Felicitaciones!!!
muy buen servicio de hosting, siempre al servicio del cliente la verdad que muy atentos!!!
Excelente servicio y atencion! nunca un problema
Felicitaciones por sus excelentes servicios, responsabilidad y rapidez, les deseamos lo mejor... MN PARTICIPACIONES (www.mnparticipaciones.com.ar)
Como siempre, excelente servicio y asesoramiento y muy buena predisposición para dar una mano!!!! 100% recomendables!!
Excelente atención, servicio y resultados. Muchas gracias!
Excelente servicio y respuesta inmediata! Muy atentos!
Tenía que hacer dos registros NIC. Gracias a la asistencia y predisposición de Martín, tanto en la oficina como la asistencia técnica telefónica, pude lograr mi objetivo. Excelente.
Arte Marcial kimugan ( www.kimugan.com - www.gabrielgagliardini.com ) Estoy muy conforme con el servicio. Lo recomiendo ampliamente.
Somos clientes desde hace 5 años y la verdad que el servicio es impecable. Saludos y felicidades. REVIN SA.-
Siempre puedo contar con su asesoramiento para cualquier duda o consulta, estoy muy conforme con el servicio. Gracias!
Tengo contratados dos Planes Empresa Anuales y estoy muy conforme con el servicio brindado, totalmente recomendables.
Tengo su servicio de hosting desde hace varios años y no lo cambiaría por nada; simplemente por la predisposición en ayudar e intentar solucionar cada problema presentado, mostrando velocidad y profesionalismo al mismo tiempo. Un servicio humano y técnico realmente inmejorable.
Excelente servicio y pronta respuesta ante cualquier tipo de consulta o problema. Los conozco desde el comienzo, nunca un inconveniente. Gracias!!
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 nivel en el servicio, igual en la atencion...felicitaciones!!! desde www.mcdigitalmarketing.com.ar
FELICITACIONES POR LA WEB NUEVA ¡ SIGAN CRECIENDO ABRAZO NIXEL
