I am rewriting an existing bad Foxpro program in VB, and it is nearly
complete.  I want to give the user the option to load client data from the
foxpro database as needed, many clients will never be used.  So I have a
command button that lets them search for the client in the old database,
but something isn't quite right when I open it as stated below.

I have included the fragment that I think is the problem,  the OpenDataBase
and get a error 3219 and I have included the definition on the error.  I
have played around with the DBreadonly and the locking enough so I don't
think it is the problem, but whatever help you can give me would be
appreciated.

Dim FoxDataDB As Database, strsql As String
Dim OldRecords As Recordset, temClientNumber As String
"I have tried all combinations of true false

Set FoxDataDB = OpenDatabase( _
                       "C:\newtrans\trans.dbc", _
                       False, True, "FoxPro dbc;")
  strsql = "Select * from Clients where  Clientno = '" & temClientNumber &
"' ;"
 Set OldRecords = FoxDataDB.OpenRecordset(strsql, dbOpenSnapshot,
dbReadOnly)
  If OldRecords.EOF = True And OldRecords.BOF = True Then
    MsgBox "This client number not found in the FoxPro Database"
    Exit Sub
  End If
  ClearClientData
  OldRecords.MoveFirst
  With OldRecords
    MedNumber.Text = !MediCaid
    LName.Text = !Last_Name
    FName.Text = !first_Name
    If !Sex = 0 Then
      Male.Value = True
      Female.Value = False
    Else
      Female.Value = True
      Male.Value = False
    End If
    Minit.Text = !midd_Init
    Street(0).Text = !St_Number & " " & !Street
   End With

End Sub

Possible causes:

     You tried to write to a read-only property. See the Help topic for the
property to determine whether it is read/write.
     You tried to use a method or property on a type of Recordset object that
the method or property doesn't apply to. See the Recordset object Summary
topic to determine which methods and properties apply to a given type of
Recordset object.

     You tried to append a property to a Properties collection of an object
that doesn't support user-defined properties.
     You tried to use the Update method on a read-only Recordset object.

Unless someone knows something that I would love to know, it doesn't seem
possible to pass Sql to an OpenRecordSet, either when it is not a Jet
database or is a FoxPro don't know which yet.  Able to open and use the
Database as long as I am willing to take it total, I can live with that,
but does slow things down.

I have only been working with JET, ODBC, and some SQL systems.  It's been a
while since I touched DBASE(foxpros father), CLIPPER(it's cousin), or any
thing related.

Steve