Soyez le premier à donner votre avis sur cette source.
Snippet vu 23 815 fois - Téléchargée 36 fois
Private Sub EnvoiMail(ByVal De as string, ByVal Sujet as string, ByVal A as string, ByVal Message as string) Dim m As New MailMessage Dim SMTP_SERV = "server" m.From = De m.Subject = Sujet ' Au format mail m.BodyFormat = MailFormat.Html SmtpMail.SmtpServer = SMTP_SERV Try m.Body = Message m.To = A SmtpMail.Send(m) Catch ex As Exception End Try End Sub
30 nov. 2010 à 03:55
J'aimerais savoir comment mettre un destinataire et ou mettre le message ?
Merci d'avance
20 oct. 2008 à 11:22
7 juin 2007 à 09:33
Histoire de pousser le vice un peu plus loin, comment faire pour modifier l'en-tête du mail ?
Car sous outlook quand j'edite le message et que j'affiche les options ('Affichage'->'Options'), on peut lire le nom de mon PC et mon adresse IP sur le réseau.
Des idées ? ;)
6 juin 2007 à 19:30
5 juin 2007 à 19:07
http://www.vbfrance.com/codes/ENVOIE-PIECE-JOINTE-CLIC-DROIT-ENVOYER-VERS_38181.aspx
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.