% ' Exemple ASP pour mail() URL = Request.ServerVariables("SCRIPT_NAME")%>
| <% if Request.Form("comment")<>"" then Nom = Request.Form("nom") : NomT = Nom Mail = Request.Form("mail") : MailT = Mail Sujet = "Exemple d'application ASP pour mail()" Body = Request.Form("comment") & VbCrLf _ & VbCrLf & "www.asp-php.net" & VbCrLf if sendMail(Nom,Mail,NomT,MailT,Sujet,Body) then %> Votre message est bien parti ! <% else %> Désolé, le serveur n'est pas disponible ! <% end if else %> <% end if %> |
|---|