| |
|
|
| | Нужно взять последнюю запись в столбце, только это надо сделать программно, не хочу напрягать пользователей.... чет пока не получается. | |
| |
| |
| |
|
|
| | В хелпе все написано
.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. Контроллер можно.
Че-то понесло меня в мир фэнтези.  | |
| |
| |