ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрет ввода значений начинающихся с "0"
13 сообщений из 13, страница 1 из 1
Запрет ввода значений начинающихся с "0"
    #32286653
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
В зависимоти от уровня доступа пользователь может\не может просматривать те или иные записи. Т.е. нужно сделать так, чтобы пользователь не мог ввести в поле поиска строку начинающуюся, например, с "0". Как такое сделать???
...
Рейтинг: 0 / 0
07.10.2003, 16:59
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286665
Фотография Темный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Темный
Участник
А форма поиска самопальная?
...
Рейтинг: 0 / 0
07.10.2003, 17:04
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286668
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
да
...
Рейтинг: 0 / 0
07.10.2003, 17:05
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286669
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Витал
Участник
Коли так На AfterUpdate поля проверяй "тварь дрожащая..." пользователь "...или право имеет". Если не имеет, то тогда Replace(Pole1, '0','')
...
Рейтинг: 0 / 0
07.10.2003, 17:05
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286676
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
По поводу "Преступления и наказания". Сделано так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub REF_BeforeUpdate(Cancel As Integer)

Dim r As DAO.Recordset
Set r = CurrentDb.OpenRecordset( "SELECT ID_ACCESS FROM user_reg WHERE [PERS_COD] = '" & Forms!OperID!OperID & "'" )
    Select Case r!ID_ACCESS
        Case  4 
            'А вот тут надо что-то придумать ::)'
    End Select

End Sub

А вот это - Replace(Pole1, '0','') - прошу пояснить :)
...
Рейтинг: 0 / 0
07.10.2003, 17:09
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286682
Bor-L
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Bor-L
Гость
to Vital - А 0 из СЕРЕДИНЫ поля, случайно, не пропадет ?
...
Рейтинг: 0 / 0
07.10.2003, 17:10
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286688
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Пропадет.

Pole1=Mid(Pole1,2)
...
Рейтинг: 0 / 0
07.10.2003, 17:11
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286691
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Do While Pole1 Like "0*"
Pole1=Mid(Pole1,2)
Loop
...
Рейтинг: 0 / 0
07.10.2003, 17:12
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286696
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Владимир Саныч
оригинальное решение :)
...
Рейтинг: 0 / 0
07.10.2003, 17:13
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286704
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Я сделал так
If Me!REF Like "0*" Then

просто я не знал, что Like можно использовать вне селектов и пр. :))
_________
Спасибо всем. Санычу отдельная благодароность
...
Рейтинг: 0 / 0
07.10.2003, 17:15
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286707
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
> просто я не знал, что Like можно использовать вне селектов и пр. :))

Наоборот. Возможность использовать все эти функции в селектах - это особая милость Всевышнего.
...
Рейтинг: 0 / 0
07.10.2003, 17:17
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286709
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Кстати, If не надо. While и так не пустит внутрь.
...
Рейтинг: 0 / 0
07.10.2003, 17:18
| Ответить | Цитировать | Написать  
Запрет ввода значений начинающихся с "0"
    #32286715
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
...
Рейтинг: 0 / 0
07.10.2003, 17:21
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрет ввода значений начинающихся с "0"
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&fpage=1740&tid=1678994]:
 0ms
get settings:
 9ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 35ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 48ms
get tp. blocked users:
 2ms
others: 237ms
total:  362ms
созд. / загр.: 362ms
x
x
Закрыть


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