29.02.2020, 00:15 [+3 UTC]
в нашей команде: 4 243 чел. | участники онлайн: 7 (рекорд: 21)

:: РЕГИСТРАЦИЯ

задать вопрос

все разделы

правила

новости

участники

доска почёта

форум

блоги

поиск

статистика

наш журнал

наши встречи

наша галерея

отзывы о нас

поддержка

руководство

Версия системы:
7.82 (22.02.2020)
JS-v.1.35 | CSS-v.3.37

Общие новости:
06.01.2020, 22:45

Форум:
28.02.2020, 17:24

Последний вопрос:
28.02.2020, 19:12
Всего: 151690

Последний ответ:
27.02.2020, 18:42
Всего: 259815

Последняя рассылка:
28.02.2020, 23:45

Писем в очереди:
0

Мы в соцсетях:

Наша кнопка:

RFpro.ru - здесь вам помогут!

Отзывы о нас:
21.05.2012, 10:28 »
Посетитель - 349343
огромное спасибо!!!!!!!!! [вопрос № 186104, ответ № 270913]
19.08.2019, 14:58 »
dar777
Это самое лучшее решение! [вопрос № 196124, ответ № 278539]

РАЗДЕЛ • Basic

Создание программ на языке Basic.

[администратор рассылки: Андреенков Владимир (Академик)]

Лучшие эксперты в этом разделе

Gluck
Статус: Студент
Рейтинг: 274
solowey
Статус: Специалист
Рейтинг: 266
Асмик Гаряка
Статус: Советник
Рейтинг: 116

Перейти к консультации №:
 

Консультация онлайн # 72648
Раздел: • Basic
Автор вопроса: Natali
Отправлена: 25.01.2007, 20:53
Поступило ответов: 1

Уважаемые эксперты!
Есть вопрос. Access 2000 Windows 2000 Prof
Как мне записать данные из rs (recordset) в строки подчиненной формы? Как обратиться непосредственно к строке, новая строка... Программно из модуля?
Не записывая предварительно в таблицу (источник данных подчиненной формы) так как при закрытии формы производятся расчеты и запись.

Форма: документ Акт технического обслуживания
Подчиненная форма DetLavoriTec со строками работы, запчасти, расходные материалы.
Источник данных таблица M_Ctmov
Поля: код_док, дата_док, код_строки
аппарат, код_артикула, описание, ед_изм, цена.......
как в обычной фактуре сроки с деталями.

Для автоматизации ввода групп строк, которые повторяются часто в документах , например замена фильтра: работа техника, запчасть фильтр, смена химреактивов, сами реактивы, проведение анализа воды.
Ввожу код технического обслуживания ЗФ (замена фильтра) в шапке документа элемент ЗФ с событием клик связываю функцию, которая выбирает из таблицы все строки с работами и запчастями для заданного в шапке аппарата и кода обслуживания и открываю rs (recordset) .

Как мне записать данные из rs (recordset) в строки подчиненной формы?

Состояние: Консультация закрыта

Ответ # 139408 от Тесленко Евгений Алексеевич

Здравствуйте, Natali!
DoCmd.GoToRecord , , acNewRec
Поле1ПФ` = rs(0)
Поле2ПФ` = rs(1)
........
' сохранить можно так
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Но использовать такой метод если рекордсет содержит более одной записи неудобно.
Свяжите подчиненную форму с временной таблицей, при выборе управляющего элемента выполните запрос :
Dim rs As ADODB.Recordset
Dim sSql As String
Set cnCurrent = CurrentProject.Connection

sSql="INSERT INTO TempTbl (Field) SELECT DISTINCT SourceTbl.Field " & _
"FROM SourceTbl WHERE SourceTbl.FieldKey=" & ParentKey
cnCurrent.Execute sSql
Set rs = Nothing
cnCurrent.Close
Set cnCurrent = Nothing
' ParentKey ключ управляющего контола, если это текст то так ='" & ParentKey & "'"
и обновите (Requery) подчиненный запрос
по окончании обработки данных, "сливаете" их в рабочую таблицу и очищаете временную.
Так гораздо удобнее
Удачи.
Евгений


Консультировал: Тесленко Евгений Алексеевич
Дата отправки: 27.01.2007, 02:14

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Возможность оставлять сообщения в мини-форумах консультаций доступна только после входа в систему.
Воспользуйтесь кнопкой входа вверху страницы, если Вы зарегистрированы или пройдите простую процедуру регистрации на Портале.

Яндекс Rambler's Top100

главная страница | поддержка | задать вопрос

Время генерирования страницы: 0.13670 сек.

© 2001-2020, Портал RFPRO.RU, Россия
Калашников О.А.  |  Гладенюк А.Г.
Версия системы: 7.82 от 22.02.2020
Версия JS: 1.35 | Версия CSS: 3.37