Access nicht excl. öffnen

[Robert Engel]

Hallo NG,

wie kann ich auf eine Access-DB exclusiv bzw. nicht excl. zugreifen?
Meine Verbindung sieht so aus (DB ohne Kennwort oder Nutzereinrichtung):

ConnString "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data
Source=test.mdb"

Was muß ich da noch mit einbauen?

Gruß von Robert

[Peter Götz]

Hallo Robert,

Post by Robert Engel
wie kann ich auf eine Access-DB exclusiv bzw. nicht excl. zugreifen?
ConnString "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data
Source=test.mdb"

Dim strCnn as String

' Exclusiv öffnen
strCnn = "Provider=""Microsoft.Jet.OLEDB.4.0"";" & _
"""Data Source="C:\Verzeichnis\DB.mdb"";" & _
"Mode=Share Deny Exclusive;" & _
"Jet OLEDB:Database Locking Mode=1"

' im geteilten Modus öffnen
strCnn = "Provider=""Microsoft.Jet.OLEDB.4.0"";" & _
"""Data Source="C:\Verzeichnis\DB.mdb"";" & _
"Mode=Share Deny None;" & _
"Jet OLEDB:Database Locking Mode=1"

____________________

' PageLocking:
Jet OLEDB:Database Locking Mode=0

' RowLocking (erst ab mdb-Format Access2000):
Jet OLEDB:Database Locking Mode=1


Gruß aus St.Georgen
Peter Götz
www.gssg.de (mit VB-Tips u. Beispielprogrammen)

[Peter Götz]

Hallo nochmal,

Post by Peter Götz
Dim strCnn as String
' Exclusiv öffnen
strCnn = "Provider=""Microsoft.Jet.OLEDB.4.0"";" & _
"""Data Source="C:\Verzeichnis\DB.mdb"";" & _
"Mode=Share Deny Exclusive;" & _

Das muss natürlich
"Mode=Share Exclusive;" & _

heissen (also ohne das "Deny").

Post by Peter Götz
"Jet OLEDB:Database Locking Mode=1"

Gruß aus St.Georgen
Peter Götz
www.gssg.de (mit VB-Tips u. Beispielprogrammen)