Pb d'nvoie par mail d'un formulaire

bonjour a tous je suis nouveau ici et surtout nouveau ds la webmasterisation

alors je reprend en main un site pour un ami, il propose ( sur son site) un formulaire pour ses futurs clients mais il ne recoit jamais de reponse par mail. et l'internaute obtient un message d'erreur indiquant la ligne 22 correspondant a la premiere ligne en dessous

   Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
   Mailer.FromName = session("Prenom")+ " " + session("Nom")
   Mailer.FromAddress= session("EM")
   Mailer.RemoteHost = "smtp.unimedia.fr"
   Mailer.AddRecipient "Hotel d'Anjou", "info@hoteldanjou.fr"
   Mailer.Subject = "Demande de réservation"
   Mailer.BodyText = Msg
   envoi=Mailer.SendMail
   Set Mailer = Nothing

POurrierz vous m'aidez svp ?

Salut,
Voila tu colle ce code dans ta page ca marche si tu est sur IIS

'tu peut mettre ca dans uner fonction
sub envoiMail(Expediteur,Destinataire,titre,corp)
           
         SET objmail = Server.CreateObject("CDONTS.NewMail")
            objmail.From = Expediteur
            objmail.To = Destinataire
            'titre du mail
            objmail.Subject = titre
            objmail.Importance = 1 '(0=Low, 1=Normal, 2=High)
            objmail.BodyFormat = cdoBodyFormatHTML
            objmail.Body = corp
            'envoi mail
            objmail.Send
         Set objmail = Nothing   
   
      end sub

'ensuite tu envoie a ta sub les données

Expediteur = "info@tonsite.com"
Destinataire = "info@destinataire.com"
titre = "le sujet du mail"
CorpMail = "le texte du mail ou ce que tu recoit depuis le champs de texte"

call envoiMail(Expediteur,Destinataire,titre,CorpMail)


Voila cette solution marche, et de toutes facon ce composant est installé d'office sur IIS, ce qui n'est pas le cas de JMAIL.

Bonne journée
Fross