Hjælp, 2 problemer i min kode !!
Håber i kan hjælpe...Jeg har 2 problemer med nedenstående kode.
1. Jeg kan ikke få "required felter" til at fungere så man skal udfylde alle felterne før man kan sende. Hvis ikke man gør det, skal den skrive en fejl.
2. Jeg vil gerne droppe personernes email. Men jeg kan ikke slette feltet : Mail.From = Request.Form("Emailadresse") - så kommer mailen aldrig frem. Kan man omgå dette på anden måde, altså "overrule" at der ikke behøver være afsender på ?!
Da jeg er total rookie i ASP, vil jeg være taknemmelig hvis du vil poste den fulde kode med rettelserne i.
På forhånd tusind tak for hjælpen...
- Hybel.
Koden:
<% If Request.Querystring("mode") = "send" Then
Dim mailtext, email
If Request.Form("Navn") = "" or Request.Form("Emailadresse") = "" Then
mailtext = "<div align=""center"" style='font-size:16px; color: red; font-weight: bold; font-family: ""Times New Roman"";'>Alle felter skal udfyldes !</div>"
Response.Write mailtext
Else
'******** BESKED SENDES START ********
'--------------ASPEmail start---------------------
email = Replace(Request.Form("mail"),vbCrLf,"<br>") ' Her bliver alle tryk på enter erstattet af <br>
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.hybels.dk"
Mail.From = Request.Form("Emailadresse")
Mail.FromName = Request.Form("Navn")
Mail.AddAddress "hybel@adslhome.dk"
Mail.Subject = "Nyt medlem af badmintonklubben." & VbCrlf
Mail.isHTML = True
Mail.Body = Request.Form("Navn") & VbCrlf & VbCrlf
Mail.Body = Mail.Body & "Email : " & Request.form("Emailadresse") & VbCrlf
Mail.Body = Mail.Body & "Telefon : " & Request.form("Telefon") & VbCrlf
Mail.Body = Mail.Body & "Vil spille : " & Request.form("Vil spille") & VbCrlf
On Error Resume Next
Mail.Send
Response.Redirect("badminton2.htm")
End If
End If
%>
