Søgning af data fra to tabeller
Jeg er igang med at lave en søgefunktion til min hjemmeside, og i den forbindelse skal man kunne finde de oplysninger, som jeg har i min database. Jeg har dog flere tabeller for flere forskellige slags informationer, men brugeren skal gerne kunne finde informationer fra alle tabellerne på sin søgning. Derfor vil jeg gerne spørge dig, om hjælp. Jeg har foreløbig de nedenstående kode, hvor man kan finde informationer fra en enkelt tabel.<% Response.Buffer = True %>
<html><head>
<title>Søgeresultat</title>
</head><body>
<%
' Henter værdien fra soeg.htm
strKeyword = Trim(Request.Form("Keyword"))
If Len(strKeyword) = 0 Then
' Hvis der ikke er skrevet i feltet
Response.Clear
Response.Redirect("search.htm")
Else
' Hvis der er skrevet i feltet
strKeyword = Replace(strKeyword,"'","''")
End If
' Opbygger en dynamisk SQL streng
strSQL = "SELECT indhold, forfatter, id FROM tabel WHERE"
strSQL = strSQL & " (indhold LIKE '%" & strKeyword & "%')"
strSQL = strSQL & " OR (forfatter LIKE '%" & strKeyword & "%')"
'Opretter forbindelse til databasen!
' Skaber et recordset udfra SQL strengen
Set rs = myConn.Execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
' Hvis der er fundet poster på søgningen
Do While Not rs.EOF
forfatter = rs("forfatter")
id = rs("id")
Response.Write(forfatter)
rs.MoveNext
Loop
Response.Write "</table>"
Else
' Hvis der ikke er fundet poster på søgningen
Response.Write "<p>Der er ikke fundet noget på denne søgning</p>"
End If
' Rydder op efter os
myConn.Close
Set myConn = Nothing
%>
</body></html>
