[Webinar] Learn how to a build a cloud-first strategyRegister Now

x
?
Solved

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

Posted on 2007-10-18
3
Medium Priority
?
139 Views
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!!
 
Help!!!
 
 
My input file
=========
<html>
<head>
 <title>Feedback</title>
 <style type="text/css" media="all">
   <!-- @import url("style/coniston.css"); -->
  </style>
</head>
<body topmargin="0" leftmargin="0">
 
 

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

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

</td>
</tr>
 
 
<tr>
    <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>
 
</tr>
<tr>
    <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>
 
</tr>
<tr>
    <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>
 
</tr>
<tr>
    <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>
 
</tr>
<tr>
    <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>
</tr>
<tr>
<td  colspan="2" bgcolor="#003082" align="center" class="plaintext"><font color="white"><b>Or call us on: (0191) 519 7300</b></font></td>
</tr>
</table>
</form>
</body>
</html>
 
Process Form
==========
 
<!-- #include file="general.asp" -->
<!-- #include file="CAPTCHA/CAPTCHA_process_form.asp" -->  
<style type="text/css" media="all">
   <!-- @import url("style/coniston.css"); -->
  </style>
     

<%    
 
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
next
' 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
 'response.end
 
 
 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='http://demo.thecreativecake.com/tragus/images/emailHeader.jpg'  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   = "WWW.clientaccounts@bbb.co.uk"
Mail.FromAddress= "billy@bbb.com"
Mail.AddRecipient "billy", "billy@bbb.co.uk"
Mail.ContentType = "text/html"
'   >>> OLD SMTP RELAY >>> Mail.RemoteHost = "relay.mail.sccis.net"
Mail.RemoteHost = "smtp.onyx.net"
Mail.Subject    = "Website Feedback"
Mail.BodyText   = strBody
if Mail.SendMail then
 ' Response.Write "Mail sent..."
else
  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>"
 

%>
0
Comment
Question by:SaintMackem
  • 2
3 Comments
 
LVL 11

Expert Comment

by:L00M
ID: 20101180
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.
0
 
LVL 4

Accepted Solution

by:
lrygiel earned 375 total points
ID: 20101247
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".

0
 
LVL 4

Expert Comment

by:lrygiel
ID: 20101480
SaintMakem,

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.
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When it comes to write a Context Sensitive Help (an online help that is obtained from a specific point in state of software to provide help with that state) ,  first we need to make the file that contains all topics, which are given exclusive IDs. …
Originally, this post was published on Monitis Blog, you can check it here . In business circles, we sometimes hear that today is the “age of the customer.” And so it is. Thanks to the enormous advances over the past few years in consumer techno…
In this tutorial viewers will learn how to style transparent/translucent elements using alpha transparency in CSS Start with a normal styled element, such as a div.: Define its "background-color" property as "rgba (255, 255, 255, .5): The numbers in…
Video by: Mark
This lesson goes over how to construct ordered and unordered lists and how to create hyperlinks.
Suggested Courses

868 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