<% dim namn namn=Request.Form("namn") dim epost epost=Request.Form("epost") 'detta skickar mail till gender set mymail = Server.CreateObject("CDONTS.NewMail") mymail.Subject = "Mailinglista" mymail.Body = "Lägg till i mailinglista" & vbcr & vbcr & "Namn: " & namn & vbcr & "E-post: " & epost mymail.From = "johan@gender.se" mymail.Host = "mail-hub.surftown.se" mymail.To = "info@gender.se" mymail.Send set mymail = Nothing %>

Thank you <% response.write namn %>!
You have now joined out mailing list.