>Hi All,
>
>I'm creating an app using Crystal Reports 8.5 and VFP 7. Can I use VFP's cursor to fill data into a report ?
>There's a sample code in the CR's developers guide, but it's written in VB. Can anyone tell me the equivalent VFP code ?
>
>Dim CRXReport as New CrystalReport1
>Dim RS as New ADODB.Recordset
>
>rs.open "SELECT * from Customer",DSN=Xtreme Sample Database;",adOpenKeyset
>CRXReport.Database.SetDataSource rs
>
>
>TIA,
>
>Deddy

Would translate as :

#define adOpenKeySet 1
CRXReport = NewObject("CrystalReport1")
RS = NewObject("ADODB.Recordset")

rs.open( "SELECT * from Customer","DSN=Xtreme Sample Database;",adOpenKeyset)
CRXReport.Database.SetDataSource( rs )

Cetin