Открытие формы для конкретной записи

@M_27 · Регистрация: 18.10.2011

Студворк — интернет-сервис помощи студентам

Здравствуйте! Подскажите, как вызвать из ленточной формы по клику по полю записи, которую необходимо отредоктировать в новой форме, и чтобы форма открывалась сразу для это записи.

@alvk · 30.10.2011, 06:39

Visual Basic
1
2
3
4
5
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "форма редактирования(фр)"    
    stLinkCriteria = "[КодФР]=" & Me![Код]
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Только лучше ставить на двойной клик.

@M_27 · 30.10.2011, 14:12 **[ТС]**

Спасибо

@evgenii3000 · 13.02.2013, 15:14

Сообщение от alvk

Visual Basic
1
2
3
4
5
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "форма редактирования(фр)"    
    stLinkCriteria = "[КодФР]=" & Me![Код]
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Только лучше ставить на двойной клик.

не могли бы вы расписать что где. с VBA очень мало знаком. очень хочется понять

@alvk · 13.02.2013, 16:18

Этот модуль создаёт мастер создания кнопки при создании кнопки на открытие формы.
Перевые два Dim - описание переменных с типом стринг - строка. Первая переменная - название формы, вторая - критерий отбора. Соответственно критерий отбора фильтрует записи второй формы так, что остаётся набор данных с кодом Кодфр равным значению поля Код на первой форме, той, где расположена кнопка открытия формы 2.
Команда docmd.openform открывает непосредственно форму. Её параметры вы можете посмотреть в VBE, нажмите ALT+F11 и введите docmd.openform и нажмите F1.

@evgenii3000 · 13.02.2013, 16:34

Сообщение от alvk

Этот модуль создаёт мастер создания кнопки при создании кнопки на открытие формы.
Перевые два Dim - описание переменных с типом стринг - строка. Первая переменная - название формы, вторая - критерий отбора. Соответственно критерий отбора фильтрует записи второй формы так, что остаётся набор данных с кодом Кодфр равным значению поля Код на первой форме, той, где расположена кнопка открытия формы 2.
Команда docmd.openform открывает непосредственно форму. Её параметры вы можете посмотреть в VBE, нажмите ALT+F11 и введите docmd.openform и нажмите F1.

