Information générale
Titre:
CursorAdater and Access Tables.
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.
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement