Database connection

Hejsa.
Jeg har arbejdet på dette script, men er kørt fast. Jeg kan ikke få kontakt til databasen, den bliver hele tiden ved med at lave fejlmeddelelse på linien:
Conn.Open DSN


Scriptet er som følgende:
<%
strMode = Request.QueryString("mode")
'tempConn = "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("kalender.mdb") & ";UID=admin;PWD=;"
'tempConn = "Data Source=d:\home\domænenavn\db\kalender.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"

' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("../../../db/kalender.mdb")
Conn.Open DSN

' SQL forespørgsel
strSQL = "Select * from Januar Order By Dato"
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)

' Gennemløb Recordset (rs) med en løkke
Do
%>


Jeg har webhotel hos Azero.dk
På computeren har jeg følgende 2 mapper til websitet

Mappe 1
Database>kalender.mdb

Mappe 2
www> arrangement> kalender> Her kommer alle siderne


Håber der er en som lige kan se hvad der er galt.