<% ' Envio de correo usando ASPEmail en formato Texto. ' Operaciones Triara - JCMN Dim message br = vbCrLf 'Salto de Linea If Request("Send") <> "" Then Set Mail = Server.CreateObject("Persits.MailSender") 'Enter valid SMTP host ==> smtp.triara.com, No mover IP Mail.Host = "200.57.129.7" 'Authentification (No usar la de webmaster por seguridad) Mail.Username = "rmosqueira@bemonitor.com.mx" Mail.Password = "rm430822" Mail.From = "rmosqueira@bemonitor.com.mx" Mail.FromName = "Diskeeper - Sales" 'Mail.AddAddress Request("To") 'Viene de la forma HTML 'Se pude enviar a N destinatarios Mail.AddAddress "rmosqueira@bemonitor.com.mx" Mail.AddAddress "pmosqueira@bemonitor.com.mx" ' message subject Mail.Subject = "Solicitud de Cotizacion Diskeeper" 'message body 'Creamos la variable message con todos los datos message = "----------------------------------------------------------------------" + br message = message + "Hay que mandar una cotizacion a estos cuates:" + br + br message = message + "Fecha " + FormatDateTime(Date) + br message = message + "Email " + Request("to") + br message = message + "Nombre " + Request("nombre") + br message = message + "Apellido " + Request("apellido") + br message = message + "Compania " + Request("compania") + br message = message + "Telefono " + Request("tel") + br message = message + "Ciudad " + Request("ciudad") + br message = message + "Estado " + Request("estado") + br message = message + "Pais " + Request("pais") + br message = message + "Consolas " + Request("Consolas") + br message = message + "Profesional " + Request("Profesional") + br message = message + "Standard " + Request("Standard") + br message = message + "Enterprise " + Request("Enterprise") + br + br message = message + "Atentamente" + br + br message = message + "Sistema Automatico Watchdog" + br message = message + "----------------------------------------------------------------------" + br + br message = message + "1" + FormatDateTime(Date) + br message = message + "," + Request("to") message = message + "," + Request("nombre") message = message + "," + Request("apellido") message = message + "," + Request("compania") message = message + "," + Request("tel") message = message + "," + Request("ciudad") message = message + "," + Request("estado") message = message + "," + Request("pais") message = message + "," + Request("Consolas") message = message + "," + Request("Profesional") message = message + "," + Request("Standard") message = message + "," + Request("Enterprise") Mail.Body = message On Error Resume Next Mail.Send ' If Err <> 0 Then ' Response.Write "Error encontrado: " & Err.Description ' Else ' Response.buffer=true Response.redirect "diskeeper-fragmentacion-diaria.asp" ' End If End If %>

bemonitor

   ADMINISTRACION EQUIPOS   | TOOLS PARA WINDOWS   | SEGURIDAD PERIMETRAL   | RESPALDOS
    BEMONITOR     UPDATEEXPERT     SPYWARE DOCTOR     GENIE BACKUP    BACKUP FOR WORKGROUPS     OPEN FILE MANAGER     DISKEEPER  
     
  Gracias por el tiempo que estas dedicando en solicitar una cotización detallada de Diskeeper, por favor llena toda la informacion y en breve recibiras la cotizacion con los descuentos por volumen que apliquen.  
 
     
 

¡Bienvenido! Con el fin de poder solicitar una propuesta por volúmen de Diskeeper, por favor ingrese sus datos en la pequeña forma de abajo. Nosotros valoramos su privacidad - no venderemos o daremos su información. Complete la forma de abajo y dele clic en el botón de Enviar ahora, usted recibirá una propuesta formal del producto y uno de nuestros especilistas se pondrá encontacto con usted para revisar sus necesidades en un plazo no mayor a 24 hrs.

  
     
  Haga clic aquí para leer nuestra política de privacidad sobre la confidencialidad de cualquier información que usted nos proporcione en este sitio.  
     
 
  Sus datos personal * información requerida  
  :    
  :    
  :    
  :    
  :    
     
     
     
  *País:    
  :    
       

  PRODUCTOS  
  *Producto de interés:    
         
*No. de Servidores:   *No. de Estaciones:  
 
         
  Sus necesidades:    
         
     
 
:      


   

 
     
  Al completar esta forma, usted esta aceptando recibir información en comunicados acerca de este producto y/o los productos y servicios representados por QMA, S.C.  
     
 
  Requerimientos del Sistema  
 
  Consolas de Administracion Centralizada
  . Windows XP Professional, Tablet PC, Media Center
. Windows Server 2003 Web, Standard, Enterprise, Datacenter
. Windows 2000 Professional, Server, Advanced Server, Datacenter Server
. Windows NT 4.0 Workstation, Server
   
  Diskeeper Workstations
  . Windows XP Professional, Home, Tablet PC, Media Center
. Windows 2000 Professional
. Windows NT 4.0 Workstation
. Windows ME, 98, 95
   
   
   
     
 
  Servidores Standard Edition
  . Windows Server 2003 Web, Standard, Enterprise
. Windows XP Professional
. Windows 2000 Professional, Server, Advanced Server
. Windows NT 4.0 Workstation, Server, Enterprise Server
   
  Servidores Enterprise Edition
  . Windows Server 2003 Web, Standard, Enterprise
. Windows 2000 Server, Advanced Server
   
   
   
  México D.F.
(55) 1042-5449		 Monterrey:
(81) 8031-1187 		  Comentarios o Dudas Envíanos un mail