|
|
|
Как сделать проверку записей?
|
|||
|---|---|---|---|
|
#18+
Есть поле "Сектор", которое может принимать значения "Сектор_1", "Сектор_2", "Сектор_3" - из "Таблица1". Пользователь в ручную вводит (т.к. поле со списком не подходит) значение сектора. Как сделать, если пользователь ввел значение не совпадающее с данными из "Таблица1", чтобы надпись в поле "Сектор" была красным цветом? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.05.2004, 11:44 |
|
||
|
Как сделать проверку записей?
|
|||
|---|---|---|---|
|
#18+
Private Sub MyTextField_AfterUpdate() Dim rst as New ADODB.Connection rst.Open "SELECT Count(*) FROM Таблица1 WHERE Сектор='" & MyTextField & "'", CurrentProject.Connection, adOpenKeyset, adReadOnly If rst(0)=0 then MyTextField.ForeColor=[Red] Else MyTextField.ForeColor=[Black] End Sub Правда, не тестил, так, идея просто... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.05.2004, 11:54 |
|
||
|
Как сделать проверку записей?
|
|||
|---|---|---|---|
|
#18+
гислик, а нафиг тебе красить? воспользуйся тем, что есть в аксессе - поле со списком. она тебе как надо ругнетца. во народ парица. прям времени девать некуда. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.05.2004, 16:51 |
|
||
|
Как сделать проверку записей?
|
|||
|---|---|---|---|
|
#18+
2 zz: Спасибо, попробую. 2 Хам трамвайный: Так в том-то и дело, что поле со списком не подходит, т.к. может быть еще другое значение, но это значение может быть и правильным и не правильным, и еще, в этом поле происходит автоподстановка. Т.е. в итоге пользователь должен сам принять решение оставить это значение или нет. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2004, 14:39 |
|
||
|
Как сделать проверку записей?
|
|||
|---|---|---|---|
|
#18+
2 zz: Идея в общем ясна, но пока что не получается, т.к. я забыл сказать, что у меня Ac97, следовательно надо юзать не ADO, а DAO. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2004, 15:39 |
|
||
|
Как сделать проверку записей?
|
|||
|---|---|---|---|
|
#18+
Что-то не получается то же самое на DAO написать, помогите, PLEASE. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2004, 20:03 |
|
||
|
Как сделать проверку записей?
|
|||
|---|---|---|---|
|
#18+
Неужели все уже наотмечались до такого состояния, что никто не может даже три строчки кода написать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2004, 22:54 |
|
||
|
Как сделать проверку записей?
|
|||
|---|---|---|---|
Модератор форума
|
|||
|
#18+
А сам? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.05.2004, 23:04 |
|
||
|
Как сделать проверку записей?
|
|||
|---|---|---|---|
|
#18+
MyTextField.ForeColor = iif(DCount("Сектор","Table1","Сектор='" & MyTextField & "'")>0,[Black],[Red]) Сделать можно всё!!! Только бы знать как... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.05.2004, 09:34 |
|
||
|
|
start [/forum/topic.php?fid=45&msg=32511889&tid=1674745]: |
0ms |
get settings: |
4ms |
get forum list: |
8ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
249ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
26ms |
get tp. blocked users: |
1ms |
| others: | 196ms |
| total: | 496ms |
| 0 / 0 |
