Bonjour le forum,
je récupère une chaîne de caractères du style :
/O=EXCH-ADC/OU=GA1/CN=RECIPIENTS/CN=TOTO-ADC49645217
ici je souhaiterais récupérer TOTO-ADC
/O=EXCH-ADC/OU=GA1/CN=RECIPIENTS/CN=DUPOND-ADC59333583
ici je souhaiterais récupérer DUPOND-ADC
En fait, l'instruction AdressMail = OLmail.SenderEmailAddress ne me renvoie pas du tout l'adresse e-mail avec l'@ mais une chaîne de caractères du style :
/O=EXCH-ADC/OU=GA1/CN=RECIPIENTS/CN=TOTO-ADC49645217
La vraie adresse mail avec l'@ ça aurait été super, mais à défaut, je vais rechercher l'identifiant
donc j'ai essayé ceci :
v = Split(AdressMail, "/")
AdressMail = v(4) 'j'obtiens CN=TOTO-ADC49645217
lg = Len(AdressMail)
ident = Mid(AdressMail, 4, lg - InStr(AdressMail, "-ADC") + 6)
mais ça ne fonctionne pas comme je veux...
avez-vous une idée pour récupérer l'identifiant (qui se termine toujours par -ADC)
ou bien l'adresse e-mail avec l'@???
Merci à vous
C@thy