hjalp m

Hej

Er igang med at lave en search funktion, men har problemer når jeg vil udskrive dette:

Response.write "<"a href=""download.asp?id=" & rs("iddl") & ">" & rs("mærke") & "</a><Br>"

jeg får denne fejl:

Error Type:
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
/find.asp, line 22, column 18


Browser Type:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)

Page:
POST 6 bytes to /find.asp

POST Data:
find=1

Time:
Thursday, December 02, 2004, 12:30:10 PM

hele mit script ser således ud:

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=XXXXXX;Database=Database;Option=3;User=XXXX;Password=XXX;"
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=""http://tmp.blacknet.dk/download.asp?id=" & rs("iddl") & ">" & rs("mærke") & "</a><Br>"
rs("iddl") & ">" & rs("mærke") &  "</a><Br>"
rs.MoveNext ' Movenext
loop
set Rs = nothing
set Conn = nothing


%>