I'm baffled...

[% =joe %]

Help...

This is my error
(I've searched all over help regarding the famous 80040e10 error)


Microsoft JET Database Engine error '80040e10'
No value given for one or more required parameters.
orderSearchDetails.asp, line 36



Here's my code...


Dim searchChoice
searchChoice = Request.form("searchChoice")

Select Case searchChoice
Case "orderID"
searchVarible = Request.form("searchBox")
valueID = "orderID"

Case "email"
searchVarible = Request.form("searchBox")
valueID = "'email'"

Case "lName"
searchVarible = Request.form("searchBox")
valueID = "'lName'"

end select

'Connect to the included MS Access database
Set MyConn = Server.CreateObject("ADODB.Connection")
MyConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" &
Server.MapPath("../database/metacart.mdb") & ";"
Set MyRS = Server.CreateObject("ADODB.Recordset")

mySQL = "SELECT orderID,orderDate,fName,lName,email,orderStatus FROM
orders WHERE "&searchVarible&" LIKE "&valueID&" ORDER BY orderDate
DESC;"
'Opened as Read-Only
MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36 IS HERE

'UNCOMMENT TO VIEW SQL STATEMENT--------------------------------
'Response.Write(mySQL)
'Response.End


I've using the select/case because two of my search fields are text
and one is numeric.

Thanks in advance

[Bob Barrows]

% =joe % wrote:

> Help...
>
> This is my error
> (I've searched all over help regarding the famous 80040e10 error)
>
>
> Microsoft JET Database Engine error '80040e10'
> No value given for one or more required parameters.
> orderSearchDetails.asp, line 36
>
>
>
> Here's my code...
>
>
> Dim searchChoice
> searchChoice = Request.form("searchChoice")
>
> Select Case searchChoice
> Case "orderID"
> searchVarible = Request.form("searchBox")
> valueID = "orderID"
>
> Case "email"
> searchVarible = Request.form("searchBox")
> valueID = "'email'"
>
> Case "lName"
> searchVarible = Request.form("searchBox")
> valueID = "'lName'"
>
> end select
>
> 'Connect to the included MS Access database
> Set MyConn = Server.CreateObject("ADODB.Connection")
> MyConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" &
> Server.MapPath("../database/metacart.mdb") & ";"
> Set MyRS = Server.CreateObject("ADODB.Recordset")
>
> mySQL = "SELECT orderID,orderDate,fName,lName,email,orderStatus FROM
> orders WHERE "&searchVarible&" LIKE "&valueID&" ORDER BY orderDate
> DESC;"
> 'Opened as Read-Only
> MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36 IS HERE
>
> 'UNCOMMENT TO VIEW SQL STATEMENT--------------------------------
> 'Response.Write(mySQL)
> 'Response.End
>

Why haven't you shown us the SQL statement? That is the key to debugging
this error, which usually means that you have referred to a field which does
not exist, usually due to misspelling, or due to using a reserved keyword
for your field name (which does not appear to be the case here).

You can avoid the error entirely in the future by using saved parameter
queries instead of dynamic sql. See some of the other posts I've made today
for examples

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"

[Aaron Bertrand - MVP]

> MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36 IS HERE

>
> 'UNCOMMENT TO VIEW SQL STATEMENT--------------------------------
> 'Response.Write(mySQL)

So, UNCOMMENT, run again, and show us the result.

[% =joe %]

Sorry for the mix up. I did run it (uncommented) and the result was:

> Microsoft JET Database Engine error '80040e10'
> No value given for one or more required parameters.
> orderSearchDetails.asp, line 36

MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36

Here is my sql statement:
mySQL = "SELECT orderID,orderDate,fName,lName,email,orderStatus FROM

> orders WHERE "&searchVarible&" LIKE "&valueID&" ORDER BY orderDate
> DESC;"

I did check and re-check the spelling of my field names, and I am not
using any reserved words. That's why I'm turing to the justice league
for help.

I am still unsure about using cursor types and lock types. Could that
be something?

Thanks again

[Ray at]

I think they were after the result of

RESPONSE.WRITE MYSQL

that you copy and paste from your browser, not the code.

Ray at work

"% =joe %" <jweiss@lanelabs.com> wrote in message
news:1324914.0402061648.6ddd79e1@posting.google.co m...

> Sorry for the mix up. I did run it (uncommented) and the result was:
>

> > Microsoft JET Database Engine error '80040e10'
> > No value given for one or more required parameters.
> > orderSearchDetails.asp, line 36

>
>
>
> MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36
>
> Here is my sql statement:
> mySQL = "SELECT orderID,orderDate,fName,lName,email,orderStatus FROM

> > orders WHERE "&searchVarible&" LIKE "&valueID&" ORDER BY orderDate
> > DESC;"

>
>
> I did check and re-check the spelling of my field names, and I am not
> using any reserved words. That's why I'm turing to the justice league
> for help.
>
> I am still unsure about using cursor types and lock types. Could that
> be something?
>
> Thanks again

[Chris Hohmann]

"% =joe %" <jweiss@lanelabs.com> wrote in message
news:1324914.0402061648.6ddd79e1@posting.google.co m...

> Sorry for the mix up. I did run it (uncommented) and the result was:
>

> > Microsoft JET Database Engine error '80040e10'
> > No value given for one or more required parameters.
> > orderSearchDetails.asp, line 36

>
>
>
> MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36
>
> Here is my sql statement:
> mySQL = "SELECT orderID,orderDate,fName,lName,email,orderStatus FROM

> > orders WHERE "&searchVarible&" LIKE "&valueID&" ORDER BY orderDate
> > DESC;"

>
>
> I did check and re-check the spelling of my field names, and I am not
> using any reserved words. That's why I'm turing to the justice league
> for help.
>
> I am still unsure about using cursor types and lock types. Could that
> be something?
>
> Thanks again

You have to comment out line 36 or it's never going to get to lines 39
and 40.

[% =joe %]

I did coment it out, just wasn't clear about it, sorry.

Here's my origional code...

Dim searchChoice
searchChoice = Request.form("searchChoice")

Select Case searchChoice
Case "orderID"
searchVarible = Request.form("searchBox")
valueID = "orderID"

Case "email"
searchVarible = Request.form("searchBox")
valueID = "'email'"

Case "lName"
searchVarible = Request.form("searchBox")
valueID = "'lName'"

end select

'Connect to the included MS Access database
Set MyConn = Server.CreateObject("ADODB.Connection")
MyConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" &
Server.MapPath("../database/metacart.mdb") & ";"
Set MyRS = Server.CreateObject("ADODB.Recordset")

mySQL = "SELECT orderID,orderDate,fName,lName,email,orderStatus FROM
orders WHERE "&searchVarible&" LIKE "&valueID&" ORDER BY orderDate
DESC;"
'Opened as Read-Only
MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36 IS HERE

Response.Write(mySQL)
Response.End


Here is the error I got...

> Microsoft JET Database Engine error '80040e10'
> No value given for one or more required parameters.
> orderSearchDetails.asp, line 36

I have read much of 80040e10 errors and making sure that there aren't
any mispesslings in my field names (and they're not)

Could this be a lock type issue (that is where I am a bit fuzzy).

Thanks again

[Bob Barrows]

% =joe % wrote:
Sheesh! Change your code to this:
----------------------------------------------------------------------------
---
mySQL = "SELECT orderID,orderDate,fName,lName,email,orderStatus FROM
orders WHERE "&searchVarible&" LIKE "&valueID&" ORDER BY orderDate
DESC;"

Response.Write(mySQL)
Response.End


'Connect to the included MS Access database
Set MyConn = Server.CreateObject("ADODB.Connection")
MyConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" &
Server.MapPath("../database/metacart.mdb") & ";"
Set MyRS = Server.CreateObject("ADODB.Recordset")
'Opened as Read-Only
MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36 IS HERE
------------------------------------------------------------------

You need to see the result of Response.Write(mySQL). If that does not tell
you what the problem is (you should copy and paste the result from the
browser window into the SQL View of the Access query builder to try and
debug it), then you need to show us the structure of the orders table along
with the result of the response.write.

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"

[Chris Hohmann]

"% =joe %" <jweiss@lanelabs.com> wrote in message
news:1324914.0402080946.33758a35@posting.google.co m...

> I did coment it out, just wasn't clear about it, sorry.
>
> Here's my origional code...
>
> Dim searchChoice
> searchChoice = Request.form("searchChoice")
>
> Select Case searchChoice
> Case "orderID"
> searchVarible = Request.form("searchBox")
> valueID = "orderID"
>
> Case "email"
> searchVarible = Request.form("searchBox")
> valueID = "'email'"
>
> Case "lName"
> searchVarible = Request.form("searchBox")
> valueID = "'lName'"
>
> end select
>
> 'Connect to the included MS Access database
> Set MyConn = Server.CreateObject("ADODB.Connection")
> MyConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" &
> Server.MapPath("../database/metacart.mdb") & ";"
> Set MyRS = Server.CreateObject("ADODB.Recordset")
>
> mySQL = "SELECT orderID,orderDate,fName,lName,email,orderStatus FROM
> orders WHERE "&searchVarible&" LIKE "&valueID&" ORDER BY orderDate
> DESC;"
> 'Opened as Read-Only
> MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36 IS HERE
>
> Response.Write(mySQL)
> Response.End
>
>
> Here is the error I got...
>

> > Microsoft JET Database Engine error '80040e10'
> > No value given for one or more required parameters.
> > orderSearchDetails.asp, line 36

>
>
> I have read much of 80040e10 errors and making sure that there aren't
> any mispesslings in my field names (and they're not)
>
> Could this be a lock type issue (that is where I am a bit fuzzy).
>
> Thanks again

Line 36 is not commented out. Please replace this:

MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36 IS HERE

With this:

'MyRS.Open mySQL, MyConn, 3 ' <-- LINE 36 IS HERE


Notice, there's an apostrophe (') at the start of the line.

-Chris Hohmann