Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: Кабан
Dim q As String Dim stDocName As String Dim stLinkCriteria As String q = dcount("*","[ClassifAnalit]") If q = 0 Then DoCmd.Close Else stDocName = "название формы" DoCmd.OpenForm stDocName, , , stLinkCriteria end if
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.