<% correo=request.form("comentario") consulta=request.form("comentario") if nombre<>"" then '-------------------------------------------------------------------------------------------------------------------- ServerAddr = "" Subject= asunto Sender = "mail@ortopediayfarmacia.com" set mail=server.CreateObject("Persits.MailSender") mail.Host="smtp-01.servidoresdns.net" mail.Port=25 mail.Username = "ortopediayfarmacia.com" mail.Password = "aA659555364" mail.From= Trim(Sender) mail.AddAddress "cliente@ortopediayfarmacia.com" mail.Subject = Trim(Subject) mail.Body = body mail.IsHTML = True mail.Send Set mail = Nothing Response.redirect "gracias.asp" If Err.Number <> 0 then Response.Write "Envio de Correo Fallido: " & Err.Description %><% Response.Write "serveraddr=" & ServerAddr %><% Response.Write "sender=" & Sender %><% Response.Write "Recipient=" & Recipients %><% Response.Write "subject=" & Subject %><% Response.Write "txtgeneral=" & txtGeneral %><% Else conexion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("base_datos/db10.mdb") sql="select * from correos order by 1 desc" Set rsProducto = Server.CreateObject("Adodb.Recordset") rsProducto.Open SQL, conexion, 3, 3, adCmdTable if not rsproducto.bof then id = cint(rsproducto.fields(0)) + 1 else id=1 end if sql="insert into correos values('" & id & "','" & nombre & "','" & asunto & "','" & date() & "','" & comentario & "')" End If Set oComSMTP = Nothing '-------------------------------------------------------------------------------------------------------------------- else%>
       Transportes             Tráfico             Fiscal - Laboral - Contable             Acceso Clientes       

HERENCIAS

C/ Sánchez Barcáiztegui, 1 - Local     28007 - Madrid
Tf: 91.551.69.48   Fax: 91.551.55.90
gestoria@gestoriatarancon.com
Lunes a Viernes de 9 a 13:30h y 16 a 20h

Sábados: consultar previamente


     ¿Quiénes Somos?           ¿Dónde Estamos?           Servicios           Contacto           Inicio     

Cliente:
Código de Acceso:
© Gestoría Tarancón 2014