Contactenos

Introduzca su sugerencia

Volver a contactos

<% If (Request.Form<>"") Then UserEmail = Trim(Request("fMail")) UserMessage = Trim(Request("fMessage"))asunto = "Sugerencia desde la web (dia " & Now() & ")"cadena = "\n"cadena = cadena & "En la Web un usario ha introducido la siguiente sugerencia o queja:

Usuario:	" & UserEMail & "
Comentario:	" & UserMessage & "
Para contestar pulse aqui

"cadena = cadena & "" 'ENVIO DEL EMAIL Set oCDO = Server.CreateObject("CDO.Message") Set oCDOConf = Server.CreateObject ("CDO.Configuration") oCDOConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.molidepico.com" oCDOConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 oCDOConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 oCDOConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 oCDOConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 oCDOConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "webenvios@molidepico.com" oCDOConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "agustin" oCDOConf.Fields.Update Set oCDO.Configuration = oCDOConf oCDOConf.Fields.Update Set oCDO.Configuration = oCDOConf oCDO.From = "webenvios@molidepico.com" 'oCDO.To = "diego.mestre@mesala.com" oCDO.To = "info@molidepico.com" oCDO.Subject = asunto oCDO.HtmlBody = cadena oCDO.Send Set oCDO = Nothing %>
El mensaje ha sido mandado con éxito

Gracias por sus comentarios, sus datos se están procesando, muy pronto recibirá una respuesta a la dirección de e-mail que nos ha facilitado.

<%else %> Si desea información sobre algún producto en particular o simplemente desea contactar con nosotros, rellene el siguiente formulario y envíenoslo, le atenderemos a la mayor brevedad posible. Le agradecemos de antemano su interés en nuestros productos, y esperamos que la visita a nuestra Web haya sido de su agrado. <%End if%>

Creado y mantenido por Imon consulting

Información Legal - Protección de Datos