I have been trying to use the CursorAdapter to read the info from an Access table, but I am having no luck, I have attached the code, if somebody can tell me whats wrong with the code ?

DEFINE CLASS clsADOData AS CursorAdapter
PROCEDURE Init
This.DataSourceType = "ADO"

This.AddProperty("oConn",NEWOBJECT("ADODB.Connection"))
This.AddProperty("oRS" ,NEWOBJECT("ADODB.RecordSet"))

This.oConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\Dev\vfp8\NWind.mdb"
This.oConn.Open()

*-- Attach to The RecordSet
This.oRS.ActiveConnection = This.oConn

This.SelectCmd = "Select * From Customers"

This.CursorFill()
ENDPROC
ENDDEFINE

oAccess = CreateObject('clsADOData')
*-- Should have a cursor with the customers, but nothing ?


This code was modified from one that talks to SQL Server and that worked.

Thanks,
Simon.