Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: ROM!MDB
Спасибо за ссылку! Вот только есть одна проблема. В моей ситуации используется описанный случай 2
Случай 2. Отличается от случая 1 снятием предположения 2.
То есть, допускается случай, когда все записи Tab1 имеют один ID.

И все бы хорошо только запрос не выдает не одной записи.
Помогите разобраться. Вот код:

Select ID_TK, Last(UnionStr2(ID_TK, SHIFR)) AS FamUnion 
FROM tbl_A
WHERE IsEmpty(UnionStr2())
GROUP BY ID_TK;

Public Function UnionStr2(Optional ID, Optional Fam)
Static IDOld, FamUnion
If IsMissing(ID) Then
IDOld = Empty
Exit Function
End If
If IDOld <> ID Then
IDOld = ID
FamUnion = Null
End If
FamUnion = IIf(IsNull(FamUnion), Fam, FamUnion & (", " + Fam))
UnionStr2 = FamUnion
End Function

Где может быть собака зарыта?


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.