Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / дата ни проходит / 6 сообщений из 6, страница 1 из 1
05.07.2006, 10:55
    #33832021
Снифф
Снифф
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
дата ни проходит
HI всем
у тексбокса Format D и Mask 99.99.99
на кнопе ОК сделали проверку
Код: plaintext
1.
2.
3.
4.
5.
6.
SET CENTURY ON
IF EMPTY(thisform.txtDat1.value)=.T.
=MESSAGEBOX("Дата неверна!", 48 )
thisform.txtDat1.SetFocus
RETURN
ENDIF
SET CENTURY OFF
если поставить год одной цыфрой то получется 1906 1905 и тд годы. пробовали с SET CENTURY ... TO ROLL ... и чойто нето тоже. какже верно?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2006, 11:01
    #33832049
Снифф
Снифф
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
дата ни проходит
блин!!!!!!! не тот кусок кода пихнул. масса извенений
Код: plaintext
1.
2.
3.
4.
5.
6.
SET CENTURY ON
IF thisform.txtDat1.value<{^ 2000 - 01 - 01 }
=MESSAGEBOX("Дата неверна!", 48 )
thisform.txtDat1.SetFocus
RETURN
ENDIF
SET CENTURY OFF
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2006, 11:53
    #33832284
Aleksey-K
Aleksey-K
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
дата ни проходит
Год надо ставить минимум 2-мя цифрами, тогда работает ROLL ... А если одна цифра, то первая цифра = 0, что вы и получаете.
С уважением, Алексей
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2006, 12:44
    #33832500
Снифф
Снифф
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
дата ни проходит
а чтобы одним знаком вобще нельзя сделать чтоли? ну прям никак?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2006, 12:50
    #33832522
Aleksey-K
Aleksey-K
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
дата ни проходит
Можно, но не с помощью SET CENTURY ... TO ROLL, а спомощью своего кода.

С уважением, Алексей
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2006, 16:29
    #33833460
GoshaS
GoshaS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
дата ни проходит
Код: plaintext
1.
2.
3.
4.
5.
IF thisform.txtDat1.value<date( 2000 , 01 , 01 )
=MESSAGEBOX("Дата неверна!", 48 )
thisform.txtDat1.SetFocus
RETURN
ENDIF
Только вот точно не помню, в какой версии появилась ф-я
Date(year,month,date)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / дата ни проходит / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 321ms
Закрыть
start [/forum/topic.php?fid=41&mobile=1&tid=1591281]:
 0ms
get settings:
 8ms
get forum list:
 13ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 28ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 44ms
get tp. blocked users:
 1ms
others: 212ms
total:  321ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]