VB

skulida

Новый участник

Сообщения: 16
Благодарности: 0

Помогите срочно не программисту в написании кода на бэсике под аксесс
вот:
есть некоторый запрос на выборку к таблице, в итоге получаем форму со списком результатов.
Private Sub ПолеСоСписком2_AfterUpdate()
Dim sql As String

sql = "SELECT name_org, kod_agenta, data_on, data_off, price, data_xx, kod FROM org WHERE name_org Like ""*" & Me.ПолеСоСписком2.Value & "*""ORDER BY name_org;"
Список4.RowSource = sql
Список4.Requery

End Sub

Как сделать чтобы клика по одной из строчек записи открывалась некая форма (DoCmd.OpenForm "Org" ) для редактирования конкретной записи, по которой кликаешь.

Отправлено: 20:17, 09-02-2003

DimSher

Старожил

Сообщения: 238
Благодарности: 0

Профиль | Отправить PM | Цитировать

skulida
Ну так уж и срочно....
А почему не попробовать так:

Цитата:

форма (DoCmd.OpenForm "Org" ) для редактирования конкретной записи, по которой кликаешь.

для нее источником данных ставишь некий запрос состоящий из необходимых полей. В качестве параметра к запросу указываешь допустим - ИмяКлиента=[forms]![MyForm].ПолеСоСписком1.Value.

Отправлено: 06:59, 10-02-2003 | #2

Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.