Populating Datagrid

[pokermagic]

I'm trying to populate a datagrid and am getting an error.

Dim dg As DataGrid
        Dim cn As ADODB.Connection
        Dim rs As ADODB.Recordset
        Dim strConnect As String
 
        dg = New DataGrid()
        rs = New ADODB.Recordset()
 
        strConnect = "DSN=Rebates;UID=;PWD="
        cn = New ADODB.Connection()
 
        cn.Open(strConnect)
        cn.CursorLocation = ADODB.CursorLocationEnum.adUseClient
        rs = New ADODB.Recordset()
        rs.Open("tempchecktable", cn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, ADODB.CommandTypeEnum.adCmdTable)
 
 
        dg.DataSource = rs
        dg.Refresh()
 
 
        rs.Close()
        cn.Close()

The error I'm getting is...

An unhandled exception of type 'System.Exception' occurred in system.windows.forms.dll

Additional information: Complex DataBinding accepts as a data source either an IList or an IListSource

Any suggestions

thanks.