BUG: Access Violation Occurs When You Open a Recordset with a Different Lock Type

If you close a recordset, and then reopen the recordset with a different lock type, an access violation may occur.

There is no known workaround for this problem.

Microsoft has confirmed that this is a bug in the Microsoft products that are listed at the beginning of this article.

Steps to Reproduce Behavior

1. Create a new Visual Basic project. Form1 is created by default.
2. Double-click Form1, and then paste the following code in the Form_Load event:

       Dim cn As New ADODB.Connection
       Dim rs As New ADODB.Recordset
       cn.Open "DSN=Pubs;UID=sa;PWD=;" ' Replace this connection string with one valid on your system, pointing to the Pubs sample database.
       Set rs.ActiveConnection = cn
       rs.CursorLocation = adUseClient
       rs.Open "select * from authors", , adOpenDynamic, adLockOptimistic
       rs.Close
       rs.Open "select * from authors", , adOpenDynamic, adLockReadOnly
   					

3. Run the project.