Aşağıdaki kod ile Excel ortamından Access veritabanı'na bağlantı kurup veri girişi yaparken;
aynı anda birden çok kullanıcı bu Access veritabanı'na bağlanınca bağlantıdan atıyor,
bu konuda ne tür önerileriniz olabilir?
destekleriniz için şimdiden teşekkürler,
Kod:
Sub Connect()
Dim myPath As String
Dim SQL As String
Set cn = New ADODB.Connection
Set RS = New ADODB.Recordset
myPath = ThisWorkbook.Path
With cn
.Provider = "Microsoft.ACE.OLEDB.12.0"
.ConnectionString = "Data Source = " & myPath & "\DB\Db.accdb"
.Open cn
End With
SQL = " SELECT * FROM Data"
RS.Open SQL, cn, 1, 3iyi akşamlar.
