Flere søgekriterier i recordset
HejSidder og arbejder på en hjemmeside, hvor jeg er stødt på det problem, at jeg skal filtrere et recordset efter to forskellige kriterrie. Jeg benytter Dreamweaver MX til at skive de fleste koder, eftersom jeg ikke har lavet så mange sider i ASP. Problemet er blot, at man i Dreamweaver kun kan angive ét søgekriterie. Har roddet lidt med det, og er kommet frem til noget jeg skulle mene ville fungere... Men! det gør det ik.
Funtionen af recordsettet skal være:
Recordsettet sortere i tabellen varerramme i databasen:
- feltnavnet "varenr" skal være en del af URL parametret "rammeid"
- feltnavnet "størrelse" skal være lig URL parametret "rammestorrelse"
Jeg får fejlen:
Microsoft JET Database Engine (0x80040E14)
Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket "størrelse = '200x300' '' AND WHERE varenr LIKE '%90A-001-01%'".
/jonson/restst2.asp, line 28
kan ikke helt komme på hvad problemet er.
Linie 28 er: rammervare.Open()
men fejlen må ligge kommandoen: rammervare.Source (tror jeg)
Håber virkelig der er nogle der kan hjælpe, for det her er ved at gå mig på nerverne.
<!--#include file="Connections/db.asp" -->
<%
Dim rammervare__MMColParam
rammervare__MMColParam = "1"
If (Request.QueryString("rammestorrelse") <> "") Then
rammervare__MMColParam = Request.QueryString("rammestorrelse")
End If
%>
<%
Dim rammervare__MMColParam1
rammervare__MMColParam1 = "1"
If (Request.QueryString("rammeid") <> "") Then
rammervare__MMColParam1 = Request.QueryString("rammeid")
End If
%>
<%
Dim rammervare
Dim rammervare_numRows
Set rammervare = Server.CreateObject("ADODB.Recordset")
rammervare.ActiveConnection = MM_db_STRING
rammervare.Source = "SELECT * FROM varerramme WHERE størrelse = '" + Replace(rammervare__MMColParam, "'", "''") + "' AND WHERE varenr LIKE '%" + Replace(rammervare__MMColParam1, "'", "''") + "%'"
rammervare.CursorType = 0
rammervare.CursorLocation = 2
rammervare.LockType = 1
rammervare.Open()
rammervare_numRows = 0
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<p><%=(rammervare.Fields.Item("varenr").Value)%> </p>
<p><%=(rammervare.Fields.Item("størrelse").Value)%> </p>
<p><%=(rammervare.Fields.Item("pris").Value)%></p>
<p> </p>
</body>
</html>
<%
rammervare.Close()
Set rammervare = Nothing
%>
På forhånd tak.
Hilsen Sigurd
