Список форумов Акцент Акцент
официальный форум разработчика программы Акцент
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

О проходе по Params в For Each...

 
Начать новую тему   Ответить на тему    Список форумов Акцент -> Акцент 7.0
Предыдущая тема :: Следующая тема  
Автор Сообщение
cern
Гость





СообщениеДобавлено: Пн Сен 07, 2009 12:33 pm    Заголовок сообщения: О проходе по Params в For Each... Ответить с цитатой

Подскажите, пожалуйста, почему при запуске следующего кода, выбрасывает ошибку "Объект не поддерживает это свойство или метод":

Set ag = workarea.agent(13232) ' он типа физ.лицо

For Each pm In ag.Params
MsgBox pm.Name
Next

Спасибо Smile
Вернуться к началу
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
Спасибо Smile


Странно, я регулярно использую подобный код, никаких проблем не замечал....Назовите уж версию и платформу для начала.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
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
Спасибо Smile


Странно, я регулярно использую подобный код, никаких проблем не замечал....Назовите уж версию и платформу для начала.


Акцент 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
Спасибо Smile


Странно, я регулярно использую подобный код, никаких проблем не замечал....Назовите уж версию и платформу для начала.


Акцент 7.0 билд 486

Вообще, задача в более широком смысле: создание копии корреспондента со всем добром, что есть у оригинала)


Set ag = workarea.agent(13232) ' он типа физ.лицо
with ag.Params
For i = 1 to .Count
set pm = .Item(i)
Next
end with

Только еще с фактами придется побороться.

Запросами проще и быстрее.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
cern
Гость





СообщениеДобавлено: Пн Сен 07, 2009 6:45 pm    Заголовок сообщения: Ответить с цитатой

Спасибо всем) Я через обычный цикл так и делал... просто думал, если это коллекция, то для неё пригодна форма For Each)
Вернуться к началу
olimp
Site Admin


Зарегистрирован: 10.03.2005
Сообщения: 2661

СообщениеДобавлено: Ср Сен 09, 2009 2:20 pm    Заголовок сообщения: Ответить с цитатой

cern писал(а):
Спасибо всем) Я через обычный цикл так и делал... просто думал, если это коллекция, то для неё пригодна форма For Each)

Это ж наша коллекция Smile
В некоторых коллекциях нет метода для VB Script, который использует For Each для перебора элементов. Вот эта конструкция и не работает.

Можно поправить, но нужно сказать какие еще коллекции не работают в For Each. Чтобы не возвращаться более к этому вопросу.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов Акцент -> Акцент 7.0 Часовой пояс: GMT + 2
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2005 phpBB Group