<%
if not (request.form("mxNombre")="" or request.form("mxEmail")="" or request.form("mxConsulta")="") then
'-- add to intranet
set intranet = server.CreateObject("medicallaser.intranet")
if not intranet.addWebContact( Request.Form("mxNombre"), Request.Form("mxEmail"), Request.Form("mxTelefono"), Request.Form("mxConsulta"), request.ServerVariables("ALL_RAW"), request("mxOrigen")) then response.Write intranet.lastError & "???"
set intranet = nothing
set oMail=CreateObject("darkblue.mail")
if oMail.sendMX("info@depilaciondefinitiva.com", "solicitud de contacto") ="" then
set oMail=nothing
server.Transfer ("contact_ok.htm")
end if
server.Transfer ("contact_ok.htm")
' response.Write "Gracias por contactarte... pronto responderemos tu consulta!"
' response.End
end if
%>
Medical Laser // Ponete en Contacto
