Søgning med MySQL
Hej eksperter....jeg er ved at lave en søgefunktion, baseret på en MySQL databse. men, når jeg eksempelvis laver en søgning på paging med bestem kategori, og en søgning på samme men i alle kategorier, giver sidst nævnte mindre forekomster en første. hvordan kan det være ?
koden er her:
<%
keyword = request.form("s")
keyword = Replace(keyword, "'", "''")
keyword = Replace(keyword, "||", "|")
strkat = request.form("kat")
%>
<%
'Først skal vi have antallet af poster
if request.form("kat") = "alle" then
strSQL = "SELECT COUNT(*) AS records FROM stlinks WHERE mainkat = '" & strkat & "' AND"
strSQL = strSQL & " (titel LIKE '%" & Keyword & "%')"
strSQL = strSQL & " OR (beskrivelse LIKE '%" & Keyword & "%')"
Set objRs = conn.execute(strSQL)
else
strSQL = "SELECT COUNT(*) AS records FROM stlinks WHERE"
strSQL = strSQL & " (titel LIKE '%" & Keyword & "%')"
strSQL = strSQL & " OR (beskrivelse LIKE '%" & Keyword & "%')"
Set objRs = conn.execute(strSQL)
end if
intRecords = int(objRs("records")-1)
objRs.Close
Set objRs = Nothing
'Variabler til query´et
intPage = Request.QueryString("page")
if intPage = "" OR not isNumeric(intPage) then
intPage = int(1)
else
intPage = int(intPage)
end if
intPageSize = int(5)
intStart = intPage*intPageSize
intStart = intStart-intPageSize
intPages = int(intRecords/intPageSize)+1
if request.form("kat") = "alle" then
strSQL = "SELECT ID, titel, url, beskrivelse, mainkat, subkat FROM stlinks WHERE "
strSQL = strSQL & " (titel LIKE '%" & Keyword & "%')"
strSQL = strSQL & " OR (beskrivelse LIKE '%" & Keyword & "%')"
set objrs = conn.execute(strSQL)
else
strSQL = "SELECT ID, titel, url, beskrivelse, mainkat, subkat FROM stlinks WHERE mainkat = '" & strkat & "' AND"
strSQL = strSQL & " (titel LIKE '%" & Keyword & "%')"
strSQL = strSQL & " OR (beskrivelse LIKE '%" & Keyword & "%')"
set objrs = conn.execute(strSQL)
end if
if objRs.EOF or objRs.BOF then
Response.Write "Ingen poster"
antal = "0"
else
antal = "1"
Do until objRs.EOF
%>
håber i kan / vil hjælpe.
mvh.
Questis
