Nogen der kan se en fejl?

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("db/masterz.mdb")

Conn.Open DSN

strSQL = "Select  * from Citat order by id desc"

Set rs = Conn.Execute(strSQL)

Do

%>

<tr>
<td bgcolor="white" valign="top"><p><i><%=rs("tekst")%></i></p></td>
</tr>
<tr>
<td bgcolor="white" valign="top"><font face="verdana" size="1" color="black"><b><%= rs("sagt_af") %></b></font></td>
</tr>

<%
rs.MoveNext

Loop While Not rs.EOF

Conn.Close
Set Conn = Nothing
%>


Den burde være let men den melder fejl på denne linie:

Conn.Open DSN

jeg forstår det ikke... Det må være måden jeg åbner dben på.

Nogen der kan hjælpe....?!?!?!