Från TXT till DB

<% 
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("spelare.mdb") 

Set rs = Server.CreateObject("ADODB.Recordset")
Query = "SELECT * FROM play"
rs.open Query, Connect, AdLockOptimistic
%>
<%
rs.AddNew
rs("namn") = Request.Form("namn")
rs("alder") = Request.Form("alder")
rs("nr") = Request.Form("nr")
rs("moder") = Request.Form("moder")
rs("mat") = Request.Form("mat")
rs("dryck") = Request.Form("dryck")
rs("film") = Request.Form("film")
rs("skadis") = Request.Form("skadis")
rs("tv") = Request.Form("tv")
rs("resa") = Request.Form("resa")
rs("lag") = Request.Form("lag")
rs("spelare") = Request.Form("spelare")
rs("hobby") = Request.Form("hobby")
rs("annars") = Request.Form("annars")
rs.Close
%>

Ändrade lite i koden, nu ser min kod ut såhär..
Och jag får felet >

Feltyp:
ADODB.Recordset (0x800A0CB3)
Aktuellt Recordset kan inte uppdateras. Det kan bero på en begränsning av providern eller den valda låstypen.
/vimmerby/alag/databas/gbproc.asp, line 17

.. Line 17 är min rs.AddNew ..
Vad är fel ? *dum*

Martin