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
%>
Increíble servicio, gran soporte y excelente relación calidad/precio. Gracias Chicos!
Gente de primera, excelente respuesta, SUMAMENTE CONFIABLES! A seguir para adelante! Tauro Computación
MUY BUENA ATENCION,MARTIN DEL SOPORTE SIEMPRE DISPUESTO,HACE MUCHOS AÑOS SOY CLIENTE,SALUDOS.TODO CARTEL
Excelente atencion!! un servicio impecable! las consultas son respondidas al momento!!
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!
Excelente servicio y soporte tecnico, damos fe que por lejos es el mejor servicio de hosting con atencion personalizada que hay en Bahia Blanca, muchas 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!!
Impecable el servicio y la rapidez en solucionar nuestros problemas! Gracias por ayudarnos!!
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.
Impecable el servicio y la rapidez en solucionar nuestros problemas! Gracias por ayudarnos!!
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 atención, servicio y resultados. Muchas gracias!
Muy buena atención, excelente respuesta a los pocos problemas encontrados!! Gracias por la atencón y felices fiestas!!
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.
El mejor servicio!!!!
Excelente servicio y soporte tecnico, el mejor servicio de hosting de Bahia Blanca, nunca un problema! gracias gente!!!
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. !!!
Tuve un problema con el espacio en disco apenas subi mi página web y mis consultas fueron respondidas inmediatamente. Muy buena atención!
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)
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. !!!
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!!!
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.
El mejor servicio!!!!
Como siempre, excelente servicio y asesoramiento y muy buena predisposición para dar una mano!!!! 100% recomendables!!
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 servicio y muy buena atencion! Satisfecho 100%
Excelente atencion!! un servicio impecable! las consultas son respondidas al momento!!
Como siempre, excelente servicio y asesoramiento y muy buena predisposición para dar una mano!!!! 100% recomendables!!
Excelente servicio y soporte tecnico, el mejor servicio de hosting de Bahia Blanca, nunca un problema! gracias gente!!!
