Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проблемы с Check'ами / 18 сообщений из 18, страница 1 из 1
17.03.2008, 12:14
    #35194732
Даулет Утепов
Даулет Утепов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Привет всем,
Такая проблема на форме пользователь с помошью check'ов и text заполняет форму, далее форма перекидывает в БД. Text'шки обновляетсю а check не в состоянии обновлятся........... Там еще при выборе одного другие в состоянии enable.
Испробовал все , а может почти все...
Вопрос как сделать чтоб эти check'и обнулялись????
Или есть еще какие нибудь идей......
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 12:15
    #35194739
IguMEN
IguMEN
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Использовать Boolean
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 12:37
    #35194843
Worobjoff
Worobjoff
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Используете привязку данных? Вообще как пытаетесь обновить форму?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 12:40
    #35194856
IguMEN
IguMEN
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Уж не DAO ли это? 8(
Уж полночь близится, а аффтар все ни жжот!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 12:47
    #35194888
Даулет Утепов
Даулет Утепов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
WorobjoffИспользуете привязку данных? Вообще как пытаетесь обновить форму?

Private Sub Command6_Click()
Dim n As Control
For Each n In Controls
n = 0
Next
End Sub

К чему пришел но все становится 0..............................
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 12:54
    #35194921
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
if n TypeOf ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 12:57
    #35194930
Даулет Утепов
Даулет Утепов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Konst_Oneif n TypeOf ...
А какой тип задать ???? Или переменную???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:05
    #35194968
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Код: plaintext
1.
2.
If TypeOf n Is CheckBox Then
   n.Value= 0 
End If
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:12
    #35194993
Даулет Утепов
Даулет Утепов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Konst_One
Код: plaintext
1.
2.
If TypeOf n Is CheckBox Then
   n.Value= 0 
End If

ЧТО ТО НЕ ВЫХОДИТ......................
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:19
    #35195031
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
не совсем понятно, что у вас не получается и что вы хотите получить.
подробней опишите проблемку и свой код сюда , чтобы разобраться, как вы делаете.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:27
    #35195061
Даулет Утепов
Даулет Утепов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Konst_Oneне совсем понятно, что у вас не получается и что вы хотите получить.
подробней опишите проблемку и свой код сюда , чтобы разобраться, как вы делаете.
на форме много checkbox'ов пользователь с помошью них выбираем определенные критерии, далее инфа заносится в Бд. Надо чтоб с помошью либо кнопки , либо на кнопку Сохранить обновлять все тексты и checkbox'Ы. Как лучше это сделать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:33
    #35195088
Даулет Утепов
Даулет Утепов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Даулет Утепов Konst_Oneне совсем понятно, что у вас не получается и что вы хотите получить.
подробней опишите проблемку и свой код сюда , чтобы разобраться, как вы делаете.
на форме много checkbox'ов пользователь с помошью них выбираем определенные критерии, далее инфа заносится в Бд. Надо чтоб с помошью либо кнопки , либо на кнопку Сохранить обновлять все тексты и checkbox'Ы. Как лучше это сделать?
код проги
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:34
    #35195092
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
зависит от структуры хранения информации в вашей базе данных.
покажите, что вы уже сделали и что у вас не получается. желательно привести структуру самой таблицы в базе с указанием типов полей.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:39
    #35195114
Даулет Утепов
Даулет Утепов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Konst_Oneзависит от структуры хранения информации в вашей базе данных.
покажите, что вы уже сделали и что у вас не получается. желательно привести структуру самой таблицы в базе с указанием типов полей.
тип text, но какая разница мне нужно чтоб chexbox'ы обнулялись.............?
Инфа закидывается через dbgrid и data. Текст проги скинул ывше.....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:46
    #35195143
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
'загрузка формы
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
    
    Set cn = New ADODB.Connection
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Password=;Data Source=C:\1.mdb;Persist Security Info=True"
    
    Set rs = New ADODB.Recordset
    rs.CursorLocation = adUseClient
    Set rs.ActiveConnection = cn
    rs.Open "SELECT * FROM Table1", , adOpenKeyset, adLockOptimistic, adCmdText
    
    'и так для каждого контрола нужно сделать привязку
    ...
    Me.Check1.DataField = "Check1" 'имя поля в таблице где хранится данное значение
    Set Me.Check1.DataSource = rs
    ...
    

'обработка нового

    rs.AddNew
    'вводите новые значения в поля
    ....
    rs.Update
    
'выбор нужной записи

    rs.Move  1 
    
'и тд и тп
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:48
    #35195154
Даулет Утепов
Даулет Утепов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Konst_One
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
'загрузка формы
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
    
    Set cn = New ADODB.Connection
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Password=;Data Source=C:\1.mdb;Persist Security Info=True"
    
    Set rs = New ADODB.Recordset
    rs.CursorLocation = adUseClient
    Set rs.ActiveConnection = cn
    rs.Open "SELECT * FROM Table1", , adOpenKeyset, adLockOptimistic, adCmdText
    
    'и так для каждого контрола нужно сделать привязку
    ...
    Me.Check1.DataField = "Check1" 'имя поля в таблице где хранится данное значение
    Set Me.Check1.DataSource = rs
    ...
    

'обработка нового

    rs.AddNew
    'вводите новые значения в поля
    ....
    rs.Update
    
'выбор нужной записи

    rs.Move  1 
    
'и тд и тп

Да прикольно..... а как нибудь по другому это сделать никак????
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:50
    #35195157
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
почитайте про DataBinding, а то у вас кошмар ,а не код (имхо)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2008, 13:52
    #35195168
Даулет Утепов
Даулет Утепов
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблемы с Check'ами
Konst_Oneпочитайте про DataBinding, а то у вас кошмар ,а не код (имхо)
Уже читаю.....................
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проблемы с Check'ами / 18 сообщений из 18, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 405ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2162531]:
 0ms
get settings:
 10ms
get forum list:
 20ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 80ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 46ms
get tp. blocked users:
 1ms
others: 228ms
total:  405ms
x
x
Закрыть


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