obernai
asked on
Recordset Error WHERE IDNmbr = " & SurveyID
First web page saves the data to the table LOTADATA, just fine.
I pass SurveyID from first to second page.
I want to use that ID to show the field Score on the second web page, but get an error using this code.
**THANK you for any help**JOHN
SurveyID = Request("SurveyID")
<%
Dim LOTADATA
Dim LOTADATA_numRows
Set LOTADATA = Server.CreateObject("ADODB .Recordset ")
LOTADATA.ActiveConnection = MM_ConnectOpt_STRING
LOTADATA.Source = "SELECT Score FROM LOTADATA WHERE IDNmbr = " & SurveyID
LOTADATA.CursorType = 0
LOTADATA.CursorLocation = 2
LOTADATA.LockType = 1
LOTADATA.Open()
LOTADATA_numRows = 0
%>
<p align="center">Your score was <%=(LOTADATA.Fields.Item(" Score").Va lue)%>.</p >
I pass SurveyID from first to second page.
I want to use that ID to show the field Score on the second web page, but get an error using this code.
**THANK you for any help**JOHN
SurveyID = Request("SurveyID")
<%
Dim LOTADATA
Dim LOTADATA_numRows
Set LOTADATA = Server.CreateObject("ADODB
LOTADATA.ActiveConnection = MM_ConnectOpt_STRING
LOTADATA.Source = "SELECT Score FROM LOTADATA WHERE IDNmbr = " & SurveyID
LOTADATA.CursorType = 0
LOTADATA.CursorLocation = 2
LOTADATA.LockType = 1
LOTADATA.Open()
LOTADATA_numRows = 0
%>
<p align="center">Your score was <%=(LOTADATA.Fields.Item("
Add these 2 items to your code at the very beginning...(1st & 2nd line)
<% @ LANGUAGE = VBSCRIPT%>
<% Option Explicit %>
Then in Internet Explorer, go to TOOLS-INTERNET OPTIONS - ADVANCE tab, then locate "SHOW FRIENDLY HTTP ERROR MESSAGES", UNCHECK that box.
Post back any errors (exact errors)
<% @ LANGUAGE = VBSCRIPT%>
<% Option Explicit %>
Then in Internet Explorer, go to TOOLS-INTERNET OPTIONS - ADVANCE tab, then locate "SHOW FRIENDLY HTTP ERROR MESSAGES", UNCHECK that box.
Post back any errors (exact errors)
ASKER
Here is the error I am getting:
Microsoft VBScript runtime error '800a01f4'
Variable is undefined: 'SurveyID'
/lot_finish.asp, line 10
Microsoft VBScript runtime error '800a01f4'
Variable is undefined: 'SurveyID'
/lot_finish.asp, line 10
ASKER
I changed the code to this:
<%@LANGUAGE="VBSCRIPT"%>
<% Option Explicit %>
<!--#include file="Connections/ConnectO pt.asp" -->
<%
Dim LOTADATA
Dim LOTADATA_numRows
Dim SurveyID
SurveyID = Request("SurveyID")
Set LOTADATA = Server.CreateObject("ADODB .Recordset ")
LOTADATA.ActiveConnection = MM_ConnectOpt_STRING
LOTADATA.Source = "SELECT Score, IDNmbr FROM LOTADATA WHERE IDNmbr = '" & SurveyID & "'"
LOTADATA.CursorType = 0
LOTADATA.CursorLocation = 2
LOTADATA.LockType = 1
LOTADATA.Open()
LOTADATA_numRows = 0
Here is the error I get now:
Microsoft OLE DB Provider for ODBC Drivers error '80040e07'
[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.
/lot_finish.asp, line 18
<%@LANGUAGE="VBSCRIPT"%>
<% Option Explicit %>
<!--#include file="Connections/ConnectO
<%
Dim LOTADATA
Dim LOTADATA_numRows
Dim SurveyID
SurveyID = Request("SurveyID")
Set LOTADATA = Server.CreateObject("ADODB
LOTADATA.ActiveConnection = MM_ConnectOpt_STRING
LOTADATA.Source = "SELECT Score, IDNmbr FROM LOTADATA WHERE IDNmbr = '" & SurveyID & "'"
LOTADATA.CursorType = 0
LOTADATA.CursorLocation = 2
LOTADATA.LockType = 1
LOTADATA.Open()
LOTADATA_numRows = 0
Here is the error I get now:
Microsoft OLE DB Provider for ODBC Drivers error '80040e07'
[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.
/lot_finish.asp, line 18
ok.. what is the datatype for IDNmbr?
also
SurveyID=Request("SurveyID ") is NOT correct in syntax.. if you are calling from a form, thenuse
Request.Form("SurveyID"), if from a hyperlink
Request.Query("SurveyID")
also
SurveyID=Request("SurveyID
Request.Form("SurveyID"), if from a hyperlink
Request.Query("SurveyID")
ASKER
IDNmbr is Numeric
did you apply my recent comment?
ASKER
Yes, no difference.
what does your code look like now?
instead of
SurveyID = Request("SurveyID")
put
SurveyID = 1
(or some other valid value in your table)
instead of
SurveyID = Request("SurveyID")
put
SurveyID = 1
(or some other valid value in your table)
ASKER
The value of SurveyID is a numeric value.
The code
SurveyID = Request("SurveyID")
is just calling for the value from the previous form page so that all the records in the DB tables are linkable via the IDNmbr table field.
I have a table called IDCreator where it has one numeric field that is increased by one after each user completes the first page of the survey. This number is passed to each page (as 'SurveyID' and entered into each table as IDNmbr).
So on the previous page, the code for this process is this:
If (MM_editRedirectUrl <> "") Then
If (MM_editRedirectUrl <> "") Then
MM_editRedirectUrl = MM_editRedirectUrl & "?SurveyID="& SurveyID &""
'the ID is passed to Next Page as query string
Response.Redirect(MM_editR edirectUrl )
End If
I have been using this method for several years without a problem. So I can have multiple users completing the survey at the same time.
I have never tried to load a field specific to the user's IDNmbr though....
The code
SurveyID = Request("SurveyID")
is just calling for the value from the previous form page so that all the records in the DB tables are linkable via the IDNmbr table field.
I have a table called IDCreator where it has one numeric field that is increased by one after each user completes the first page of the survey. This number is passed to each page (as 'SurveyID' and entered into each table as IDNmbr).
So on the previous page, the code for this process is this:
If (MM_editRedirectUrl <> "") Then
If (MM_editRedirectUrl <> "") Then
MM_editRedirectUrl = MM_editRedirectUrl & "?SurveyID="& SurveyID &""
'the ID is passed to Next Page as query string
Response.Redirect(MM_editR
End If
I have been using this method for several years without a problem. So I can have multiple users completing the survey at the same time.
I have never tried to load a field specific to the user's IDNmbr though....
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
-----------------------
use this
-----------------------
SELECT Score, IDNmbr FROM LOTADATA WHERE IDNmbr = '" & SurveyID & "'"