I cannot set MSFlexGrid datasource by code.

Hi everyone,

I try to simply set the MSFlexGrid datasource property and I get a 91 error : Object variable not defined.

I know that this question has been already asked (I made the search in EE but it is impossible for me to access the answer since I did not subscribe).

I made the search on google : but impossible to find the question I have seen in EE. (could you explain that to me).

Here is my code :

'**************************************************

    Dim cn As ADODB.Connection
    Dim rs As ADODB.Recordset

    Set cn = New ADODB.Connection

    cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Program Files\FarPointSpread\Samples\ActiveX\VB6\Demo Overview\common\Nwind.mdb;Persist Security Info=False"

    cn.Open

    Set rs = New ADODB.Recordset

    rs.Source = "SELECT Customers.CompanyName, Orders.OrderID, Orders.OrderDate, Products.ProductName " & _
            "FROM ((Customers INNER JOIN Orders ON Customers.CustomerID = Orders.CustomerID) " & _
            "INNER JOIN [Order Details] ON Orders.OrderID = [Order Details].OrderID) INNER JOIN Products ON [Order Details].ProductID = Products.ProductID;"

    Set rs.ActiveConnection = cn

    rs.Open
   
   Set flex.DataSource = rs       <-----------------  Error 91

'***********************************************************

Thanks for your help.

laurent_diep.