Vad är felet?

<%
album=request.querystring("album")
SET Con = Server.CreateObject("ADODB.Connection")
Con.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../../databas.mdb")
SQLStmt = "SELECT * FROM album  where and album='"& album & "' " 
SET RecSET = Server.CreateObject("ADODB.Recordset")
RecSet.Open SQLStmt, Con, adOpenStatic, adLockOptimistic 
DO UNTIL RecSet.EOF
%>
<%=RecSet("bild")%> 
<br>
<%
RecSet.MoveNext 
LOOP
RecSet.Close
Con.Close
%>

koden ger detta felmedelande

ADODB.Recordset fel '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/intern/sadmin/bild.asp, rad 39

rad 39:RecSet.Open SQLStmt, Con, adOpenStatic, adLockOptimistic

------------------
/Dahlgren

"Det finns saker som man måste vara fackman för att inte förstå"