Hola estoy probando el vbsendmail pero no me envia a direcciones gratis (por 
ej: yahoo) probe con otros y pasa lo mismo.
Alguien sabe porque??
  ----- Original Message ----- 
  From: Javier Gonzalez 
  To: vbusers List Member 
  Sent: Friday, March 16, 2007 3:57 PM
  Subject: [vbusers] Enviar email


  vbsendmail

  http://www.freevbcode.com/ShowCode.Asp?ID=109

  con este activeX, pude resolver todos mis problemas al momento de enviar 
mails.

  Saludos

    ----- Original Message ----- 
    From: [EMAIL PROTECTED] 
    To: vbusers List Member 
    Sent: Friday, March 16, 2007 3:22 PM
    Subject: [vbusers] Enviar email


    Cierto, ese problema es a partir de no sé que versión del outlook, y creo 
que no se puede resolver salvo instalando parches de terceros. Es para que 
justamente otro programa no tome control del correo (cosa un poco loca, 
teniendo en cuenta que a su vez, el Outlook está diseñado para ser controlado 
como un componente COM). Pero buenísimo si se puede resolver con el control 
MAPI. Yo también lo voy a tener en cuenta.
    Saludos
     


      -----Original Message-----
      From: Jesús dos Santos <[EMAIL PROTECTED]>
      To: "vbusers List Member"  <[email protected]>
      Date: Fri, 16 Mar 2007 13:25:08 -0300
      Subject: [vbusers] Enviar email


      Listo, use estos controles y no me preguntó nada. 

      Gracias 

        

        

      -----Mensaje original-----
      De: [email protected] [mailto:[EMAIL PROTECTED] En nombre de Carlos 
Bernardo Maggiotti
      Enviado el: viernes, 16 de marzo de 2007 12:32
      Para: vbusers List Member
      Asunto: [vbusers] Enviar email 

        

      Usando los MAPI controls no seria mas facil?
       
      saludos
      CarlosMag

      > From: [EMAIL PROTECTED]
      > To: [email protected]
      > Subject: [vbusers] Enviar email
      > Date: Fri, 16 Mar 2007 12:27:20 -0300
      > 
      > Disculpe la consulta, al ejecutar esta función, el outlook me larga un
      > cartel diciendo que vb quiere ejecutar bla bla bla y pide permiso, se
      > puede evitar esto??
      > Muchas gracias
      > 
      > 
      > -----Mensaje original-----
      > De: [email protected] [mailto:[EMAIL PROTECTED] En nombre de Daniel
      > Aisenberg
      > Enviado el: sábado, 03 de marzo de 2007 10:23
      > Para: vbusers List Member
      > Asunto: [vbusers] Enviar email
      > 
      > Public Function SendMail(strRecipient As String, strSubject As String,
      > strBody As String ) As Boolean
      > ' Objetivo: Envia mails con Outlook
      > ' Referencia: Microsoft Outlook 9.0 Object Library
      > 
      > Dim OutlookApp As Object
      > 'Dim OutlookApp As New Outlook.Application
      > 
      > Dim OutlookAppNameSpace As Object
      > 'Dim OutLookNameSpace As Outlook.NameSpace
      > 
      > Dim ObjMailItem As Object
      > 'Dim ObjMailItem As Outlook.MailItem
      > 
      > Set OutlookApp = CreateObject("Outlook.Application")
      > 
      > Set OutlookAppNameSpace = OutlookApp.GetNamespace("MAPI")
      > 'Set OutlookAppNameSpace = CreateObject("Outlook.NameSpace")
      > 
      > Set ObjMailItem = OutlookApp.CreateItem(0)
      > 
      > On Local Error GoTo er:
      > 
      > 'No soportado por Outlook 9
      > 'ObjMailItem.BodyFormat = olFormatRichText
      > 
      > 'Set myAttachments = ObjMailItem.Attachments
      > 
      > With ObjMailItem
      > 
      > .To = strRecipient
      > .Recipients.ResolveAll
      > .Subject = strSubject
      > 
      > 'No soportado por Outlook 9
      > '.BodyFormat = olFormatRichText
      > 
      > .Body = strBody
      > .HTMLBody = strBody
      > 
      > 'Si necesitas adjuntar un archivo...
      > '.Attachments.Add sTargetFile
      > 
      > '.BodyFormat = olFormatRichText
      > '.BodyFormat = olFormatHTML
      > 
      > 'Si queres desplegarlo antes de mandarlo, cosa que en tu caso
      > 'creo que no es necesario, pero podria ser que el usuario quiera
      > ver
      > 'y eventualmente modificar el correo, antes de mandarlo...
      > '.Display
      > End With
      > 
      > Set ObjMailItem = Nothing
      > Set OutLookNameSpace = Nothing
      > Set OutlookApp = Nothing
      > SendMail = True
      > 
      > Exit Function
      > er:
      > SendMail = False
      > 
      > 
      > End Function
      > 
      > 
      > -----Mensaje original-----
      > De: [email protected] [mailto:[EMAIL PROTECTED] En nombre de
      > [EMAIL PROTECTED]
      > Enviado el: Viernes, 02 de Marzo de 2007 02:20 p.m.
      > Para: vbusers List Member
      > Asunto: [vbusers] Enviar email
      > 
      > Hola
      > 
      > necesito un poco de ayuda una vez mas.
      > Tengo una pequeña aplicacion programada en vb6 que corre todas las
      > noches 
      > automaticamente, hasta ahi todo bien, pero el problema esta en que 
      > necesitaria que me envie un email con el reporte de lo ocurrido durante
      > el 
      > proceso.
      > Que funcion, API o libreria tengo que utilizar para poder lograrlo.
      > 
      > Desde ya muchas gracias.
      > 
      > Saludos 
      > 
      > 
      > -- 
      > No virus found in this incoming message.
      > Checked by AVG Free Edition.
      > Version: 7.5.446 / Virus Database: 268.18.6/709 - Release Date:
      > 03/03/2007 08:12 a.m.
      > 
      > 
      > 
      > 




--------------------------------------------------------------------------

      Envía mensajes de correo electrónico directamente a tu blog con MSN. 
Carga chistes, fotografías y muchas otras cosas. Es gratis. 

Responder a