mailto:{0}?bcc={1} et Accès refusé

**amirad** · 09/04/2010, 13h42

Bonjour,

Je lance un process qui me permet d'ouvrir Lotus Notes en spécifiant les adresses Ccc en paramètres d'entrée.
Mon problème survient lorsque la chaine comportant les adresses Ccc devient longue.
J'ai un message d'erreur qui me dit Accès refusé, pourtant je n'ai aucun message d'erreur quand je teste sur un nombre pas très grand d'adresses Ccc en entrée.

voilà mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
 
  Dim command As String
  command = String.Format("mailto:{0}?bcc={1}", " ", listeAdress.Text)
  Process.Start(command)

Merci pour toute aide.

**amirad** · 12/04/2010, 16h31

Après quelques recherches, il s'avère que une URL ne peut pas comporter plus que 256 caractères, donc le problème n'est pas relatif au mailto..
Dans ce cas, comment procéder ?
Y'a t-il un équivalent de mailto ??

**leeloo95** · 14/04/2010, 10h13

Salut amirad,

On m'a demandé une génération d'emails automatique à ma boite sur une boite Lotus Notes...
Je pense que tu te réjouis à l'avance !!!

Voici comment j'ai procédé pour un envoi d'emails !!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
' Envoi du mail
                Dim envoyeur1 As MailAddress = New MailAddress("ccenvoi@ahahahahah.fr", "Notification - Base Transport")
                Dim receveur1 As MailAddress = New MailAddress(emailgrouptransport())
                Dim mail1 As MailMessage = New MailMessage(envoyeur1, receveur1)
                Dim smtp1 As SmtpClient = New SmtpClient("Tonsmtp")
' Le blablabla de ton e mail en html (attention il est pas possible de mettre une image dans notes...)
                mail1.Body = "<html><body>Bonjour,<br>" & _
                " Merci de me communiquer le delai de livraison pour cette demande de course : " </html>"
                mail1.IsBodyHtml = True
                mail1.Subject = "Call " & Mtb_num_call.Text & " Vous avez une demande de course: " + label_code_demande.Text
                mail1.Priority = MailPriority.High
                mail1.DeliveryNotificationOptions = DeliveryNotificationOptions.OnSuccess _
                Or mail1.DeliveryNotificationOptions = DeliveryNotificationOptions.OnFailure
                smtp1.Send(mail1)
                ' Fin envoi mail

Après pour ce qui est d'envoyé le même e-mail a plusieur personne, je passe par un groupe sur Notes qui dispatche l'e-mail au membre du groupe !!!

Good Luck, même si je pense bien avoir facilité ton travail

mailto:{0}?bcc={1} et Accès refusé

VB.NET

Vue hybride

Discussions similaires

Partager

Partager