% set db = server.CreateObject("adodb.Connection") set Tabla = server.CreateObject("adodb.Recordset") db.open "DSN=dbconsul" orderpay=request.form("ordernum") Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "mail.ipf.es;mail.gigabell.es;mail.consulintel.es;ipf.es;gigabell.es;consulintel.es" ' obtencion de la direccion de la base de datos SqlDireccion = "select * from formulario where ipv_id=" & orderpay tabla.open SqlDireccion,db email=trim(tabla.fields("ipv_email")) name=trim(tabla.fields("ipv_nombre")) & " " & trim(tabla.fields("ipv_apellidos")) total=tabla.fields("ipv_total") tabla.close Mail.AddReplyTo "ipv6@consulintel.es" Mail.From = email Mail.FromName = "Madrid Global IPv6 Summit" Mail.AddAddress email,name Mail.AddBCC "ipv6.madrid.pay.fail@consulintel.es" Mail.Subject = "Madrid Global IPv6 Summit: bank TRANSFER / TRANSFERENCIA bancaria " Mail.Body = name & "," & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "The registration will be approved only AFTER your bank transfer." & Chr(13) & Chr(10) & "Please, arrange a bank transfer to CONSULINTEL, within 48 hours, by a TOTAL NET amount of " & total & " Euros." & Chr(13) & Chr(10) & "Fax us the receipt with the registration code (" & orderpay & ") and your name to +34 91 484 18 22." & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "El registro sera aprobado unicamente tras la confirmacion de su transferencia bancaria." & Chr(13) & Chr(10) & "Por favor, envie una transferencia a CONSULINTEL, en 48 horas, por un importe NETO/TOTAL de " & total & " Euros." & Chr(13) & Chr(10) & "Remitanos el justificante por fax al 91 484 18 22, indicando su codigo de registro (" & orderpay & ") y nombre." & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "Madrid Global IPv6 Summit" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "*************************************" & Chr(13) & Chr(10) & "BANK DETAILS:" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "Banco Santander Central Hispano (Pl. de la Maja 7 - 28260 - Galapagar - Madrid - Spain)" & Chr(13) & Chr(10) & "C.C.C.: 0049-4859-44-2393025206" Mail.Priority = 1 Mail.Send ' tabla.open SQLQuery,db db.close %>
Gracias por su Participación.
Le mantendremos informado de las novedades de la Conferencia, mediante correo electrónico
Pulse aquí para recibir información adicional de otros hoteles y actividades turísticas opcionales
Pulse aquí para volver a la Página de Inicio de la Web del Evento
Thank you very much.
Will keep you informed about any news related to the Conference, by email
Click here to receive information about other hotels and optional tourist activities
Click here to return to the event Home Page
![]() |
![]() |