Bonjour,

J'ai traduit sous C++ Builder un des nombreux exemples relatifs à l'envoi de mail avec CDO.

Le programme fonctionne, mais je n'ai pas réussi à traduire la partie relative à l'objet CDO.Configuration.

Le code sur lequel je bute est:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
    CONST cdoURL = "http://schemas.microsoft.com/cdo/configuration/" 
    set cdoC = CreateObject("CDO.Configuration") 
 
    Set cdoF = cdoC.Fields 
    With cdoF 
    .Item(cdoURL & "sendusing") = 2 
    .Item(cdoURL & "smtpserver") = SMTPServer 
    .Item(cdoURL & "smtpconnectiontimeout") = 10  
    .Update 
    End With
Le début ne pose pas de problème:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
        Variant cdoC,cdoF;
 
        cdoC = Variant::CreateObject("CDO.Configuration");
        cdoF = cdoC.OlePropertyGet("Fields");
Mais je coince sur la suite.
J'ai essayé:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
cdoF.OlePropertySet("http://schemas.microsoft.com/cdo/configuration/sendusing",2);
mais cela provoque une erreur à l'exécution.

Auriez vous une idée de la manière de procéder ?