
Multi User VB 6.0, ADO, Jet
Hi All,
I' new to VB but have written a large application in VB 6.0 that it is to
installed on a Network but I am now testing under Windows 98.
This new system is going into the "testing phase" but I am unknowlegeable
about the record locking methods with Jet/VB 6.0/MDB files. Although I
thought I locked the record with adlockPessimistic and then use a Sql
statement to get the recordset, "THE SECOND USER IS ABLE TO UPDATE THE EXACT
SAME RECORD".
On the other software I develop in, this would crash if two applications
were accessing the same record.
Here is just a small section of my code that shows the method I am using.
Set rstQuote = New ADODB.Recordset
rstQuote.CursorType = adOpenStatic
rstQuote.LockType = adLockPessimistic
rstQuote.Open "Select * From Quotes where quoteid = '" &
MDIForm1.cQuote & "'", cnn1
rstQuote.Fields("FieldtobeUpdated").Value = form1.cbobox.text
rstQuote.Update
All comments are appreciated.
DG
Orlando, Florida