where title?
jeg får fejl i denne kode....:<%
url = Request.QueryString(\"title\")
dim strDSN, Conn
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"db.mdb\")
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open strDSN
Set RS = conn.Execute(\"select * from toplist where title =\" & url)
if cdate(request.cookies(\"out\")(cstr(url))) < DateAdd(\"d\",-6,now()) then
out=cInt(rs(\"out\"))+1
Set RS2 = conn.Execute(\"UPDATE toplist SET out = \" & out & \" Where title =\" & url)
response.cookies(\"out\").expires=DateAdd(\"m\",1,now())
response.cookies(\"out\").domain = \"www.test.dk\"
response.cookies(\"out\")(cstr(url))= now()
End If
jwredir = RS(\"url\")
RS.Close
set rs= nothing
conn.Close
set conn = nothing
Response.Redirect (jwredir)
%>
fejl:
Microsoft OLE DB Provider for ODBC Drivers error \'80040e14\'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression \'title =\'.
/toplist/in.asp, line 10
