scottmat
Messages postés438Date d'inscriptionsamedi 24 mai 2003StatutMembreDernière intervention23 janvier 2011
-
13 mars 2008 à 05:54
scottmat
Messages postés438Date d'inscriptionsamedi 24 mai 2003StatutMembreDernière intervention23 janvier 2011
-
7 avril 2008 à 15:17
Bonjours à tous,
J'ai configurer un serveur et également un serveur SMTP dessus.
Quand j'utilise le service SMTP à distance sur n'importe ordinateur avec Outlook, sa marche ! Mais avec mon code sa ne marche pas !
Franchement je ne vois vraiment pas d'où sa vient, pourtant il doit y'avoir un problème dans mon code que voici :
Dim lst_dest AsNew System.Net.Mail.MailAddressCollection<?xml:namespace prefix o ns "urn:schemas-microsoft-com:office:office" /??>
lst_dest.Add("adressedest@domain.com")
Dim name_exp AsNew System.Net.Mail.MailAddress("adresseExp@domain.com")
Dim SmtpMail As Net.Mail.SmtpClient = New Net.Mail.SmtpClient("monserver")
Dim login AsString = "pseudo"
Dim pass AsString = "motdepasse"
Dim obj_message AsString = "objet"
Dim body_message AsString = "corps du texte"
'définition de l'objet mail
Dim email AsNew Net.Mail.MailMessage(name_exp, liste_dest.Item(0))
With email
.Subject = obj_message
.Body = corps_message
.IsBodyHtml = False
EndWith
'envoi du mail
SmtpMail.Credentials = New System.Net.NetworkCredential(login, pass)
Quand j'envoi les messages avec outlook, je les reçois immédiatement sans problème. Et quand mon code s'éxecute, il envoi bien l'email (du moins c'est ce qu'il me fait croire) !! Sans aucun message d'erreur !
j'ai fouiner partout sur le site vbfrance, mais bon j'ai eu beau comparer je ne sais combien de source, c'est la même structure.
J'ai essayer en mode anonyme, et sa ne change rien.