| Предыдущая тема :: Следующая тема |
| Автор |
Сообщение |
cern
Гость
|
 Добавлено: Пн Сен 07, 2009 12:33 pm Заголовок сообщения: О проходе по Params в For Each... |
 |
|
Подскажите, пожалуйста, почему при запуске следующего кода, выбрасывает ошибку "Объект не поддерживает это свойство или метод":
Set ag = workarea.agent(13232) ' он типа физ.лицо
For Each pm In ag.Params
MsgBox pm.Name
Next
Спасибо  |
|
| Вернуться к началу |
|
 |
AllexL
Зарегистрирован: 10.03.2005
Сообщения: 434
Откуда: Donetsk
|
| Добавлено: Пн Сен 07, 2009 2:19 pm Заголовок сообщения: Re: О проходе по Params в For Each... |
|
|
| cern писал(а): | Подскажите, пожалуйста, почему при запуске следующего кода, выбрасывает ошибку "Объект не поддерживает это свойство или метод":
Set ag = workarea.agent(13232) ' он типа физ.лицо
For Each pm In ag.Params
MsgBox pm.Name
Next
Спасибо |
Странно, я регулярно использую подобный код, никаких проблем не замечал....Назовите уж версию и платформу для начала. |
|
| Вернуться к началу |
|
|
cern
Гость
|
| Добавлено: Пн Сен 07, 2009 2:48 pm Заголовок сообщения: Re: О проходе по Params в For Each... |
|
|
| AllexL писал(а): | | cern писал(а): | Подскажите, пожалуйста, почему при запуске следующего кода, выбрасывает ошибку "Объект не поддерживает это свойство или метод":
Set ag = workarea.agent(13232) ' он типа физ.лицо
For Each pm In ag.Params
MsgBox pm.Name
Next
Спасибо |
Странно, я регулярно использую подобный код, никаких проблем не замечал....Назовите уж версию и платформу для начала. |
Акцент 7.0 билд 486
Вообще, задача в более широком смысле: создание копии корреспондента со всем добром, что есть у оригинала) |
|
| Вернуться к началу |
|
|
AllexL
Зарегистрирован: 10.03.2005
Сообщения: 434
Откуда: Donetsk
|
| Добавлено: Пн Сен 07, 2009 3:27 pm Заголовок сообщения: Re: О проходе по Params в For Each... |
|
|
1. Неизвестна платформа - DAO или MSSQL....
2. Если СКЛ, то я бы написал на T-SQL
3. Приведите больше кода, начиная с создания нового корр-та.... |
|
| Вернуться к началу |
|
|
olimp
Site Admin
Зарегистрирован: 10.03.2005
Сообщения: 2661
|
| Добавлено: Пн Сен 07, 2009 6:30 pm Заголовок сообщения: Re: О проходе по Params в For Each... |
|
|
| cern писал(а): | | AllexL писал(а): | | cern писал(а): | Подскажите, пожалуйста, почему при запуске следующего кода, выбрасывает ошибку "Объект не поддерживает это свойство или метод":
Set ag = workarea.agent(13232) ' он типа физ.лицо
For Each pm In ag.Params
MsgBox pm.Name
Next
Спасибо |
Странно, я регулярно использую подобный код, никаких проблем не замечал....Назовите уж версию и платформу для начала. |
Акцент 7.0 билд 486
Вообще, задача в более широком смысле: создание копии корреспондента со всем добром, что есть у оригинала) |
Set ag = workarea.agent(13232) ' он типа физ.лицо
with ag.Params
For i = 1 to .Count
set pm = .Item(i)
Next
end with
Только еще с фактами придется побороться.
Запросами проще и быстрее. |
|
| Вернуться к началу |
|
|
cern
Гость
|
| Добавлено: Пн Сен 07, 2009 6:45 pm Заголовок сообщения: |
|
|
| Спасибо всем) Я через обычный цикл так и делал... просто думал, если это коллекция, то для неё пригодна форма For Each) |
|
| Вернуться к началу |
|
|
olimp
Site Admin
Зарегистрирован: 10.03.2005
Сообщения: 2661
|
| Добавлено: Ср Сен 09, 2009 2:20 pm Заголовок сообщения: |
|
|
| cern писал(а): | | Спасибо всем) Я через обычный цикл так и делал... просто думал, если это коллекция, то для неё пригодна форма For Each) |
Это ж наша коллекция
В некоторых коллекциях нет метода для VB Script, который использует For Each для перебора элементов. Вот эта конструкция и не работает.
Можно поправить, но нужно сказать какие еще коллекции не работают в For Each. Чтобы не возвращаться более к этому вопросу. |
|
| Вернуться к началу |
|
|
|
FAQ
Поиск
Пользователи
Группы
Регистрация
Профиль
Войти и проверить личные сообщения
Вход
