In ACCESS Datenbank schreiben geht nicht.

Zugriff, Engines, Konvertierung. Von ADS über DBF bis zu SQL.

Moderator: Moderatoren

Antworten
Bernd Reinhardt
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 159
Registriert: So, 16. Apr 2006 11:12
Wohnort: Öhringen

In ACCESS Datenbank schreiben geht nicht.

Beitrag von Bernd Reinhardt »

Hallo.
Ich habe mich mal etwas mit ACCESS beschäftigt und das Beispiel von Alaska (ODBC) verwendet.
Access 2007 ist auf dem Rechner installiert.
Den ODBC-Treiber habe ich angelegt.
Ich kann die Tabelle auslesen, der Qbrowse funktioniert, aber ich kann keine Daten schreiben.
Im ODBC-Treiber ist unter Erweitert READ Only 0, und unter Optionen
Exclusive und Schreibgeschützt nicht angeklickt.
In der Datenbank selbst habe ich schon den Ordner als vertrauenswürdig hinzugefügt.
Das Feld dl_lienr sehe ich, kann aber den Inhalt nicht ändern.
Hat jemand eine Idee an was das liegt?
WIN 7, Access 2007, xBase 19SL1.
Bei open Exclusive brauche ich keinen RLock, habe hier halt schon mit einigen
Konstelationen versucht. Aber keine Fehlermeldung und keine geänderten Feldinhalt.

Gruß
Bernd Reinhardt

Code: Alles auswählen


 cDriver := "Testmdb"  // "AccessTest"
  cDatabase := ".\testeaccess.accdb" // ".\testeaccess.mdb"
  cTable := "access"
  cConnect := "DBE=ODBCDBE;DSN=" + cDriver + ";DBQ=" + cDatabase
  BrowseOdbc(cConnect, cTable, {50,30})  
RETURN


PROCEDURE BrowseOdbc(cConnString, cTable, aPos)
LOCAL oSession

  oSession := dacSession():new(cConnString)
  USE (cTable) NEW EXCLUSIVE
  dbgotop()
  do while !rlock()
  enddo
  access->dl_lienr := time()
  dbunlock()
  dbcommit()
  use
  USE (cTable) NEW EXCLUSIVE
  dbgotop() 
  QBrowse(cTable, aPos)
  dbCloseArea()
Bernd Reinhardt
fa.reinhardt@gmx.de
Antworten