<% dim namn namn=Request.Form("namn") dim epost epost=Request.Form("epost") dim telefon telefon=Request.Form("telefon") dim adress epost=Request.Form("adress") dim antalskivor antalskivor=Request.Form("antalskivor") dim ovrigt ovrigt=Request.Form("ovrigt") 'detta skickar mail till användaren Set mymail = Server.CreateObject("CDONTS.NewMail") mymail.Subject = "Thank you for your order!" mymail.Body = "Hi " & namn & "!" & vbcr & vbcr & "We will soon send the record/records" & vbcr & vbcr & "" & vbcr & "GENDER" & vbcr & "www.gender.se" mymail.From = "johan@gender.se" mymail.Host = "mail-hub.surftown.se" mymail.To = epost mymail.Send set mymail = Nothing 'detta skickar mail till gender set mymail = Server.CreateObject("CDONTS.NewMail") mymail.Subject = "order" mymail.Body = "Beställning av Help Crush GENDER" & vbcr & vbcr & "Namn: " & namn & vbcr & "E-post: " & epost & vbcr & "Telefon: " & telefon & vbcr & "Adress: " & epost & vbcr & "Antal skivor: " & antalskivor & vbcr & "Övrigt: " & ovrigt 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 %>!
We have received your order.