Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: Pasat
Private Sub Command42_Click() Dim stDocName As String Dim stLinkCriteria As String stDocName = "frm_Forma1" stLinkCriteria = "[ID1]=" & Me![ID2] DoCmd.OpenForm stDocName, , , stLinkCriteria End Sub
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.