LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: В трех со...
 Тема: В трех соснах...
 
 15.06.2007 21:04:36
All
4316 сообщения
1-ый


Тема: В трех соснах...
Хочу разрешить открытие формы по паролю. Для этого создаю вспомогательную форму "фПароль".
Между строчками
DoCmd.OpenForm "фПароль", acNormal, "", "", , acNormal
и
DoCmd.Close acForm, "фПароль"
нужно присвоить переменной значение введенное пользователем в этой самой форме "формаПароль". Как это сделать?



P.S. Раздел для новичков
Автор: Не спец от 0:00:00 Источник ...
 15.06.2007 21:04:36
All
4316 сообщения
1-ый


RE: В трех соснах...
Добавляете в форму поле, например, password. Обрабатываете событие обновление для поля.
Private Sub password_AfterUpdate()
if me.password = "" then ...
End Sub


P.S. Раздел для новичков
Автор: Admin от 0:00:00 Источник ...
 15.06.2007 21:04:36
All
4316 сообщения
1-ый


RE: В трех соснах...
Простите неграмотного, но продолжаю приставать с вопросами.

Опишу ситуацию: создал мастером кнопочную форму и на одну из кнопок меню хочу повесить пароль. Создал форму "фПарольЗаявка", поле для ввода пароля «ИмяПароль», залез в код VBA и в функции
Private Function HandleButtonClick(intBtn As Integer)

End Function
пытаюсь дописать код программы (как умею, т.е. пока никак…):

If intBtn = 1 And [SwitchboardID] = 1 Then
DoCmd.OpenForm "фПарольЗаявка", acNormal, "", "", , acNormal
Call ИмяПароль_AfterUpdate
DoCmd.Close acForm, "фПарольЗаявка"


И далее:
Private Sub ИмяПароль_AfterUpdate()
stParol = фПарольЗаявка.ИмяПароль
End Sub
чтобы потом поработать с "stParol"...

Открывается форма, но тут же вылезает: «There was an error executing the command»

Что я не так делаю??



P.S. Раздел для новичков
Автор: Не спец от 0:00:00 Источник ...
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: В трех со...
ПоискПоиск  Список форумовСписок форумов  
right