Jag får inga resultat här även om min "kan ej vara korrekt" a kod som räknar antal träffar visar att det finns träffar, och jag vet att det ska finnas träffar.
Mvh.
<% Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=databas.mdb"
If Request.Form("city") <> "" Then
SQL = "SELECT * From star WHERE province LIKE '" & Request.Form("city")& "%' OR city LIKE '" & Request.Form("city")&_
"%' AND price BETWEEN '" & Request.Form("LPrice")& "%' AND '" & Request.Form("HPrice")&_
"%' AND bedr BETWEEN '" & Request.Form("beds")& "%' AND '" & Request.Form("bedsh")&_
"%' AND bathr BETWEEN '" & Request.Form("baths")& "%' AND '" & Request.Form("bathsh")&_
"%' AND htype LIKE '" & Request.Form("typ")&_
"%' AND term LIKE '" & Request.Form("rental")&_
"%' ORDER BY price DESC"
set rs=Connect.Execute(SQL)
mSQL = "SELECT COUNT(*) from star where city LIKE '%" & Request.Form("City") & "%' AND htype LIKE '" & Request.Form("typ")&_
"%' OR province LIKE '" & Request.Form("City")& "%' AND htype LIKE '" & Request.Form("typ")&_
"%' AND term LIKE '" & Request.Form("rental")& "%'"
set rs1=Connect.Execute(mSQL)
%>
Your
search returned
<B><% Response.write RS1(0) %></B>
<%
if not rs.eof then
do until rs.eof
%>
<table width="57%" border="0" cellspacing="0" cellpadding="0" height="18">
<tr>
<td width="17%">
<IMG SRC="picture5.gif" alt="" border="0">
</td>
<td width="27%"><font face="Verdana" size="1"><%=rs("City")%><BR><%=rs("Province")%></font></td>
<td width="12%"><font face="Verdana" size="1"><%=rs("bedr")%></font></td>
<td width="10%"><font face="Verdana" size="1"><%=rs("bathr")%></font></td>
<td width="14%"><font face="Verdana" size="1"><%=rs("htype")%></font></td>
<td width="20%"><font face="Verdana" size="1"> €<%=rs("price")%></font></td>
</tr>
</table>
<table width="57%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="line.gif" width="560" height="1"></td>
</tr>
</table>
<br>
<%rs.movenext
loop
end if
else
%>
Hittade inget.
<%
end if
rs.close
set rs=Nothing
Connect.close
set connect=nothing
%>
SQL = "SELECT * From star WHERE (province LIKE '" & Request.Form("city")& "%' OR city LIKE '" & Request.Form("city")&_
"%') AND price BETWEEN '" & Request.Form("LPrice")& "' AND '" & Request.Form("HPrice")&_
"' AND bedr BETWEEN '" & Request.Form("beds")& "' AND '" & Request.Form("bedsh")&_
"' AND bathr BETWEEN '" & Request.Form("baths")& "' AND '" & Request.Form("bathsh")&_
"' AND htype = '" & Request.Form("typ")&_
"' AND term = '" & Request.Form("rental")&_
"' ORDER BY price DESC"
kod:--------------------------------------------------------------------------------
where price between '7' and '10'
--------------------------------------------------------------------------------
är aldrig sant
Snälla förklara, inte bra på asp, jag ska byta ut koden i "count" så att den blir samma som i SQL.
SQL = "SELECT * From star WHERE (province LIKE '" & Request.Form("city")& "%' OR city LIKE '" & Request.Form("city")&_
"%') AND price BETWEEN " & Request.Form("LPrice")& " AND " & Request.Form("HPrice")&_
" AND bedr BETWEEN " & Request.Form("beds")& " AND " & Request.Form("bedsh")&_
" AND bathr BETWEEN " & Request.Form("baths")& " AND " & Request.Form("bathsh")&_
"' AND htype = '" & Request.Form("typ")&_
"' AND term = '" & Request.Form("sale")&_
"' ORDER BY price DESC"
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression '(province LIKE 'cannes%' OR city LIKE 'cannes%') AND price BETWEEN 0 AND 99000000' AND bedr BETWEEN 0 AND 999' AND bathr BETWEEN 0 AND 999' AND htype = 'Villa' AND term = 'Sale' ORDER BY price DESC'.
Ser ut att funka nu, tack!!!
Vilken kod ska jag ha för att få summan att visas rätt när det kommer till antal sökträffar.
mSQL = "SELECT COUNT(*) from star WHERE (province LIKE '" & Request.Form("city")& "%' OR city LIKE '" & Request.Form("city")&_
"%') AND price BETWEEN " & Request.Form("LPrice")& " AND " & Request.Form("HPrice")&_
" AND bedr BETWEEN " & Request.Form("beds")& " AND " & Request.Form("bedsh")&_
" AND bathr BETWEEN " & Request.Form("baths")& " AND " & Request.Form("bathsh")&_
" AND htype = " & Request.Form("typ")&_
"' AND term = '" & Request.Form("sale")& "%'"
set rs1=Connect.Execute(mSQL)
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in
query expression '(province LIKE 'cannes%' OR city LIKE 'cannes%')
AND price BETWEEN 0 AND 99000000 AND bedr BETWEEN 0 AND 999 AND bathr BETWEEN 0 AND
999 AND htype = Villa' AND term = 'Sale%''.
<% Set Connect = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=databas.mdb"
If Request.Form("sale") <> "" Then
SQL = "SELECT * From star WHERE (province LIKE '" & Request.Form("city")& "%' OR city LIKE '" & Request.Form("city")&_
"%') AND price BETWEEN " & Request.Form("LPrice")& " AND " & Request.Form("HPrice")&_
" AND bedr BETWEEN " & Request.Form("beds")& " AND " & Request.Form("bedsh")&_
" AND bathr BETWEEN " & Request.Form("baths")& " AND " & Request.Form("bathsh")&_
" AND htype = '" & Request.Form("typ")&_
"' AND term = '" & Request.Form("sale")&_
"' ORDER BY price DESC"
RS.Open SQL, Connect, 3, 3
%>