Streit - Questions

Lassen Sie uns - mit Hilfe des folgenden Formulares - an Ihren Bemerkungen teilhaben :

<% If (cStr(Request("Submit")) <> "") Then Dim objCDO, varnom, varprenom, varemail, varbody, body varnom = Request.Form("name") varprenom = Request.Form("Vorname") varemail = Request.Form("email") varbody = Request.Form("nachricht") body = varnom & " " & varprenom & VbCrLf & varemail & VbCrLf & varbody Set objCDO = Server.CreateObject("CDONTS.NewMail") objCDO.From = "info@streitdecolletage.com" objCDO.To = "info@streitdecolletage.com" 'objCDO.CC = Request.Form("body") objCDO.Subject = "Questions en provenance du site web" objCDO.Body = body objCDO.Send() Set objCDO = Nothing Response.Redirect("merci.html") End If %>