Code now working, and I don't know why!!!

Posted on 2007-10-18
Last Modified: 2010-04-09
Firstly is anyone aware of the Web Wiz - Captcha....I am sure there are people.

right my asp below should work, but doesn't. I need to understand why it doesn't. Can an ASP expert please help me out

 I use the simple install and use the redirect if incorrect in captcha_setup.asp...but it always redirects regardless whether it is right or wrong!!
My input file
 <style type="text/css" media="all">
   <!-- @import url("style/coniston.css"); -->
<body topmargin="0" leftmargin="0">

<form  enctype="multipart/form-data"  action="pete.asp" method="post">

<table align="center" cellspacing="2" cellpadding="2" border="0">
<td  colspan="2" bgcolor="#003082"><img src="images/poplogo.jpg" width="132" height="33" border="0" alt=""></td>
<td colspan="2" class="plaintext">
<b>Contact Us</b><br>
Please complete the following details and we will contact you shortly.

    <td class="plaintext">Name:</td>
    <td><input type="text" name="FeedFullName" value="<%=FeedFullName%>" size="60" style="color: #460046; font: 11px Verdana; border-width: 1; border-color: #000000; border-style: solid;"></td>
    <td class="plaintext">Contact Number:</td>
    <td><input type="text" name="FeedTelephone" value="<%=FeedTelephone%>" size="60" style="color: #460046; font: 11px Verdana; border-width: 1; border-color: #000000; border-style: solid;"></td>
    <td class="plaintext">Organisation:</td>
    <td><input type="text" name="FeedOrganisation" value="<%=FeedOrganisation%>" size="60" style="color: #460046; font: 11px Verdana; border-width: 1; border-color: #000000; border-style: solid;"></td>
    <td class="plaintext">Query:</td>
    <td><textarea cols="59" rows="6" name="Feedback" value="<%=Feedback%>" style="color: #460046; font: 11px Verdana; border-width: 1; border-color: #000000; border-style: solid;"></textarea>
 <!-- include the Web Wiz CAPTCHA form element -->
    <!--#include file="CAPTCHA/CAPTCHA_form_inc.asp" -->
    <td colspan="2" align="center"><input type="submit" name="submit" value="Submit" style="color: #460046; font: 11px Arial; border-width: 1; border-color: #000000; border-style: solid;"></td>
<td  colspan="2" bgcolor="#003082" align="center" class="plaintext"><font color="white"><b>Or call us on: (0191) 519 7300</b></font></td>
Process Form
<!-- #include file="general.asp" -->
<!-- #include file="CAPTCHA/CAPTCHA_process_form.asp" -->  
<style type="text/css" media="all">
   <!-- @import url("style/coniston.css"); -->

Set objUpload = Server.CreateObject("Persits.Upload.1")
objUpload.overwritefiles = true
uploadDir = "E:\websites\demosite\coniston\images"
'uploadDir = "D:\wwwroot\berger\files"
fileCount = objUpload.Save(uploadDir)
' Retrieve form variables

Set FeedFullName = objUpload.form ("FeedFullName")
Set FeedTelephone = objUpload.form ("FeedTelephone")
Set FeedOrganisation = objUpload.form ("FeedOrganisation")
Set Feedback = objUpload.form ("Feedback")
' Retrieve file details
For each file in objUpload.files
  newFile = File.Path
' Check for new file upload
if newFile <> "" Then
  ImageDiagram = right(newFile, len(newFile) - (len(uploadDir) + 1))
  else ImageDiagram = ""
end if
Set objUpload = Nothing

  'objConn.execute strSQLInsert
  'response.write strSQLInsert
 strBody = "<html>" & vbCrLf
