RE: Can't update a Access 2002 form's ado recordset through odbc

[Osvaldo Sommer]

Francois:

I work with msaccess 2000 and mysql 4.0.12 and Works really good. You need
to put a column type timestamp so access can check the row has not been
modified.

There are several other threds with this problem, check them out.

Osvaldo Sommer

-----Mensaje original-----
De: RAPPAZ Francois [mailto:francois.rappaz@stripped] 
Enviado el: Viernes, 24 de Agosto de 2007 12:41 a.m.
Para: myodbc@stripped
Asunto: Can't update a Access 2002 form's ado recordset through odbc


According to Miscrosoft docs at
http://support.microsoft.com/kb/281998/EN-US/, it seems that a form's ado
recordset with access 2002 should be updatable using ODBC. 

However, with a form in a mdb file with the access 2002 format, I still have
the "recordset is not updatable"  message ... Is there anyone who have
managed this ?

I use mysql and Connector/ODBC 3.51.

I tried the following code on AfterUpdate of a text control: sSearch is a
string with the words being searched for.

Dim Cn As New ADODB.Connection
Dim rec As New ADODB.Recordset
Dim  strConnection As String, sql as String

strConnection =
"ODBC;DSN=mysql_dokpe_i01_adm;UID= ... ;PWD= ... ;DATABASE=dokpe_i01"
     With Cn
      .Provider = "MSDASQL"
      .Properties("Data Source").Value = strConnection
      .Open
   End With

    sql = "select concat(nofm, '') as nofm, ti, tri, issn, ex, ad,
concat(noed,'') as noed, dom from jrn where match(ti) against(" &
Chr(39) & sSearch & Chr(39) & " in boolean mode)"
    rec.CursorLocation = adUseClient
    rec.Open sql, Cn, adOpenKeyset, adLockOptimistic

    If Not rec.EOF Then

        Set Me.Recordset = rec

    Else
        MsgBox "No data"
    End If
End If
Set rec = Nothing
Set Cn = Nothing

TIA
François Rappaz


-- 
MySQL ODBC Mailing List
For list archives: http://lists.mysql.com/myodbc
To unsubscribe:
http://lists.mysql.com/myodbc?unsub=1



-- 
No virus found in this incoming message.
Checked by AVG Free Edition. 
Version: 7.5.484 / Virus Database: 269.12.6/971 - Release Date: 24/08/2007
02:59 p.m.