|
Связь элементов
|
|||
---|---|---|---|
#18+
(на примере базы Biblio.mdb) допустим на форме есть комбобокс и текстбокс подвязаны с таблицей авторы в комбе у нас ID а в текстбоксе имена авторов Ну вот, как написать, чтоб при выборе в комбе любого числа (ID) в текстбоксе отражались изменения авторов. ... |
|||
:
Нравится:
Не нравится:
|
|||
21.10.2003, 11:24 |
|
Связь элементов
|
|||
---|---|---|---|
#18+
У комба есть событие Combo1_Change(), в него и положи код изменения текстбокса. ... |
|||
:
Нравится:
Не нравится:
|
|||
21.10.2003, 11:44 |
|
Связь элементов
|
|||
---|---|---|---|
#18+
ну а как это сделать, поэтому я и спрашиваю, а где писать DataCombo1_Change() я знаю ... |
|||
:
Нравится:
Не нравится:
|
|||
21.10.2003, 11:52 |
|
Связь элементов
|
|||
---|---|---|---|
#18+
Не знаю как ента делаетса в Accese, не лублу я его... А в стандаотном VB примерно так: Допустим есть текстовое поле Text1 и комбо Combo1. При этом свойство DataSourse обоих элементов равно rs (где rs - статистический набор записей), свойство Text1.DataField="Field1", Combo1.DataField="Field2". Не буду писать, что Combo1 нужно сначала заполнить (.Add). Теперь обрабатываем событие DataCombo1_Change(): sub DataCombo1_Change() rs.Find "Field2 = " & Combo1.Text if rs.eof then rs.MoveFirst end sub Это, конечно, очень примерно, но... ... |
|||
:
Нравится:
Не нравится:
|
|||
21.10.2003, 12:26 |
|
Связь элементов
|
|||
---|---|---|---|
#18+
Спасибо что ответили, только теперь он говорит что аргументы имеют не верный тип или вступают в конфликт у меня для комбо стоит подвязка AU_ID для texta датафилд = author Private Sub DataCombo1_Change() Adodc1.Recordset.Find "author" & DataCombo1.Text If Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveFirst End Sub что не так? ... |
|||
:
Нравится:
Не нравится:
|
|||
21.10.2003, 13:18 |
|
Связь элементов
|
|||
---|---|---|---|
#18+
Все дошло, вот как надо Adodc1.Recordset.Find "au_id = '" & DataCombo1.Text & "'" ... |
|||
:
Нравится:
Не нравится:
|
|||
21.10.2003, 13:27 |
|
Связь элементов
|
|||
---|---|---|---|
#18+
Adodc1.Recordset.Find "author" & DataCombo1.Text после "author" знак "=" должен быть и это поле текстовое? Тада значение в кавычки заключать нада: Adodc1.Recordset.Find "author" & """DataCombo1.Text""" Кроме того у метода Find, кроме критерия поиска есть ещё ряд необязательных аргументов + в Access'ом может быть несколько иначе. Так, что эксперементируй. ... |
|||
:
Нравится:
Не нравится:
|
|||
21.10.2003, 13:31 |
|
Связь элементов
|
|||
---|---|---|---|
#18+
И ещё... четь не забыл. На время поиска по рекордсету оба элемента (текстбокс и сомбо) лучше освободить от привязки к ентому рекордсету, т.е.: сначала Text1.DataSourse=Nothing Combo1.DataSourse=Nothing потом ищем и: Text1.DataSourse=rs Combo1.DataSourse=rs ... |
|||
:
Нравится:
Не нравится:
|
|||
21.10.2003, 13:36 |
|
Связь элементов
|
|||
---|---|---|---|
#18+
Все ОК спасибо, и еще вопросик Если ты представялешь базу biblio то тебе бедет легче соорентироваться. так вот, у нас на форме есть: Adodc1, datacombo1, textbox1 оба они привязаны к adodc1 (код я не писал ни строчки) через DSN которая в свою очередь связана с таблицей Authors, все работоает нормально. Допустим что в combe у нас связь с полем au_id из таблицы authors как засунуть в техтбокс ISBN (ихняя идентификация) которая находится в таблице title author ... |
|||
:
Нравится:
Не нравится:
|
|||
21.10.2003, 14:14 |
|
Связь элементов
|
|||
---|---|---|---|
#18+
"Засунуть", как ты варазился (выразилась?) просто, но базу biblio не знаю, опиши подробна поля этих таблиц и по какому полю они связаны. Одно могу сказать уже сейчас: adodc нужно будет связывать не с конкретной таблицей, а строить SQL-запрос, т.е. command type в его свойствах поставить равное 8, а в текстовое поле command text написать запрос. С текстом запроса помогу, кода опишешь мне таблицы, и куда какое поле запихать. ... |
|||
:
Нравится:
Не нравится:
|
|||
22.10.2003, 09:59 |
|
|
start [/forum/topic.php?fid=60&msg=32300784&tid=2170571]: |
0ms |
get settings: |
9ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
56ms |
get topic data: |
11ms |
get forum data: |
3ms |
get page messages: |
43ms |
get tp. blocked users: |
1ms |
others: | 13ms |
total: | 157ms |
0 / 0 |