| |
|
|
| | поле типа Дата
п.с. ну и чтобы оно сохранилось конечно... | |
| |
| |
| |
|
|
| | ...чтобы оно сохранилось конечно...
1 вариант. Открыть форму программно в режиме конструктора, присвоить значение, закрыть с сохранением.
2. вариант. Создать пользовательское свойство документа "форма", сохранять как значение свойства. При загрузке формы считывать свойство и присваивать по умолчанию полю. | |
| |
| |
| |
|
|
| | 1-й вариант не подойдет для мде-шки
а 2-й вариант - в коде прописать все свойства формы???
или только DefaultVal поля достаточно?
честно гря пока не все понял..щас поэкпериментирую... | |
| |
| |
| |
|
|
| | 2. вар. Только те, которые нужно менять. Интересно, а DefaultValue поля в MDE можно будет изменить программно? В принципе, можно задавать непосредственно значение. | |
| |
| |
| |
|
|
| | Не понял сочетания фраз "Свободное поле на форме" и "ну и чтобы оно сохранилось конечно"
Если поле свободное, то где должно сохраниться значение.
Какая у вас задача? Если это значение даты меняется для каждой записи, то лучше вносить его в поле по событию Form_BeforeInsert или Form_BeforeUpdate при условии, что в поле Null. | |
| |
| |
| |
 8 Кб. |
|
| | ну вот на форме свободное поле
по умолчанию там стоит дата
как ее можно менять программно? | |
| |
| |
| |
13 Кб. |
|
| | Например так: (таймером что бы не вешать контролы.) | |
| |
| |
| |
|
|
| | не..не то 
значение по умолчанию как было 20 января так и осталось
так...может зайти с другого боку?
мне нужна демоверсия программы, с ограниченным сроком работы
идея какая была
на стартовой форме повесить 2 поля
В одном текущая дата, в другом поле указывается дата, позже которой прога вырубается
но если клиент все же захочет ее у себя иметь, то чтобы у меня была возможность продлить срок работы программы
было реализовано сл. образом
Поле0=Date()
Поле1=#20.01.2009#
(эти параметры забиты в свойствах полей по умолчанию)
дальше
If Поле0-Поле1<0 Then
DoCmd.Quit
end if
вот и хотелось продлить дату в Поле1
или может какие-то другие варианты предложите | |
| |
| |
|
|
|
|
| |
|
|
| | Private Sub Form_Current()
Me![Поле].DefaultValue = "#12/10/2008#"
' Me![Поле].DefaultValue = "=Now()"
End Sub | |
| |
| |
| |
|
|
| | Пример скинул на почту. Посмотри. | |
| |
| |
| |
|
|
| | ага..спасибо Lukas!
щас гляну
а я пока сделал так - зарыл в одной из своих таблиц поле с датой и по этой дате прога отрубается
щас гляну твой примерчик  | |
| |
| |
|
|