вот есть форма manager1Таб на нее сделал двойной клик с именем модуля чтобы открывалась форма Таблица1.
выдает ошибку =(
Приложению Microsoft Access не удается найти объект "Modulel".
Если "Modulel" является новым макросом или группой макросов, убедитесь, что этот объект был сохранен и его имя не содержит ошибок.

@alvk · 14.02.2013, 04:20

Сообщение от evgenii3000

на нее сделал двойной клик с именем модуля чтобы открывалась форма Таблица1.

На кого двойной клик? Выберите не модуль, а "процедура обработки событий", нажмите справа на точки и туда запишите код, тогда будет работать. А ваш modul сотрите.

@Sazabi · 14.08.2015, 08:34

Похожий вопрос. С формой редактирования понятно. Не понял откуда брать КодФР и просто Код.
Нужно использовать открытие формы для конкретной записи. Объясните пожалуйста.

PureBasic
1
2
3
4
5
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "форма редактирования(фр)"    
    stLinkCriteria = "[КодФР]=" & Me![Код]
    DoCmd.OpenForm stDocName, , , stLinkCriteria

@Braser · 14.08.2015, 10:45

Простой пример. форма редактирования записи открывается либо по двойному щелчку по полю, либо кнопкой.

shanemac51 · 14.08.2015, 11:08

форма редактирования записи открывается либо по двойному щелчку по полю

на базе вашего примера

@Sazabi · 14.08.2015, 11:40

Вопрос все еще актуален именно в таком виде. Возможно ли это реализовать с помощью данного кода? Если да, то объясните, что нужно подставить из свой БД для функционирования.
Кнопка перехода в конкретную запись должна быть в форме Клиенты. Там уже присутствует пустая кнопка для этого.
Актуальная версия: БД v1.8.rar

@ltv_1953 · 14.08.2015, 12:01

См. вложение

@Sazabi · 14.08.2015, 13:40

Сообщение от ltv_1953

См. вложение

Благодарю. Еще одна задача: Необходимо в этих досье указывать все объекты опред. клиента. Я вывел поле "объекты" в досье. Но тут проблема в том, что бд отображает только один объект, нужно пролистать на страницу вперед чтобы увидеть второй объект.
Вопрос: каким образом можно сделать так, чтобы все объекты клиента отображались на одной странице.
Если не совсем понятно, загляните пожалуйста в бд -> Клиенты -> Откройте клиент1 там увидите поле объекты и 2 записи.
БД v1.9.rar

@Sazabi · 14.08.2015, 13:51

Взгляните пожалуйста еще на форму "Рабочее окно" Кнопка "Активные" и "Сортировать по ближ. дате конца" почему-то слетели, не могу понять почему.

@ltv_1953 · 14.08.2015, 14:09

Вроде все работает, при нажатии активные нужно чтобы открыта была форма Главная (там параметр). Но базу лучше бы пересобрать, проблемы с форматом MDB иногда появляются.

@Sazabi · 14.08.2015, 14:45

Что скажете по поводу этой задачи?

Сообщение от ltv_1953

Но базу лучше бы пересобрать, проблемы с форматом MDB иногда появляются.

Поясните пожалуйста, пересобрать - это как?

Актуальная версия: БД v1.9.rar

@ltv_1953 · 14.08.2015, 15:18

Создать новую и импортировать в нее все объекты (кроме системных таблиц - имена которых начинаются на MSys...).

@Sazabi · 15.08.2015, 06:55

Вопрос все еще актуален.
БД v2.0.rar

@ltv_1953 · 15.08.2015, 07:25

В форме Рабочее окно есть внедренные макросы. Из-за них могут быть проблемы в формате mdb. Переделайте в процедуры, а потом сохраните в формате 2002/2003, если нужен mdb.

@Sazabi · 15.08.2015, 07:53

Сообщение от ltv_1953

В форме Рабочее окно есть внедренные макросы. Из-за них могут быть проблемы в формате mdb. Переделайте в процедуры, а потом сохраните в формате 2002/2003, если нужен mdb.

Извините, вы о чем? Про проблемы формата mdb я уже понял. Т.е из-за макросов в Рабочем окне.
Я про вопрос в посте №13, про отображение всех объектов клиента в его досье.

Новые блоги и статьи Все статьи Все блоги /
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .

@M_27 3 / 3 / 0 Регистрация: 18.10.2011 Сообщений: 24

	Открытие формы для конкретной записи 30.10.2011, 00:22. Показов 11673. Ответов 26 Метки нет (Все метки) Здравствуйте! Подскажите, как вызвать из ленточной формы по клику по полю записи, которую необходимо отредоктировать в новой форме, и чтобы форма открывалась сразу для это записи. 0

@M_27 3 / 3 / 0 Регистрация: 18.10.2011 Сообщений: 24
	30.10.2011, 14:12 [ТС]
	Спасибо 1

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,380
	13.02.2013, 16:18
	Этот модуль создаёт мастер создания кнопки при создании кнопки на открытие формы. Перевые два Dim - описание переменных с типом стринг - строка. Первая переменная - название формы, вторая - критерий отбора. Соответственно критерий отбора фильтрует записи второй формы так, что остаётся набор данных с кодом Кодфр равным значению поля Код на первой форме, той, где расположена кнопка открытия формы 2. Команда docmd.openform открывает непосредственно форму. Её параметры вы можете посмотреть в VBE, нажмите ALT+F11 и введите docmd.openform и нажмите F1. 0

@Sazabi 4 / 4 / 0 Регистрация: 20.01.2015 Сообщений: 153
	14.08.2015, 11:40
	Вопрос все еще актуален именно в таком виде. Возможно ли это реализовать с помощью данного кода? Если да, то объясните, что нужно подставить из свой БД для функционирования. Кнопка перехода в конкретную запись должна быть в форме Клиенты. Там уже присутствует пустая кнопка для этого. Актуальная версия: БД v1.8.rar 0

@Sazabi 4 / 4 / 0 Регистрация: 20.01.2015 Сообщений: 153
	14.08.2015, 13:51
	Взгляните пожалуйста еще на форму "Рабочее окно" Кнопка "Активные" и "Сортировать по ближ. дате конца" почему-то слетели, не могу понять почему. 0

@ltv_1953 17536 / 7288 / 1663 Регистрация: 21.06.2012 Сообщений: 13,957
	14.08.2015, 14:09
	Вроде все работает, при нажатии активные нужно чтобы открыта была форма Главная (там параметр). Но базу лучше бы пересобрать, проблемы с форматом MDB иногда появляются. 1

@ltv_1953 17536 / 7288 / 1663 Регистрация: 21.06.2012 Сообщений: 13,957
	14.08.2015, 15:18
	Создать новую и импортировать в нее все объекты (кроме системных таблиц - имена которых начинаются на MSys...). 1

@Sazabi 4 / 4 / 0 Регистрация: 20.01.2015 Сообщений: 153
	15.08.2015, 06:55
	Вопрос все еще актуален. БД v2.0.rar 0