.sökning och querystring

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 
%>