OLE fel

Hej... Vad har jag egentligen gjort för fel när jag får detta meddelande?

================================
Microsoft OLE DB Provider for ODBC Drivers error '80040e21'

Multiple-step OLE DB operation generated errors. Check each OLE DB status value, if available. No work was done.

/oskar/1office/nyhet_store.asp, line 22
==================================

Koden ser ut så här:
==================================
<%

If Session("nivo") => 1 Then
'Använadren har behörighet
Else
Response.Redirect("login.asp")
End If

Set Connect=server.CreateObject("adodb.connection")
Set RS = Server.CreateObject("ADODB.Recordset")
Connect.Open "DRIVER={Microsoft Access Driver (\*.mdb)}; DBQ=" & server.mappath("hemligdatabas.mdb")

If Session("id") = "" Then
	Kolla = "SELECT \* FROM Nyheter"
	RS.Open Kolla, Connect, 3, 3
	RS.AddNew
	Titel = Session("titel")
        Ingress = Cstr(Replace(Session("ingress"), vbCrLf, "\<br\>"))
	Nyhet = Cstr(Replace(Session("nyhet"), vbCrLf, "\<br\>"))
	Forfattare = Session("forfattare")
	RS("Titel") = Titel
	RS("Ingress") = Ingress ' RAD 22
	RS("Nyhet") = Nyhet
	RS("Forfattare") = Forfattare
	RS("Datum") = Date
	RS.Update
	URL = "controls.asp?mess=1_1"
Else
	Kolla = "SELECT \* FROM Nyheter WHERE ID = " & Session("id")
	RS.Open Kolla, Connect, 3, 3
	RS("Titel") = Session("titel")
	RS("Ingress") = Replace(Session("ingress"), vbCrLf, "\<br\>")
	RS("Nyhet") = Replace(Session("nyhet"), vbCrLf, "\<br\>")
	RS("Forfattare") = Session("forfattare")
	RS.Update
	URL = "controls.asp?mess=2_2"
End If

RS.Close	
Connect.Close

Session("titel") = ""
Session("ingress") = ""
Session("nyhet") = ""
Session("forfattare") = ""
Session("id") = ""

Set Connect = Nothing
Set RS = Nothing

Response.Redirect(URL)

%>
==========================

[Redigerat av dekt den 20 sep 2001]

[Redigerat av dekt den 20 sep 2001]