FIX: Setting Rst.ActiveConnection to a Recordset Causes GPF

MORE INFORMATION

It is not recommended to set the ActiveConnection property to a recordset object. It is recommended that the Recordset's ActiveConnection property be set to an actual Connection object or connection string. The proper behavior is for Visual Basic to respond with a trappable error because ActiveX Data Objects (ADO) is expecting a connection string or object.

Steps to Reproduce Behavior

1. Open a Standard .exe project in either Visual Basic 5.0 or Visual Basic 6.0.
2. From the Project menu, choose References, and then select the Microsoft ActiveX Data Objects 2.0 or 1.5 Library.
3. Paste the following code into the form and enter the correct data source in the ConnectionString parameter of the connection object:

         Option Explicit
         Dim cnn As ADODB.Connection
         Dim rst As New ADODB.Recordset
   
         Private Sub Form_Load()
         Set cnn = New ADODB.Connection
         cnn.Provider = "sqloledb"
         cnn.Open "Data Source=<Your Server>;Initial Catalog=pubs;","sa",""
   
         rst.ActiveConnection = rst 'This causes GPF or Dr. Watson error.
         rst.Open "Select * from Authors"
         End Sub
   					

4. Run the project.