Yo!
Slåss lite med en sökfunktion och vill att resultatet skall vara länkat och behöver få in en querystring på något sätt men har inte lyckats än. :/
Koden jag för tillfället använder är:
formulärt
<form method="post" action="sokexe.asp">
<input type="text" name="sok">
<p>
<input type="checkbox" name="vara" value="vara">vara
<br>
<input type="checkbox" name="fri" value="fritext">fritext
<p>
<input type="submit">
</form>
sök skriptet
<%
Dim Connect
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={MySQL};Server=localhost;Db=Webshop;UID=monty;pwd=;"
vara = "SELECT * FROM varor WHERE vara LIKE '" & Request.form("sok") & "%'"
fritext = "SELECT * FROM varor WHERE vara LIKE '%" & Request.form("sok") & "%'"
Set rsvara = Connect.Execute( vara )
Set rsfritext = Connect.Execute( fritext )
If request.form("vara") <> "" then
Response.Write "Följade vara hittades:" & "<br>"
If rsvara.eof Then
response.write "Varan finns inte!"
else
Do until rsvara.EOF
response.write rsvara("vara") & "<br>"
rsvara.Movenext
Loop
End If
elseif request.form("fri") <> "" then
response.write "I följade varor fanns " & "<b>" & request.form("sok") & "</b>" & ": " & "<br>"
If rsfritext.eof Then
response.write "Varan finns inte!"
else
Do until rsfritext.EOF
response.write rsfritext("vara") & "<br>"
rsfritext.Movenext
Loop
End If
End If
Connect.Close
%>
------------------
Forumledare, webForum