strBody = strBody & "<head>" & vbCrLf
strBody = strBody & "<title>Coniston IT - Feedback </title>" & vbCrLf
strBody = strBody & "<meta http-equiv=""Content-Type"" content= ""text/html; charset=iso-8859-1"">" & vbCrLf
strBody = strBody & "<body>" & vbCrLf
strBody = strBody & "<table  border= ""0""   cellpadding=""2"" cellspacing=""0"">" & vbCrLf
strBody = strBody & "<tr>"& vbCrLf
'strBody = strBody & "<td colspan='2'><IMG SRC=''  BORDER='0'></td>" & vbCrLf
strBody = strBody & "</tr>" & vbCrLf
strBody = strBody & "<tr><tdwidth='40%'><font color='#000000'>Thank you <b> " & FeedFullName & " </b>for submitting your feedback.</font> &nbsp;</td>"
strBody = strBody & "<tr><td><font color='#000000'> Your details have been recored as below</font> &nbsp;</td>"
strBody = strBody & "<tr><td><font color='#000000'>Name:<b> " & FeedFullName & " </b> </font> &nbsp;</td>"
strBody = strBody & "<tr><td><font color='#000000'>Telephone:<b> " & FeedTelephone & " </b> </font> &nbsp;</td>"
strBody = strBody & "<tr><td><font color='#000000'>Organisation:<b> " & FeedOrganisation & " </b> </font> &nbsp;</td>"
strBody = strBody & "<tr><td><font color='#000000'>Query:<b> " & Feedback & " </b> </font> &nbsp;</td>"
strBody = strBody & "<tr><td><font color='#000000'></font> &nbsp;</td>"
strBody = strBody & "<tr><td><font color='#000000'>Yours sincerely</font> &nbsp;</td>"
strBody = strBody & "<tr><td><font color='#000000'>bbb Helpdesk</font> &nbsp;</td>"
strBody = strBody & "</table>"& vbCrLf
strBody = strBody & "</body>"& vbCrLf
strBody = strBody & "</html>"& vbCrLf
'Set Mail = Server.CreateObject("Persits.MailSender")
Set Mail = Server.CreateObject("SMTPsvg.Mailer")
Mail.FromName   = ""
Mail.FromAddress= ""
Mail.AddRecipient "billy", ""
Mail.ContentType = "text/html"
'   >>> OLD SMTP RELAY >>> Mail.RemoteHost = ""
Mail.RemoteHost = ""
Mail.Subject    = "Website Feedback"
Mail.BodyText   = strBody
if Mail.SendMail then
 ' Response.Write "Mail sent..."
  Response.Write "Mail send failure. Error was " & Mail.Response
end if
Set Mail = Nothing
response.write "<center><font class='textheader'>Thankyou for submitting your feedback.<p>Please close this window to continue browsing our website.</center></font>"

Question by:SaintMackem
    LVL 11

    Expert Comment

    I don't see any redirect in that code. Is the redirect in CAPTCHA/CAPTCHA_process_form.asp?

    If so, paste that code here as well.
    LVL 4

    Accepted Solution

    First:  CAPTCHA it requires that cookies are enabled. Check that browser setting and try again.

    Second: It might be captcha itself. I was just on there site and tried their DEMO page and no matter what I did, it's response was that the code was "incorrect".

    LVL 4

    Expert Comment


    Since cookies are required that means sessions are involved. You need to make sure your sever is not load balanced against multiple machines (no session integrity) or spread amoung multiple servers (as in a server farm). Also, if there are restrictions on SESSION usage on the server, you will have a problem too.

    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    How to run any project with ease

    Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
    - Combine task lists, docs, spreadsheets, and chat in one
    - View and edit from mobile/offline
    - Cut down on emails

    Suggested Solutions

    Popularity Can Be Measured Sometimes we deal with questions of popularity, and we need a way to collect opinions from our clients.  This article shows a simple teaching example of how we might elect a favorite color by letting our clients vote for …
    Someone recently asked me about how to display a progress indicator on a page while an iframe is loading. And I remember when I first came across this myself. It was a bit tricky to get my head around, but really, it's very simple. The most impor…
    In this tutorial viewers will learn how to embed videos in a webpage using HTML5. Ensure your DOCTYPE declaration is set to HTML5: "<!DOCTYPE html>": Use the <video> tag to insert a video. Define the src as the URL of your video; this is similar to …
    The viewer will learn how to create a basic form using some HTML5 and PHP for later processing. Set up your basic HTML file. Open your form tag and set the method and action attributes.: (CODE) Set up your first few inputs one for the name and …

    760 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    10 Experts available now in Live!

    Get 1:1 Help Now