Søg på flere ord
Jeg KAN altså ikke få det til at funke...jeg vil kunne finde "Grim langbenet hund" hvis jeg søger på "Grim hund".Min kode:
<%
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/database/hovedmenu.mdb")
Set myCon = Server.CreateObject("ADODB.Connection")
myCon.Open strDSN
mode=Request("mode")
If mode="submit" Then
newstring = Request.Form("T1")
if len(newstring) = 0 Then
Response.Clear
Response.Redirect("forside.asp")
Else
newstring = Replace(newstring,"'","''")
End if
newsplit = split(newstring)
for i = lbound(newsplit) to ubound(newsplit)
SQL = "SELECT * FROM Produkter WHERE 'T1' LIKE '%" & newsplit(i) & "%'"
strSQL = strSQL & " OR (Varenr LIKE '%" & strKeyword & "%')"
strSQL = strSQL & " OR (Varenavn LIKE '%" & strKeyword & "%')"
strSQL = strSQL & " OR (Varebeskrivelse LIKE '%" & strKeyword & "%')"
strSQL = strSQL & " OR (Detaljemenu LIKE '%" & strKeyword & "%')"
next
Set rs = mycon.Execute(SQL)
If not (rs.BOF or rs.EOF) Then
Do while not rs.EOF
Varenr = rs("Varenr")
Varenavn = rs("Varenavn")
Varebeskrivelse = rs("Varebeskrivelse")
Detaljemenu = rs("Detaljemenu")
Response.Write "<li>" & Varenavn & "</li>"
rs.movenext
loop
Else
Response.write "Desværre!"
End if
End if
%>
Giver mig følgende resultater:
Desværre! - hvis jeg søger på alt andet end T, 1 eller T1
Alle varer - hvis jeg søger på T, 1 eller T1
Min form som ligger i en anden ASP-fil ser således ud:
<form method="post" target="prodframe" action="searchprod.asp?mode=submit"><p align="center"><input type="text" value="Søg produkt" onclick="this.value=''" name="T1" size="11" style="font-family: Verdana; font-size: 10 pt; font-weight: bold"><input type="submit" value="Søg" name="B1" size="10" style="font-family: Verdana; font-size: 9 pt; color: #000000"></p></form>