vfpoledb.1 and updating using ADO & VB6

From: workpef (anonymous_at_discussions.microsoft.com)
Date: 05/26/04


Date: Wed, 26 May 2004 09:36:06 -0700

All,
   I've read through several threads regarding vfpoledb.1 and problems updating FP data in a recordset. I've got the same problem and have tried all the suggestions. Alas, to no avail. See Code below:

        currentEmp
        currentComp
        
        qry = "select p_empno, p_company,p_hstreet1,p_hstreet2, p_hcity,p_hzip, p_anychang " & _
              " from hrpersnl " & _
              " where p_empno = '" & currentEmp & "' " & _
              " and p_company = '" & currentComp & "'"

        ' This is OK
        cn.Open "provider=vfpoledb.1; Mode=ReadWrite|Share Deny None; data source=H:\reconcile\updating\"
        ' This works --> the data is there. The hardcoding of cursor and locktypes is from a post here
        trg.Open qry, cn, 3, 3
        
        ' upd is false
        upd = trg.Supports(adUpdate)

        ' As you would guess, this throughs an error
        trg.Fields("p_hstreet1") = src.Fields("adp")

Any Ideas?

pf

BTW-> the dbf file's OS "read only" attribute is false