Forbindelse til database fejl

Hej. Jeg får denne fejl:

Error Type:
ADODB.Connection.1 (0x800A0BB9)
The application is using arguments that are of the wrong type, are out of acceptable range, or are in conflict with one another.
/nyheder.asp, line 5

i filen:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("db1.mdb")
Conn.Open DSN


strSQL = "Select * From nyheder"
Set rs = Conn.Execute(strSQL)

Do
Response.write rs("Overskrift") & "<br>" & rs("Indhold") & "<br>" & "Skrevet af " & rs("Forfatter") & rs("Tidspunkt")
rs.movenext

Loop while Not rs.EOF

%>

hvad gør jeg forkert.
Tak på forhånd ^^