Кто подскажет, можно ли в списке аттрибутов команды INSERT указать элементы формы?
У меня есть следующая команда:

CurrentProject.Connection.Execute "INSERT INTO RentStatus (Asset)" _
& "SELECT DISTINCT c1.SubAsset " _
& "FROM Container AS c1 " _
& "WHERE c1.MainAsset=" & Rental_DeviceID & "" _
& "UNION " _
& "SELECT DISTINCT c3.SubAsset " _
& "FROM Container AS c2 RIGHT OUTER JOIN Container AS c3 ON c2.SubAsset=c3.MainAsset " _
& "WHERE c2.MainAsset=" & Rental_DeviceID & "" _
& "UNION " _
& "SELECT DISTINCT c5.MainAsset " _
& "FROM CONTAINER AS c5 " _
& "WHERE c5.MainAsset=" & Rental_DeviceID & ""


В этом случае добавляется только один столбец с аттрибутам Asset в таблицу RentStatus. В то время как в этой таблице есть ещё элементы:
RentStatus(Asset, CompanyID, RentBegin,RentEnd, Comments ). Данные для этих аттрибутов иммеются в форме в виде Техтбоксов.
В обшем как правильно дописать комадну
INSERT INTO RentStatus (Asset,...,...,....)" ? Пробовал в скобки внести элементы формы, но не получалось. Потом просто сделал UPDATE для всех столбцов, заработало, но слишком много кода получилось.