Ennor писал(а):Никак.
Private Sub Timer1_Timer()
With GridEX1
.Refresh
If .Row > 0 And .EditMode = jgexEditModeOff Then .RefreshRowIndex .RowIndex(.Row)
End With
End Sub
Ennor писал(а):Andrey Fedorov
В оригинале было "без вызова метода Refresh". Я понимаю, что ты обновляешь грид, а не рекордсет
Ennor писал(а):, но ведь последний у него, судя по всему, где-то внутри, его собственный. И с какими параметрами он цепляется к серверу?
Public Sub Main()
Dim r As New ADODB.Recordset, cn As New ADODB.Connection
cn.CursorLocation = adUseServer
cn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Initial Catalog=Test"
r.Open "SELECT * FROM Table_1", cn, adOpenStatic, adLockOptimistic
Do
Do Until r.EOF
DoEvents
Debug.Print r(0), r(1)
r.MoveNext
Loop
If r.RecordCount Then r.MoveFirst
Loop
End Sub
Ennor писал(а):И как он залочит таблицу, когда начнет шевелиться? А когда 10 экземпляров, таких же как он, начнут одновременно шевелиться? Насколько он управляем, вообще?..
Так что твое решение скорее не подходит .
pstrkim писал(а):Спасибо! В общем про таймер я тоже думал, правда непонятно тогда назначение свойства CursorType, предназначенное якобы для отслеживания изменений, получается никакой разницы между значениями Dynamic и Static нет
Сейчас этот форум просматривают: Google-бот, SemrushBot и гости: 103