Enviar firma -imagen a correo por access

   Hola,
Este código te toma la imagen y el texto de la firma que ya tienes en Outlook:

Dim OutApp As Object
    Dim OutMail As Object
    Dim strbody As String

    Set OutApp = CreateObject("Outlook.Application")
    Set OutMail = OutApp.CreateItem(0)

    strbody = Me.cuerpo

    On Error Resume Next

    With OutMail
        .Display
        .To = Me.direccion
        .CC = ""
        .BCC = ""
        .Subject = Me.asunto
        .HTMLBody = strbody & "<br>" & .HTMLBody
        '.Send
    End With

    On Error GoTo 0
    Set OutMail = Nothing
    Set OutApp = Nothing

Los códigos originales están en esta web, tienes varias opciones:

https://www.rondebruin.nl/win/s1/outlook/signature.htm

Autor	Mensaje Tema Buscar Opciones del Tema Responder Crear un nuevo tema Versión imprimible Traducir Tema
joanka Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Añadir a la lista de amigos Habitual Unido: 07/Abril/2021 Localización: Lleida Estado: Sin conexión Puntos: 140	Enviado: 14/Febrero/2022 a las 20:40
	Hola, Este código te toma la imagen y el texto de la firma que ya tienes en Outlook: Dim OutApp As Object Dim OutMail As Object Dim strbody As String Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(0) strbody = Me.cuerpo On Error Resume Next With OutMail .Display .To = Me.direccion .CC = "" .BCC = "" .Subject = Me.asunto .HTMLBody = strbody & "<br>" & .HTMLBody '.Send End With On Error GoTo 0 Set OutMail = Nothing Set OutApp = Nothing Los códigos originales están en esta web, tienes varias opciones: https://www.rondebruin.nl/win/s1/outlook/signature.htm

Zuesangel Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Visite la página de los usuarios Añadir a la lista de amigos Habitual Unido: 13/Septiembre/2011 Localización: Guatemala Estado: Sin conexión Puntos: 151	Enviado: 16/Junio/2022 a las 23:34
	Nuevamente Gracias este código que me brindaste también me funciono, sin enviarlo por HTML, ya que se complica a la hora de guardar la ruta de la imagen en la base de datos y enviarlo por HTML , si es mejor así con el Outlook.Inspector, con el outlook configurado la firma y dejarla predeterminada si funciona.
	Has el Bien y no mires a quien

joanka Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Añadir a la lista de amigos Habitual Unido: 07/Abril/2021 Localización: Lleida Estado: Sin conexión Puntos: 140	Enviado: 17/Junio/2022 a las 09:29
	De nada

Responder	Página <12
Tweet