M
MMN
Столкнулся с проблемой перебора документов во вьюхе
вылетает на строке
Set docX = viewX.GetNextDocument(docX)
The Document is not in View EmployeeByNameWork
если из кода выкинуть
While Not telDoc Is Nothing
Set telDoc=view.GetNextDocument(telDoc)
Wend
то все проходит отлично.
В чем проблема ?? Перебор в переборе разве нельзя делать ??
Переменные вроде не пересекаются.
Код:
Set viewX = CS_GetCurrentDb.GetView( "EmployeeByNameWork" )
Set docX = viewX.GetFirstDocument
While Not(docX Is Nothing)
Set view=CS_GetCurrentDb.GetView("(AllPerson)")
Set telDoc=view.GetFirstDocument
While Not telDoc Is Nothing
Set telDoc=view.GetNextDocument(telDoc)
Wend
Set docX = viewX.GetNextDocument(docX)
Wend
вылетает на строке
Set docX = viewX.GetNextDocument(docX)
The Document is not in View EmployeeByNameWork
если из кода выкинуть
While Not telDoc Is Nothing
Set telDoc=view.GetNextDocument(telDoc)
Wend
то все проходит отлично.
В чем проблема ?? Перебор в переборе разве нельзя делать ??
Переменные вроде не пересекаются.