Discussion :

[hichamdeb]

bonjour,
je voudrai envoyé le contenu d'un textarea ou un autre formulaire vers un email une fois qu'on clique sur un boutton

merci d'avance

salutations

[debutantasp]

Salut,
http://www.w3schools.com/asp/asp_send_email.asp

[hichamdeb]

merci mais j'ai pas pu manipuler le code.
j'ai trouver sur internet un code de JMail et il est facile a utiliser sauf qu'il y a une erreur quand j'execute la page,
veuillez me aider à trouver cette erreur

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
<form name="YourFormName" method="Post" action="confirmation.asp">
<table>
<tr><td>Email: </td>
<td><input type="text" name="Email" size="50"></td></tr>
<tr><td>First Name: </td>
<td><input type="text" name="FirstName" size="50"></td></tr>
<tr><td>Last Name: </td>
<td><input type="text" name="LastName" size="50"></td></tr>
<tr><td>Subject: </td>
<td><input type="text" name="Subject" size="50"></td></tr>
<tr><td>Comments: </td>
<td><textarea name="Comments"></textarea></td> 
</table>
<input type="submit" name="Submit" value="Submit Form"> 
</form>

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
<%
DIM strEmail, strFirstName, strLastName, strSubject, strComments, Mailer
strEmail = Request.Form("Email")
strFirstName = Request.Form("FirstName")
strLastName = Request.Form("LastName") 
strSubject = Request.Form("Subject")
strComments = Request.Form("Comments")
 
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.aspwebpro.com"
JMail.AddRecipient "general@aspwebpro.com"
JMail.Sender = strEmail
JMail.Subject = strSubject
JMail.Body = strComments
JMail.Execute
Set JMail= Nothing
 
IF NOT JMail.Execute THEN
Response.Write( "ERROR MESSAGE: " & JMail.ErrorMessage & "<BR>" & vbcrlf )
Response.Write( "ERROR SOURCE: " & JMail.ErrorSource & "<BR>" & vbcrlf )
Response.Write( "LOG: <pre>" & JMail.Log & "</pre>" & vbcrlf )
ELSE
Response.Write "<blockquote>Your :<b>" & strSubject & "</b> Newsletter has been successfully sent to <b>" & intSubscribers & "</b> subscribers.</blockquote>"
END IF
%>

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

JMail.ContentType = "text/html"

merci d'avance

[Immobilis]

Salut,

Quand une erreur est levée, c'est bien de nous indiquer laquelle il s'agit. Merci.

A+