none
SendObject indisponible RRS feed

  • Question

  • Sur certains postes de travail l'appel de SendObject fonctionne bien, mais sur d'autres il génère l'erreur : 'SendObject n'est pas disponible pour le moment'

    Pourtant cet objet est bien visible dans l'Explorateur d'objet

    Configuration : Windows 7 Pro + Office 2013

    jeudi 17 novembre 2016 18:38

Toutes les réponses

  • Bonjour,

    Quel bloc de code avez vous écrit ?

    Il est difficile de vous aider avec si peu d'information...

    => par ailleurs, le "Bonjour" et le "Merci", ne sont pas des options !


    Argy

    mardi 6 décembre 2016 09:33
    Modérateur
  • Est-ce que les postes en questions ont Outlook de configuré?

    Daniel Pineault, 2010-2016 Microsoft MVP Professional Support: http://www.cardaconsultants.com MS Access Tips and Code Samples: http://www.devhut.net

    lundi 9 janvier 2017 15:05
  • Bonjour,

    Sur tous les postes, j'utilise Thunderbird qui est, bien entendu, configuré

    Cdt

    mardi 31 janvier 2017 14:56
  • "Thunderbird supports the Simple MAPI API. Outlook and Eudora support the Extended MAPI API."

    Donc, je ne suis pas certain si ça marchera.  Malheureusement je n'ai non plus thunderbird pour faire des tests.

    Tu pourrais regarder à implementer CDO Mail ou un function tel:

    Public Function fSendThunderbird(strTo As String, strSubject As String, strBody As String) 
    'Source: http://forums.mozillazine.org/viewtopic.php?t=399230& 
         'This function can be used to send an e-mail from Mozilla Thunderbird.
         'The syntax for calling Thunderbird from a command line (DOS prompt) is:
     '
         'thunderbird -compose "mailto:somebody@somewhere?cc=address@provider&sub  ject=hi&body=something"
     '
        Dim strCommand As String 
    
        strCommand = "C:Program FilesMozilla Thunderbirdthunderbird" 
    
        strCommand = strCommand & " -compose " & Chr$(34) & "mailto:" & strTo & "?" 
        strCommand = strCommand & "subject=" & Chr$(34) & strSubject & Chr$(34) & "&" 
        strCommand = strCommand & "body=" & Chr$(34) & strBody & Chr$(34) 
    
        Call Shell(strCommand, vbNormalFocus) 
    
     End Function 


    Daniel Pineault, 2010-2016 Microsoft MVP
    Professional Support: http://www.cardaconsultants.com
    MS Access Tips and Code Samples: http://www.devhut.net


    mardi 31 janvier 2017 16:22