Vedr Søgefunktion
Jeg har fulgt med i spm http://www.eksperten.dk/spm/125300 og har selv brugt koden, og det virker næsten efter hensigten.strValue er hentet fra en formular i eksemplet: opland \"Mariager Fjord\"
Der bliver lavet et array udfra mellemrum i strValue, og i ovenstående tilfælde bliver det:
opland, \"Mariager, Fjord\"
Hvordan får jeg koden til at opfatte alt mellem gåseøjnene som et element, d.v.s: opland, Mariager Fjord
<%
strValue =\"opland \"\"Mariager Fjord\"\"\"
\'strValue = Request(\"searchword\")
strAryWords = Split(strValue, \" \")
Dim intCol
For intCol = 0 to UBound(strAryWords)
firstSQL1 = firstSQL1 & \" (Oprettet LIKE \'%\" & strAryWords(intCol) & \"%\')\"
firstSQL1 = firstSQL1 & \" OR (Titel LIKE \'%\" & strAryWords(intCol) & \"%\')\"
firstSQL1 = firstSQL1 & \" OR (Udgivelse LIKE \'%\" & strAryWords(intCol) & \"%\')\"
firstSQL1 = firstSQL1 & \" OR (PubResume LIKE \'%\" & strAryWords(intCol) & \"%\')\"
firstSQL1 = firstSQL1 & \" OR (pdf LIKE \'%\" & strAryWords(intCol) & \"%\')\"
firstSQL1 = firstSQL1 & \" OR (Emnegruppe LIKE \'%\" & strAryWords(intCol) & \"%\')\"
if intCol < UBound(strAryWords) then
firstSQL1 = firstSQL1 + \" OR \"
end if
Next
firstSQL = \"SELECT * FROM samlet WHERE \"&firstSQL1&\";\"
%>
