<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% if Request.Form.Count > 0 then sInitialValue = request.Form("txtName") if request.Form("ddlOptIn") <> "yes" and request.Form("ddlOptIn") <> "no" then 'if the optin is not yes or no then there is a spam request. therefore blocked from the next statements if instr(lcase(request.Form("txtEmail")),"web-accessibility.co.uk") = 0 then 'if the email contains the website domain name then its classed as a spam and therefore blocked from the next statements sResults = "Name: " & Request.Form("txtName") & vbCrLf if Request.Form("txtAbout") <> "" then sResults = sResults & "Other Details:" & FormatBlock(Request.Form("txtOtherUses")) end if if Request.Form("txtContribution") <> "" then sResults = sResults & "Other Details:" & FormatBlock(Request.Form("txtOtherTech")) end if sResults = sResults & "Name of organization: " & request.Form("txtOrganization") & vbCrLf sResults = sResults & "Email address: " & request.Form("txtEmail") & vbCrLf sResults = sResults & "Opt in: " & request.Form("ddlOptIn") & vbCrLf sBody = "#################################################################" & vbCrLf & vbCrLf & _ "Web-Accessibility: Accessibility Contributions" & vbCrLf & vbCrLf & _ "#################################################################" & vbCrLf & vbCrLf & _ sResults & vbCrLf & vbCrLf & _ "#################################################################" Set objMailer = Server.CreateObject("CDONTS.NewMail") with objMailer .To = "enquiries@epsilis.co.uk" .From = "website@web-accessibility.co.uk" .Subject = "Accessibility Contributions" .Body = sBody .send End With Set objMailer = nothing response.Redirect("contactthankyou.asp") end if 'own domain in email query end if 'ddloptin query end if 'request.count function FormatBlock(sField) FormatBlock = vbCrLf & sField & vbCrLf & vbCrLf end function %> Web Accessibility

Accessibility Contributions

If you wish to provide a contribution to the site, we would be happy to hear from you.

We invite contributions to this site from people who

Simply fill in the details below:

*
*