ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Есть ли возможность добавлять значения в список???
23 сообщений из 23, страница 1 из 1
Есть ли возможность добавлять значения в список???
    #32332548
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
Подскажите пожалуйста!!
Как можно сделать:

1. Есть список. Источник строк - список полей таблицы. Хотелось бы, чтобы по нажатию кнопки выделенное значение в этом списке переходило во второй список...

2. И еще, моно ли сделать так, чтобы в списке полей отображались не названия полей, а подписи к полям(хранящиеся в таблице)...???
...
Рейтинг: 0 / 0
24.11.2003, 08:11
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332593
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Geo
Участник
по п. 2.
Наверное, имеет смысл заполнять список программно.
on error resume next
for eact f in tbl.fields
me.список1.value = f.caption
if err.nunmber then me.список1.value = f.name
next
on error goto 0

по п. 1.
Наверное, имеет смысл заполнять список программно.
private sub Btn1_Click()
if not isnull(me.список1.value) then me.список2.additem(me.список1.value)
end sub
...
Рейтинг: 0 / 0
24.11.2003, 09:59
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332594
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
СПАСИБО!!!
...
Рейтинг: 0 / 0
24.11.2003, 10:00
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332607
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
на п.1 говорит, что Object doesn't support this property or method (Error 438)
Вот такая строка...
If Not IsNull(Me.sp1.Value) Then Me.sp2.additem (Me.sp1.Value)
...
Рейтинг: 0 / 0
24.11.2003, 10:12
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332613
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Senin Viktor
Участник
>на п.1 говорит, что Object doesn't support this property or method (Error 438)

Прочти здесь
Особо пункт Рекомендуется подпункт 5
...
Рейтинг: 0 / 0
24.11.2003, 10:15
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332619
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
?????
...
Рейтинг: 0 / 0
24.11.2003, 10:19
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332624
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
Я работаю в Access2000 :((
...
Рейтинг: 0 / 0
24.11.2003, 10:20
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332629
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Я работаю в Access2000
Вот с этого и надо было начинать :)

Если нет у тебя AddItem - ну значит и не надо.
Делай вместо него что-нить типа
Код: plaintext
1.
2.
3.
4.
If Me.список2.RowSource = vbNullString Then
    Me.список2.RowSource = Me.список2.RowSource &  ";"  & CStr(me.список1.value)
Else
    Me.список2.RowSource = CStr(me.список1.value)
End If
...
Рейтинг: 0 / 0
24.11.2003, 10:28
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332641
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
:)) учту...

Но... Debug.Print Me.sp2.RowSource выводит, что в Me.sp2.RowSource - значение попадает.
Но в самом списке оно не отображается, он остается таким же пустым, каким и был. :((
...
Рейтинг: 0 / 0
24.11.2003, 10:41
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332693
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
А Me.sp2.Requery не спасает?
...
Рейтинг: 0 / 0
24.11.2003, 11:30
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332717
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
неа, не спасает :((
...
Рейтинг: 0 / 0
24.11.2003, 11:43
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332720
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
A RowSourceType чему равно?
...
Рейтинг: 0 / 0
24.11.2003, 11:44
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332730
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
было равно "Список полей", изменила на "Список значений". Вроде заработало... :)) Спасибо!!
...
Рейтинг: 0 / 0
24.11.2003, 11:49
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332745
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
Только учтите, что размер свойства RowSource ограничен 2048b, поэтому я предпочитаю заполнять значения функцией в RowSourceType
...
Рейтинг: 0 / 0
24.11.2003, 12:00
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332767
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
Это как, если не секрет? Подскажите пожалуйста..
...
Рейтинг: 0 / 0
24.11.2003, 12:15
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32332797
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
В Help по RowSourceType в последнем абзаце перед примером есть ссылка на "specific function format" и там есть пример.
...
Рейтинг: 0 / 0
24.11.2003, 12:35
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32333686
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
а с подписями к полям у меня так и не получилось :((
...
Рейтинг: 0 / 0
25.11.2003, 07:47
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32333759
Shkurenko Alexander
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shkurenko Alexander
Участник
> а с подписями к полям у меня так и не получилось :((

У объекта поле( Field ) должно быть такое свойство( Property ), как описание( Description ).
...
Рейтинг: 0 / 0
25.11.2003, 09:30
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32333863
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
rst.Fields(i).Description - так?
...
Рейтинг: 0 / 0
25.11.2003, 10:44
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32333891
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Не-а, не так
Вот так
Код: plaintext
CurrentDb.TableDefs( "TableName" ).Fields(i).Properties( "Description" )

Только учти, что если для поля подпись отсутствует - то вывалится ошибка
Поэтому можно примерно так
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Dim tds As TableDefs
Set tds = CurrentDb.TableDefs
Dim td As TableDef
Set td = tds( "ИмяТаблицы" )

Dim strFieldDescription As String
Dim fld As Field
For Each fld In td.Fields
    On Error Resume Next
    strFieldDescription = fld.Properties( "Description" )
    If Err.Number <>  0  Then
        strFieldDescription = fld.Name
    End If
    On Error Goto  0 
    ' И используй strFieldDescription как душе угодно '
Next i
...
Рейтинг: 0 / 0
25.11.2003, 11:04
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32333896
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
Не пойму, вроде речь шла о Caption?
...
Рейтинг: 0 / 0
25.11.2003, 11:07
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32333909
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
2 Serge Gavrilov
Угу.
Можно и через рекордсет с помощью Caption.
Вроде бы с той же оговоркой - если подпись не задана, то ошибка будет, все равно придется ее ловить и именем поля заменять.
...
Рейтинг: 0 / 0
25.11.2003, 11:15
| Ответить | Цитировать | Написать  
Есть ли возможность добавлять значения в список???
    #32334238
gal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gal
Гость
УРАААА!!!! Дайте товарищ, Лох Позорный, я вас расцелую!!!

Спасибо вам большое. У меня все получилось!!!!
...
Рейтинг: 0 / 0
25.11.2003, 14:17
| Ответить | Цитировать | Написать  
23 сообщений из 23, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Есть ли возможность добавлять значения в список???
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&fpage=1716&tid=1678037]:
 0ms
get settings:
 11ms
get forum list:
 8ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 20ms
get topic data:
 5ms
get forum data:
 1ms
get page messages:
 30ms
get tp. blocked users:
 1ms
others: 233ms
total:  313ms
созд. / загр.: 313ms
x
x
Закрыть


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