Ciekawie zrobione (z "bajerami"
).
Najfajniejsze w tym wszystkim jest wykorzystanie rekurencji cte
Jak ustawiłbyś tam "and (e.id_dok < x.id_dok)" zamiast "and (e.id_dok > x.id_dok)" to przychodzące dokumenty nie byłyby odwrotnie ponumerowane.
Jak ktoś chciałby wpisać trochę więcej treści to może to zrobić zmieniając wartość objEmail.Textbody
objEmail.Textbody = "Prosimy o dokonanie zapłaty poniższych kwot " & vbcrlf & vbcrlf & objRecordSet("lista") & vbcrlf & "Tutaj dalsza część tekstu"
Podoba mi się