email form problems, any ideas??
im new to ASP so tbh i dont really have a clue whats going on. here is my html code:
Code:
<form method="POST" action="contactus.aspx">
<fieldset class="list">
<p1> Name: <input type="text" name="Name" size="30"/> <br /><br />
Subject: <input type="text" name="Subject" size="50"/> <br /><br />
<p1>E-mail Address: <input type="text" name="E-mail Address" size="50"> <br /><br />
<p1>Tel:<input type="text" name="Tel" size="30"> <br /><br />
Comments:<br /> <textarea name="Comments" rows="10" cols="50" wrap="physical" >
</textarea><br /><br />
Please specify what category your comment falls into:
<br /><br /><label for="topic1">
<input id="topic1" name="subject" class="noBorder" value="Brand or product" type="radio">
Service you experience whilst at Lloyds Lanes<br />
</label>
<label for="topic2">
<input id="topic2" name="subject" class="noBorder" value="Investor relations" type="radio">
Question about our party packages we offer<br />
</label>
<label for="topic3">
<input id="topic3" name="subject" class="noBorder" value="Environment & society " type="radio">
Other <br />
</label>
<br /> <input name="submit" value="Submit" type="submit" />
<input value="Clear" type="reset" />
</p1></form>
and here is what ive got in my .aspx page
Code:
<%
' declare variables
Dim EmailFrom
Dim EmailTo
Dim Subject
Dim Comments
' get posted data into variables
EmailFrom = Trim(Request.Form("EmailFrom"))
EmailTo = "lloydslanes@googlemail.com"
Subject = Trim(Request.Form("Subject"))
Name = Trim(Request.Form("Name"))
E(-mail Address = Trim(Request.Form("E-mail Address")))
Tel = Trim(Request.Form("Tel"))
Comments = Trim(Request.Form("Comments"))
' validation
Dim validationOK
validationOK=true
If (Trim(EmailFrom)="") Then validationOK=false
If (validationOK = False) Then Response.Redirect("error.htm" & EmailFrom)
' prepare email body text
Dim Comments
Comments = Comments & "Comments: " & Comments & vbCrLf
' send email
Dim mail
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To = EmailTo
mail.From = Name
mail.Subject = Subject
mail.Comments = Comments
mail.Send
' redirect to success page
Response.Redirect("emailsent.htm" & EmailFrom)
%>
please help! I am very confused! Thanks!
