hI,
wOULD PLEASE HELP ME. I AM GETTIGN THE REQUEST OBJECT ERROS ASP 0105:
80004005 INDEX OUT OF RANGE ERROR. HERE IS THE SNIPPET OF CODE THAT I
AM USING. WHAT IS WRONG HERE? YOU CAN SEE WHAT I AM TRYING TO DO ADN
ERROR ON THIS LINK: http://www.walani.com/ProjectFiles/01_main.asp.
PLEASE HELP
<%
Dim iQuestions 'Holds the question
Dim nScore ' Holds the number of answer
'Set nScore to highest possible score
nScore = 3
iQuestions = 1
While Not objRS.EOF
'==================THIS IS WHERE THE ERROR IS
If Request.Form(objRS("QID")) = objRS("QCorrectAnswer") Then
bRightWrong = 1
Else
bRightWrong = 0
'~~~~~Set minus by number For how much Is counted off For Each
question~~~~~~
nScore = nScore - 1
End If
'~~~~Save the answers and grade to each question~~~~~~
strSQL = "INSERT INTO tblStudentTests
(STUserID,STQID,STAnswer,STRightWrong) VALUES ('" &
Request.Cookies("LoginData")("Login") & "@" &
Request.Cookies("LoginData")("Pass") & "', " & objRS("QID") & ",'" &
Request.Form(objRS("QID")) & "','" & bRightWrong & "')"
objConn.Execute(strSQL)
'~~~~~Show Question with Student answer and Grade~~~~~~
Response.Write(iQuestions & ". " & objRS("QQuestion") & ":<BR>")
Response.Write("Your Answer: " & Request.Form(objRS("QID")) & "<BR>")
Response.Write("<B>" & bRightWrong & "</B><BR><BR>")
objRS.MoveNext
iQuestions = iQuestions + 1
wend
%>
ANDY 6 6837
When I saw the all-caps, I almost deleted the message without reading it.
Please do not shout in the future. It makes your message hard to read. See
below for my response:
Andy wrote: While Not objRS.EOF
'==================THIS IS WHERE THE ERROR IS
To be able to help you, we need to know what is contained in objRS("QID")
and the names and values of your form variables in Request. So do this:
Response.Write "QID contains :" & objRS("QID") & "<BR>"
Response.Write "The Form collection contains:<BR>"
for each key in Request.Form
Response.Write key & ": " & Request.Form(key) & "<BR"
next
response.end
If running this fails to show you what's wrong, post the results back here
so we can look at it.
Bob Barrows
--
Microsoft MVP - ASP/ASP.NET
Please reply to the newsgroup. This email account is my spam trap so I
don't check it very often. If you must reply off-line, then remove the
"NO SPAM"
Thanks bob. I have done what you suggested and here are the results from
your suggested code
QID contains :1
The Form collection contains:
1: Junkyard Wars<BR2: In my car<BR31: programming Language<BR
It looks like in the collection it is reading the second line before the
first one. I have checked in my database and th tables are linked
accordingly. One table has a list of questions with the correct answer.
Another table has a list of possible answers and i have linked this
using the question ID
Thanks once again.
What is wrong?
Bob Barrows wrote: When I saw the all-caps, I almost deleted the message without reading it. Please do not shout in the future. It makes your message hard to read. See below for my response:
Andy wrote:
While Not objRS.EOF
'==================THIS IS WHERE THE ERROR IS
To be able to help you, we need to know what is contained in objRS("QID") and the names and values of your form variables in Request. So do this:
Response.Write "QID contains :" & objRS("QID") & "<BR>" Response.Write "The Form collection contains:<BR>" for each key in Request.Form Response.Write key & ": " & Request.Form(key) & "<BR" next response.end
If running this fails to show you what's wrong, post the results back here so we can look at it.
Bob Barrows
Thanks Bob here are the results of what you suggested. It seems to work
as it picks up the correct object
QID contains :2
The Form collection contains:
1: Active Server Pages
2: In my car
31: Don’t know
So what can be wrong then?
Thanks in advance for your help.
Andy
Bob Barrows wrote: When I saw the all-caps, I almost deleted the message without reading it. Please do not shout in the future. It makes your message hard to read. See below for my response: Andy wrote: While Not objRS.EOF
'==================THIS IS WHERE THE ERROR IS To be able to help you, we need to know what is contained in objRS("QID") and the names and values of your form variables in Request. So do this: Response.Write "QID contains :" & objRS("QID") & "<BR>" Response.Write "The Form collection contains:<BR>" for each key in Request.Form Response.Write key & ": " & Request.Form(key) & "<BR" next response.end If running this fails to show you what's wrong, post the results back here so we can look at it. Bob Barrows
Andy K wrote: Thanks Bob here are the results of what you suggested. It seems to work as it picks up the correct object QID contains :2 The Form collection contains: 1: Active Server Pages 2: In my car 31: Don’t know
So what can be wrong then? Thanks in advance for your help.
Andy
Bob Barrows wrote:
When I saw the all-caps, I almost deleted the message without reading it. Please do not shout in the future. It makes your message hard to read. See below for my response:
Andy wrote:
While Not objRS.EOF
'==================THIS IS WHERE THE ERROR IS
To be able to help you, we need to know what is contained in objRS("QID") and the names and values of your form variables in Request. So do this:
Response.Write "QID contains :" & objRS("QID") & "<BR>" Response.Write "The Form collection contains:<BR>" for each key in Request.Form Response.Write key & ": " & Request.Form(key) & "<BR" next response.end
If running this fails to show you what's wrong, post the results back here so we can look at it.
Bob Barrows
I suspect that in this line:
If Request.Form(objRS("QID")) = objRS("QCorrectAnswer") Then
the content of objRS("QID") is being interpreted as a number (why are you
using numbers for your form field names?) instead of a string, so instead of
looking for a form variable named "31", it's looking for the 31st item in
the form variables collection, which just isn't there.
As an initial try at working around this, you might try this:
If Request.Form(CStr(objRS("QID"))) = objRS("QCorrectAnswer") Then
If that does not work, then I suggest adding an alpha character to your form
field names, so that instead of being named 1,2,31, they are named f1, f2.
f31. This will allow you to do this:
If Request.Form("f" & objRS("QID")) = objRS("QCorrectAnswer") Then
HTH,
Bob Barrows
--
Microsoft MVP - ASP/ASP.NET
Please reply to the newsgroup. This email account is my spam trap so I
don't check it very often. If you must reply off-line, then remove the
"NO SPAM"
Bob,
I triedn converting the whole thing to a string as you suggested adn
that doesn't work as well.
Infact in my form name field is the same as the QID, which is an
AutoNumber in the access database. This is how I have assigned it.
Response.Write("<INPUT TYPE='radio' NAME='" & objRS("QID") & " VALUE='"
& objRS2("AAnswer") & "'>" & objRS2("AAnswer") & "<BR>")
This is on a different form.
Any Ideas, Thanks Bob
Bob Barrows wrote: Andy K wrote: Thanks Bob here are the results of what you suggested. It seems to work as it picks up the correct object QID contains :2 The Form collection contains: 1: Active Server Pages 2: In my car 31: Don’t know
So what can be wrong then? Thanks in advance for your help.
Andy
Bob Barrows wrote:
When I saw the all-caps, I almost deleted the message without reading it. Please do not shout in the future. It makes your message hard to read. See below for my response:
Andy wrote: While Not objRS.EOF
'==================THIS IS WHERE THE ERROR IS
To be able to help you, we need to know what is contained in objRS("QID") and the names and values of your form variables in Request. So do this:
Response.Write "QID contains :" & objRS("QID") & "<BR>" Response.Write "The Form collection contains:<BR>" for each key in Request.Form Response.Write key & ": " & Request.Form(key) & "<BR" next response.end
If running this fails to show you what's wrong, post the results back here so we can look at it.
Bob Barrows I suspect that in this line: If Request.Form(objRS("QID")) = objRS("QCorrectAnswer") Then the content of objRS("QID") is being interpreted as a number (why are you using numbers for your form field names?) instead of a string, so instead of looking for a form variable named "31", it's looking for the 31st item in the form variables collection, which just isn't there. As an initial try at working around this, you might try this: If Request.Form(CStr(objRS("QID"))) = objRS("QCorrectAnswer") Then If that does not work, then I suggest adding an alpha character to yourform field names, so that instead of being named 1,2,31, they are named f1, f2. f31. This will allow you to do this: If Request.Form("f" & objRS("QID")) = objRS("QCorrectAnswer") Then HTH, Bob Barrows
Thanks Bob,
It worked as you suggested. I had to conver everythign to string.
great, many thanks
Andy K wrote: Bob, I triedn converting the whole thing to a string as you suggested adn that doesn't work as well. Infact in my form name field is the same as the QID, which is an AutoNumber in the access database. This is how I have assigned it. Response.Write("<INPUT TYPE='radio' NAME='" & objRS("QID") & " VALUE='" & objRS2("AAnswer") & "'>" & objRS2("AAnswer") & "<BR>") This is on a different form. Any Ideas, Thanks Bob Bob Barrows wrote: Andy K wrote:
Thanks Bob here are the results of what you suggested. It seems to work as it picks up the correct object QID contains :2 The Form collection contains: 1: Active Server Pages 2: In my car 31: Don’t know
So what can be wrong then? Thanks in advance for your help.
Andy
Bob Barrows wrote:
When I saw the all-caps, I almost deleted the message without reading it. Please do not shout in the future. It makes your message hard to read. See below for my response:
Andy wrote: > While Not objRS.EOF > > '==================THIS IS WHERE THE ERROR IS To be able to help you, we need to know what is contained in objRS("QID") and the names and values of your form variables in Request. So do this:
Response.Write "QID contains :" & objRS("QID") & "<BR>" Response.Write "The Form collection contains:<BR>" for each key in Request.Form Response.Write key & ": " & Request.Form(key) & "<BR" next response.end
If running this fails to show you what's wrong, post the results back here so we can look at it.
Bob Barrows I suspect that in this line:
If Request.Form(objRS("QID")) = objRS("QCorrectAnswer") Then
the content of objRS("QID") is being interpreted as a number (why are you using numbers for your form field names?) instead of a string, so instead of looking for a form variable named "31", it's looking for the 31st itemin the form variables collection, which just isn't there.
As an initial try at working around this, you might try this:
If Request.Form(CStr(objRS("QID"))) = objRS("QCorrectAnswer") Then
If that does not work, then I suggest adding an alpha character to your form field names, so that instead of being named 1,2,31, they are named f1, f2. f31. This will allow you to do this:
If Request.Form("f" & objRS("QID")) = objRS("QCorrectAnswer") Then
HTH, Bob Barrows This thread has been closed and replies have been disabled. Please start a new discussion. Similar topics
by: John Beschler |
last post by:
There is a limit to the amount of data you can post
through a form. For a file of that size you probably need
to treat it as an upload.
>-----Original Message-----
>I've got a an ASP page...
|
by: Christopher Brandsdal |
last post by:
Hi!
I get an error when I run my code
Is there any other way to get te information from my form?
Heres the error I get and the code beneath.
Line 120 is market with ''''''''''''Line...
|
by: Grahammer |
last post by:
For some reason I am getting an error when trying to open a recordset on an
Access database on my Win2K3 machine from my INDEX.ASP page, but the same
code accesses the database fine when coming...
|
by: thomas parquier |
last post by:
Hello
Can someone give the snippet to send a post http request in order to send a
soap request ? I have the complete http request but I don't know how to send
it.
TIA
|
by: P Cooper |
last post by:
(Posted in multiple groups...Apologies)
Why does the error below occur whenever the statement
Request.BinaryRead(Request.TotalBytes) is executed for uploads larger than
100K? I thought the 100K...
|
by: F. Nolet |
last post by:
Hi,
With IIS 6 - ASP :
I try to upload a file of 125,000,000 bytes.
To do it, I use this code :
Request.BinaryRead(Request.TotalBytes)
I get this error :
|
by: Daniel Rimmelzwaan |
last post by:
I want to send a biztalk document to an aspx page, and I need to see some
sample code, because I just can't make it work. I have a port with transport
type HTTP, pointing to my aspx page, something...
|
by: steve_jackson |
last post by:
I get this error, when I am trying to update a table in an Access DB
through our intranet.
Here is the section of code that is generating the error:
FormItemID = Request.Form("FID")
StoreNo =...
|
by: rahulkhunteta |
last post by:
Request object error ‘ASP 0105 : 80004005’
Index out of range
/printcdsc/printsubscriptionsmainpage.asp,line55
An array index is out of range. I am getting this message while submitting a...
|
by: DolphinDB |
last post by:
Tired of spending countless mintues downsampling your data? Look no further!
In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
|
by: ryjfgjl |
last post by:
ExcelToDatabase: batch import excel into database automatically...
|
by: isladogs |
last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM).
In this month's session, we are pleased to welcome back...
|
by: jfyes |
last post by:
As a hardware engineer, after seeing that CEIWEI recently released a new tool for Modbus RTU Over TCP/UDP filtering and monitoring, I actively went to its official website to take a look. It turned...
|
by: ArrayDB |
last post by:
The error message I've encountered is; ERROR:root:Error generating model response: exception: access violation writing 0x0000000000005140, which seems to be indicative of an access violation...
|
by: CloudSolutions |
last post by:
Introduction:
For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
|
by: Shællîpôpï 09 |
last post by:
If u are using a keypad phone, how do u turn on JavaScript, to access features like WhatsApp, Facebook, Instagram....
|
by: af34tf |
last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you
|
by: isladogs |
last post by:
The next Access Europe User Group meeting will be on Wednesday 3 Apr 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM).
In this session, we are pleased to welcome former...
| |