|
|
|
| Нужно взять последнюю запись в столбце, только это надо сделать программно, не хочу напрягать пользователей.... чет пока не получается. | |
|
| |
|
|
|
| В хелпе все написано
.MoveLast - находит последнюю запись в таблице
.Fields - указывает на поле | |
|
| |
|
|
|
| Используется примерно так
Public Sub InicialRec()
Dim TableRec As ADODB.Recordset
Dim strCurrentConn As String
Set TableRec = New ADODB.Recordset
Dim i As Variant
strCurrentConn = CurrentProject.Connection
TableRec.Open "ТипаТаблица", strCurrentConn, adOpenStatic, adLockOptimistic
With TableRec
.MoveLast
i=.Fields("ТипаПоле")
End With
TableRec.Close
Set TableRec = Nothing
MsgBox i
End Sub
| | |
|
| |
|
|
|
| Большое спасибо сейчас, будем побывать. | |
|
| |
|
|
|
| Помогите сообразить чем отличие от фильтра по последней записи? | |
|
| |
|
|
|
| Это я стормозил
подумал, если программно то на VBA
на SQL это вообще элементарно
SELECT max(КлючевоеПоле)
FROM ТвояТаблица;
|
Но у меня возник встречный вопрос
?Как предполагается должен выглядеть АППАРАТНЫЙ запрос? | |
|
| |
|
7 Кб. |
|
| Это типа группового что ли?
SELECT Last(Таблица1.Поле1) AS [Last-Поле1] FROM Таблица1;
Че-то я вообще слабо что мыслю. Это ко мне вопрос-то?
Изучение фильтров видимо сказывается. | |
|
| |
|
|
|
| Да нет
твой пример - программный на SQL
А вот аппаратный - припаянная микросхема к Access'у | |
|
| |
|
|
|
| Во блин до чего дошли. Типа ключа на лицензию.
Ну попробуй закодировать файл на флешке, всунуть ее, распознать файл из базы, и т.д.
Но этот вопрос мне не по окладу.
Варьянт 2 - микросхема типа РЕ... через программатор .
Только расшифорока на USB нужна или на COM. Контроллер можно.
Че-то понесло меня в мир фэнтези. | |
|
| |