au secours je me noieRésolu

Question

Salut tout le monde j'ai un très gros soucis, voila j'ai un hébergeur en ASP, donc je souhaite faire un script de redirection de formulaire sur mon mail c'est à dire le client remplis le fournisseur remplis le formulaire et le valide et il tombe sur une page de remerciement, et le serveur me transmet le formulaire

Comment faire car j'y connais rien du tout en ASP

Merci d'avance et bonne fêtes

c++ à la folie :) :p

cs_Jackboy · Accepted Answer

ASPMail permet l'envoi (individuel ou en nombre) d'e-mails à partir d'une page ASP. Etape 1 : Création d'une instance ASPMail <% Set Mailer = Server.CreateObject("SMTPsvg.Mailer") %> Etape 2 : Définition des paramètres du mail <% Set Mailer = Server.CreateObject("SMTPsvg.Mailer") %> 'création de l'instance ASPMail <% Mailer.FromName = "Votre nom" Mailer.FromAddress= "vous@votredomaine.com" 'votre adresse e-mail Mailer.RemoteHost = "mail.votredomaine.com" 'votre serveur SMTP Mailer.AddRecipient "Votre client", "client@sondomaine.com" 'nom et adresse e-mail de votre destinataire Mailer.Subject = "Du nouveau sur notre site" 'sujet du message Mailer.BodyText = "Cher client," & VbCrLf & "Il y a du nouveau sur notre site." 'texte du message. Les retours à la ligne se font avec VbCrLf %> Etape 3 : Envoi du mail <% if Mailer.SendMail then Response.Write "Message envoyé!" 'si tout est ok, ASP Mail confirme l'envoi du message Mailer.ClearAllRecipients 'on libère la zone mémoire contenant les destinataires Mailer.ClearBodyText 'on libère la zone mémoire contenant le texte du message else Response.Write "Echec de l'envoi. Erreur: " & Mailer.Response 'si l'envoi n'a pas pu se faire, ASPMail vous dit pourquoi end if %> Envoyer un e-mail avec CDONTS CDONTS est un composant SMTP livré en standard avec NT Server. Il vous permet d'envoyer un message en e-mail à partir d'une page ASP, selon des paramètres définis dans un formulaire. Etape 1 : Dimensionnement d'une variable mail et création de l'objet CDONTS <% dim mail Set mail = Server.CreateObject("CDONTS.NewMail") %> Etape 2 : Définition des paramètres du mail <% mail.To = "destinat1@domaine1.com,destinat2@domaine2.com" 'adresse du ou des destinataires mail.From = "vous@votredomaine.com" 'adresse de l'expéditeur mail.Subject = "Votre demande de documentation" 'sujet du message Dim Message Message = "Nous avons bien reçu votre demande de documentation, et vous l'expédions ce jour-même!" 'le texte qui constituera le corps du message '(il peut englober des variables) mail.Body = Message 'insertion du texte "message" dans le corps du message mail.Importance = 0 'priorité du message : 0-> Normal, 1->Urgent, 2->Très urgent mail.Attach.File("\votre_serveur\...\fichier.zip", "fichier.zip") 'pièces jointes %> Etape 3 : Envoi du mail <% mail.Send Set mail = Nothing %>

Au secours je me noie

1 réponse

Votre réponse