fejl i objConn.Open

Jeg er ved at lave et lille tilmeldingssystem, men får en fejl i linie 5 (objConn.Open)

...er der nogen der kan gennemskue det ???

<%
DIM objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath ("tilmelding.mdb")
objConn.Open

DIM objRS
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open "personer", objConn, , adLockOptimistic, adCmdTable

objRS.AddNew
objRS("sted") = Request.Form("sted")
objRS("navn_1") = Request.Form("navn_1")
objRS("navn_2") = Request.Form("navn_2")
objRS("navn_3") = Request.Form("navn_3")
objRS("navn_4") = Request.Form("navn_4")
objRS("email") = Request.Form("email")
objRS("adresse") = Request.Form("adresse")
objRS("postnr") = Request.Form("postnr")
objRS("town") = Request.Form("town")
objRS("organisation") = Request.Form("organisation")
objRS.Update

objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>

<p>
<%
DIM strName
strName = Request.Form("Name")
Response.Write strName
%>,</p>

<p>tak for din tilmelding</>