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

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@unifr.ch] Enviado el: Viernes, 24 de Agosto de 2007 12:41 a.m. Para: myodbc@lists.mysql.com
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.

Do you need help?

In addition to our free technical library, Pantek provides professional IT services to companies who utilize Open Source software: Learn more about Pantek's Technical Support offerings Place an order for 24/7/365 Technical Support here Learn more about Pantek, who we are, and what we do Chat with a Live Operator Related lists.mysql.com Links announce benchmarks bugs certification cluster commits dotnet gui-tools internals java maxdb myodbc mysql mysqldoc packagers perl plusplus replication win32 Request more information about Pantek

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

    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

Do you need more help?

In addition to our free technical library, Pantek provides professional IT services to companies who utilize Open Source software: Learn more about Pantek's Technical Support offerings Place an order for 24/7/365 Technical Support here Learn more about Pantek, who we are, and what we do Chat with a Live Operator Related lists.mysql.com Links announce benchmarks bugs certification cluster commits dotnet gui-tools internals java maxdb myodbc mysql mysqldoc packagers perl plusplus replication win32 Request more information about Pantek

        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=osommerh@intelnett.com

--

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.

--

MySQL ODBC Mailing List
For list archives: http://lists.mysql.com/myodbc To unsubscribe: http://lists.mysql.com/myodbc?unsub=lists@pantek.com Received on Sat Aug 25 10:56:16 2007