closing recordset generates exception

Hi,

Hi want to create a new record within a Try Catch block using the
following code

Function Process() As Boolean
Dim rsAttendance As New clsMSRecordSet
Dim rs As ADODB.Recordset
rs = rsAttendance.recordset
Try
rs.Open("AANWREG", Conn)
rs.AddNew()

rs.Fields("ADM#").Value = mfldAttAdmID
rs.Fields("CURSUS#").Value = mfldAttCourseID
rs.Fields("EVENEM#").Value = mfldAttEventID
rs.Fields("DEELNEM#").Value = mfldAttParticipentID
rs.Fields("EV_PLN#").Value = mfldAttPlanItemID

rs.Update()
Process = True
Catch ex As System.Runtime.InteropServices.COMException
'TO DO : logging exception to xml file
Finally
If (rs.State = ADODB.ObjectStateEnum.adStateOpen)
Then rs.Close() < - generating exception
rsAttendance = Nothing
End Try
End Function

When the update fails I get a descriptive message but I an other error
"operation not allowed in this context" is thrown up when the
rs.Close() is issued. Any idea why is this happening?
I'm using VB.NET and Visual Studio 2005

Regards,

Hans van de Laar

"Hans van de Laar" <hansvandelaar.replace.at.micros.nl> wrote in message

> Hi,
>
> snipped
>
> I'm using VB.NET and Visual Studio 2005
>

Wrong group. This one is for Visual Basic (VB6 and lower) and DAO. Neither
of which are you using.

You can find a complete list of managed (dotNet) newsgroups here:
http://msdn.microsoft.com/subscriptions/managednewsgroups/list.aspx