bonjour
j'ai une erreur de formulaire ASpemail
"Object doesn't support this property or method: 'Mail.Recipient' "
j'arrive pas à trouver ce qu'il faut mettre a la place de 'Mail.Recipient'
Merci

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
connection a la base access
Set Conn = Server.CreateObject("ADODB.Connection")
MdbChemin =Server.MapPath("data/metoi.mdb")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbChemin & ";"
login=replace(Request.Form("nlogin"),"'","''")
pwd=replace(Request.Form("npwd"),"'","''")
nom=replace(Request.Form("nciv"),"'","''")
prenom=replace(Request.Form("nnomprenom"),"'","''")
conn.Execute("insert into login(login,pwd,nom,prenom) values ('" & login &  "','" & pwd &  "','" & nom &  "','" & prenom &  "')")
 
 
 
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mon.smpt"
Mail.From = adrExp
Mail.Recipient = login
Mail.Subject = sujet
Mail.BodyFormat = 0
Mail.MailFormat = 0
Mail.Body = date & "<br>" & message & "<br>" & "Votre mot de passe est : " & pwd & "<br>" & "Votre login est : " & login 
Mail.Importance = 0
 
Mail.Send
Set objet_NewMail = Nothing
Response.Redirect "haut.asp"
%>
merci