>Has anyone used the above ActiveX control, I just want to know how to bound it to one of my tables.
>
>Thanks
>Kev

lcTablePath = 'c:\mySamplesDir\testdata.dbc'
strCn =	[Data Provider = MSDASQL;]+;
  [DSN=Visual FoxPro Database;UID=;SourceDB=]+lcTablePath+[;]+;
  [SourceType=DBC;Exclusive=No;BackgroundFetch=Yes;Collate=Machine;Null=Yes;]+;
  [Deleted=Yes;]

oRecordset = CreateObject("adodb.recordset")
oConnection = CreateObject("adodb.connection")

With oConnection
  .Provider = "MSDataShape"
  .ConnectionString = strCn
  .Open
Endwith
With oRecordset
  .ActiveConnection = oConnection
  .Source = [ select * from customer order by company ]
  .Open
Endwith

With ThisForm.OleDataGrid
  .Datasource = oRecordset
  .RowDividerStyle = 4
  .Headlines = 4
  For ix = 0 to .Columns.Count-1
    With .Columns(ix)
      .Caption = .Caption + " Other lines of header"
      .DividerStyle = 4
    Endwith
  Endfor
  .Caption = "Customer Table"
Endwith

Cetin