Code simple pour envoyer un mail par un serveur

Commenter

Contenu du snippet

Normalement cet objet d'envoi de mail est installé sur tous les serveur Web à partir de Windows NT server 4.0. ce code est Simplifié.

Source / Exemple : 


Set email = Server.CreateObject ("SMTPsvg.Mailer")   
email.FromName = <nom de l'expéditeur> 
email.FromAddress = <Email de l'expéditeur>  
email.Subject = <sujet du message> 
email.BodyText = <corp du texte>
email.RemoteHost = <nom du serveur smtp>   
email.AddRecipient <nom du destinataire>, <Email du destinataire> 
If email.SendMail then  
      response.write "message envoyé" 
Else   
      response.write "erreur lors de l'envoi"  
End If

Conclusion :


Remplacez les mots entre <> par vos variables ou paramètres (on peut aussi mettre des textes brut entre " ", mais je le déconseil, il est préféravle pour vous d'en faire une fonction réutilisable afin de la déposer dans un fichier d'Incluse (SSI)

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_vladam)