El siguiente ejemplo genera un formulario y realiza las operaciones necesarias para el envio de e-mails mediante ASP y CDO, en plataformas Microsoft Windows 2003
<%@LANGUAGE="VBSCRIPT" %>
<!--METADATA TYPE="TypeLib" FILE="E:\WINDOWS\system32\cdosys.dll" -->
<!-- Formulario para completar con los datos -->
<form action="test_mail.asp" method="POST">
Usuario smtp: <input type="text" value="" name="usuario"></input> <br />
(El usuario puede encontrarlo en el panel de control, E-mail, Administrar cuentas)<br/>
Contraseña smtp: <input type="password" value="" name="passwd"></input><br/>
(La contraseña de su correo electrónico)
E-mail destinatario: <input type="text" name="destinatario" width="50"></input><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
If Request("enviar") = 1 Then
If Not Request("usuario") = "" And Not Request("passwd") = "" 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.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
' Se completan los datos del usuario y la contraseña necesarios para el envio
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = Request("usuario")
'usuario smtp
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = Request("passwd")
'password para STMP
iConf.Fields.Update
' Se asignan las propiedades de configuración al objeto
Set oMail.Configuration = iConf
' Destinatario del correo
oMail.To = Request("destinatario")
' Remitente del correo
oMail.From = "noreply@ferozowindows.com.ar"
' Subject o asunto
oMail.Subject = "E-mail de prueba"
' Cuerpo del mensaje
oMail.TextBody = "Este es un e-mail enviado desde la página de ejemplo de Ferozo Windows Edition"
' 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
%>
Impecable el servicio y la rapidez en solucionar nuestros problemas! Gracias por ayudarnos!!
Excelente calidad y atención... Más que recomendables! Supieron ayudarme y asesorarme en todo y estuvieron siempre disponibles... Buenísimo que podamos contar con un servicio así en Bahía... Muchísimas gracias y ojalá mucha gente más se sume porque el servicio lo vale! EXCELENTE!
Tengo contratados dos Planes Empresa Anuales y estoy muy conforme con el servicio brindado, totalmente recomendables.
Arte Marcial kimugan ( www.kimugan.com - www.gabrielgagliardini.com ) Estoy muy conforme con el servicio. Lo recomiendo ampliamente.
Excelente servicio y pronta respuesta ante cualquier tipo de consulta o problema. Los conozco desde el comienzo, nunca un inconveniente. Gracias!!
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!!
Muy buena atención, excelente respuesta a los pocos problemas encontrados!! Gracias por la atencón y felices fiestas!!
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.
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!!
Servicio de primera calidad. Rápido, preciso y confiable. Totalmente recomendable.
Excelente, felicitaciones son gente de confianza, estamos muy conformes con el servicio que nos prestan .Sigan creciendo y los mejores deseos de prosperidad!!!
Tuve un problema con el espacio en disco apenas subi mi página web y mis consultas fueron respondidas inmediatamente. Muy buena atención!
El servicio es muy bueno! Excelente atención! El soporte técnico siempre está disponible para ayudar.
Muy buen servicio, 100% recomendable !! Gracias por todo.
Gente de primera, excelente respuesta, SUMAMENTE CONFIABLES! A seguir para adelante! Tauro Computación
EXCELENTEEEEEEEE!! servicios y atención que son para aplaudir! siempre disponibles y dedicados. Muchas gracias!
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!!!
Excelente calidad y atención... Más que recomendables! Supieron ayudarme y asesorarme en todo y estuvieron siempre disponibles... Buenísimo que podamos contar con un servicio así en Bahía... Muchísimas gracias y ojalá mucha gente más se sume porque el servicio lo vale! EXCELENTE!
Como siempre, excelente servicio y asesoramiento y muy buena predisposición para dar una mano!!!! 100% recomendables!!
Como siempre, excelente servicio y asesoramiento y muy buena predisposición para dar una mano!!!! 100% recomendables!!
Hace poco abrimos nuestro comercio y estamos muy conformes, el servicio funciona de maravillas y el servidor ofrece todo tipo de prestaciones avanzadas, sumamente útiles a la hora de diseñar un sitio web.
Felicitaciones por sus excelentes servicios, responsabilidad y rapidez, les deseamos lo mejor... MN PARTICIPACIONES (www.mnparticipaciones.com.ar)
Arte Marcial kimugan ( www.kimugan.com - www.gabrielgagliardini.com ) Estoy muy conforme con el servicio. Lo recomiendo ampliamente.
Arte Marcial kimugan ( www.kimugan.com - www.gabrielgagliardini.com ) Estoy muy conforme con el servicio. Lo recomiendo ampliamente.
Excelente y rápido asesoramiento en las soluciones a los inconvenientes que me surjen referentes a los servicios que me brindan!!! 100% recomendables!!
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.
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!
muy buen servicio de hosting, siempre al servicio del cliente la verdad que muy atentos!!!
El mejor servicio!!!!
