I found a source code in MSDN (Article ID Q172592 'HOWTO: Open a Visual FoxPro Table for Read/Write') where was a source code about to open and work with a FoxPro database from Visual Basic using RDO object.

When I use VB6 I don't get any error message but Update after an Edit don't work (Update after an AddNew works well).

When I use VB5 I get an error message when Update after an Edit.

Run-time error '40002':
37000: [Microsoft][ODBC Visual FoxPro Driver]Syntax error.

(Update after an AddNew works well)
Code:
Option Explicit
Dim cn As New rdoConnection
Dim rs As rdoResultset
Dim SQL As String

Private Sub Command1_Click()
   rs.edit
End Sub

Private Sub Command2_Click()
   rs(1) = Text2.Text
   rs.Update
End Sub

Private Sub Command3_Click()
   rs.Close
   Set rs = Nothing
   cn.Close
   Set cn = Nothing
   Unload Me
End Sub

Private Sub Command4_Click()
   rs.MoveNext
   If Not (rs.EOF) Then
      Text1.Text = rs(0)
      Text2.Text = rs(1)
   Else
      rs.MoveLast
   End If
End Sub

Private Sub Command5_Click()
   rs.MovePrevious
   If Not (rs.BOF) Then
      Text1.Text = rs(0)
      Text2.Text = rs(1)
   Else
      rs.MoveFirst
   End If
End Sub

Private Sub Form_Load()
' Using a DSN-less connection to open a free table

cn.Connect = "SourceType=DBF;" _
         & "SourceDB=C:\Vfp\Samples\Data;" _
         & "Driver={Microsoft Visual FoxPro Driver}"

cn.CursorDriver = rdUseOdbc
cn.EstablishConnection "rdDriverNoPrompt"
SQL = "select * from customer"   
Set rs = cn.OpenResultset(SQL, rdOpenKeyset, rdConcurRowVer)
rs.MoveFirst
Text1.Text = rs(0)
Text2.Text = rs(1)
End Sub
Of course I select the RDO object from References option in Proyect menu. Boht VB5 and 6 are enterprise editions.

Can someone helps me? Any idea will be deeply appreciated.

Thaks!

Ulises