Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 300
  • Last Modified:

Too few parametersin RS

Hi

I have spenat ages putting together this query string in Access. Now I have it in the Recordset window in Dreamweaver I keep getting the good old:

Too few parameters expected one - response. I've tried various ways of rearranging it, taking out some of accesses brackets that I have done before. But can't solve this one.

Any Ideas please?

Thanks
<%
Dim RsProdsGen__ParamAgeFrom
RsProdsGen__ParamAgeFrom = "1"
If (Request.Form("frmagefrm") <> "") Then 
  RsProdsGen__ParamAgeFrom = Request.Form("frmagefrm")
End If
%>
<%
Dim RsProdsGen__ParamAgeTo
RsProdsGen__ParamAgeTo = "100"
If (Request.Form("frmageto") <> "") Then 
  RsProdsGen__ParamAgeTo = Request.Form("frmageto")
End If
%>
<%
Dim RsProdsGen__ParamGen
RsProdsGen__ParamGen = "b"
If (Request.Form("frmgen") <> "") Then 
  RsProdsGen__ParamGen = Request.Form("frmgen")
End If
%>
<%
Dim RsProdsGen__ParamPriceFrom
RsProdsGen__ParamPriceFrom = "10"
If (Request.Form("frmpricefrm")  <> "") Then 
  RsProdsGen__ParamPriceFrom = Request.Form("frmpricefrm") 
End If
%>
<%
Dim RsProdsGen__ParamPriceTo
RsProdsGen__ParamPriceTo = "30"
If (Request.Form("frmpriceto")   <> "") Then 
  RsProdsGen__ParamPriceTo = Request.Form("frmpriceto")  
End If
%>
<%
Dim RsProdsGen
Dim RsProdsGen_cmd
Dim RsProdsGen_numRows
 
Set RsProdsGen_cmd = Server.CreateObject ("ADODB.Command")
RsProdsGen_cmd.ActiveConnection = MM_MagicalRooms_STRING
RsProdsGen_cmd.CommandText = "SELECT tblProducts.ProdID, tblProducts.ProdName, Min(tblPrice.Price) AS MinOfPrice, Min(tblPrice.Price) AS MinOfPrice1, Count(tblPrice.Price) AS CountOfPrice, tblImages.Image FROM (tblProducts LEFT JOIN tblImages ON tblProducts.ProdID = tblImages.ProdID) LEFT JOIN tblPrice ON tblProducts.ProdID = tblPrice.PriceProdID WHERE tblProducts.ProdAgeFrom <= ? AND tblProducts.ProdAgeTo<= ? AND tblProducts.ProdGender =  ? Or tblProducts.ProdGender ="u" AND tblImages.Featured=True GROUP BY tblProducts.ProdID, tblProducts.ProdName, tblImages.Image HAVING  (Min (tblPrice.Price)) >= ? AND (Min (tblPrice.Price))<= ?" 
RsProdsGen_cmd.Prepared = true
RsProdsGen_cmd.Parameters.Append RsProdsGen_cmd.CreateParameter("param1", 5, 1, -1, RsProdsGen__ParamAgeFrom) ' adDouble
RsProdsGen_cmd.Parameters.Append RsProdsGen_cmd.CreateParameter("param2", 5, 1, -1, RsProdsGen__ParamAgeTo) ' adDouble
RsProdsGen_cmd.Parameters.Append RsProdsGen_cmd.CreateParameter("param3", 200, 1, 255, RsProdsGen__ParamGen) ' adVarChar
RsProdsGen_cmd.Parameters.Append RsProdsGen_cmd.CreateParameter("param4", 5, 1, -1, RsProdsGen__ParamPriceFrom) ' adDouble
RsProdsGen_cmd.Parameters.Append RsProdsGen_cmd.CreateParameter("param5", 5, 1, -1, RsProdsGen__ParamPriceTo) ' adDouble
 
Set RsProdsGen = RsProdsGen_cmd.Execute
RsProdsGen_numRows = 0
%>

Open in new window

0
swordfishsoup
Asked:
swordfishsoup
1 Solution
 
cquinnCommented:
This error is more often than not caused by a misspelling of a field or table name
0
 
swordfishsoupAuthor Commented:
No it was th "u" change this to ParamUni and set the value to u and works fine.

Thanks anyway - must be a dreamweaver quirk
0
 
Computer101Commented:
Closed, 500 points refunded.
Computer101
EE Admin
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Easily Design & Build Your Next Website

Squarespace’s all-in-one platform gives you everything you need to express yourself creatively online, whether it is with a domain, website, or online store. Get started with your free trial today, and when ready, take 10% off your first purchase with offer code 'EXPERTS'.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now