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()