Min MySql Søger virker ikke, nogle forslag?

Hey er ved at lave en side der søger ie n mysql database, men kan ikke rigtigt få det til at virke, resultatet bliver altid at den intet finder, selv om jeg søger på noget der er der.

Search Results for <% Response.Write Request.Form("find") %>

<br><Br>
<%

dim connect

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={MySQL ODBC 3.51 Driver};Server=blacknet.dk;Database=Database;Option=3;User=sjov;Password=test;"
Set Rs = Server.CreateObject("ADODB.Recordset")


dim SQL

SQL =  "SELECT * from product where serial like " & "'*" & Request.Form("find") & "*'"


Rs.Open SQL, conn, 1,3                 

do while not rs.EOF


Response.Write "<a href=" + rs("serial") + ">" + rs("mærke") +  "</a><Br>" 
rs.MoveNext ' Movenext
loop
set Rs = nothing
set Conn = nothing


%>

nogle de rhar nogle forslag til hva der kan være galt?