ник: KrukVN
вообще, шагать по выделенным строкам листбокса можно так:
For Each ttt In Me.LST1.ItemsSelected
msgbox Me.LST1.Column(0, ttt)
Next
|
а вот запрос из последнего примера П.Полиграфовича:
(упрощенно) - .Execute "UPDATE Request SET Поле3=-1 WHERE (Поле1 = '25')
обновит ВСЕ(!) записи в таблице где
Поле1 = '25', т.к. ему совершенно фиолетово что в листбоксе выделены не все
25 (для западла ему достаточно и одной), поэтому критерии отбора для данного запроса желательно чуть более конкретизировать
*
и не наезжайте на
Час :)
Прав он. Критерии отбора записей в запросе
Request - WHERE (((TBL1.Поле1)="25") AND ((TBL1.Поле3)=False)). Так вот. После даже однократного срабатывания Вашего запроса в таблице не останется ниодной записи, которые бы удовлетворяли наложенному на запрос условию. Вот записи и "удаляются" из листбокса. такой вот стивен кинг
