Тема: Модуль Импорта документов

после подключения Модуля Импорта документов, во время его использования при добавлении файлового состава возникает ошибка, и видит файлы только с корневого каталога, подкаталоги не раскрывает

Post's attachments

Path.jpg 479.58 Кб, файл не был скачан. 

You don't have the permssions to download the attachments of this post.

Re: Модуль Импорта документов

Добрый день! Какая операционная система используется?

Re: Модуль Импорта документов

Нет ли у вас скриптового модуля с именем Path?
Если есть, то переименуйте его.

Спасибо сказали: Kyle1

Re: Модуль Импорта документов

спасибо, все дело было с именем PATH, был такой модуль, переименовал и теперь все в порядке.

(изменено: Антон Мороков, 16 августа 2012 11:24:05)

Re: Модуль Импорта документов

В продолжении темы... При закрытии одноименного модуля... происходит ошибка. Может кто знает что за проблема.
Открываю модуль, хожу по дереву диска, меняю вид документа, хожу по вкладкам, потом выхожу не сохранив изменения и возникает ошибка.
Если просто открыть модуль и сразу закрыть ошибки нет.
Модуль Импорта документов

Post's attachments

00112.jpg 214.91 Кб, файл не был скачан. 

You don't have the permssions to download the attachments of this post.

Re: Модуль Импорта документов

Ошибка похоже возникает после хождения по дереву локальных дисков/папок. Будем разбираться.

Re: Модуль Импорта документов

TechnologiCS 6.2.0(15910).

Кому срочно надо и разбирается в коде, можно внести следующие исправления
В скриптовом модуле Import_Documents вставь на процедуру FormEvent_OnFormDestroy и изменить ее текст на следующий

Sub FormEvent_OnFormDestroy(Form)
'Form As ITCSForm              
    'Tree as ICSDNAxDbTree                            
    Set Tree = Form.c_AxDbTree_Folders   
    While Tree.DbTree.RootNodes.Count>0 
      Tree.RemoveNode( Tree.DbTree.RootNodes.Item(0) )
    Wend    
    
    Set g_ListDocTypes      = Nothing
    Set g_ListWorkFlowTypes = Nothing
    Set g_ListWorkGroups    = Nothing
    Set g_FileList          = Nothing
    Set g_ListDocFiles      = Nothing 
    Set g_ModuleDocFiles    = Nothing
    Set g_DocListCreated    = Nothing   
    
    Call Form.UnRegisterModuleEvent(MODULE_DOCCREATE)
    Call Form.UnRegisterModuleEvent(MODULE_VERSIONS)
    Call Form.UnRegisterModuleEvent(MODULE_DOCCREATE)
    
End Sub                 

Ошибка должна исчезнуть. Постараемся выложить в СП.

Спасибо сказали: Антон Мороков, Kyle2

(изменено: Антон Мороков, 16 августа 2012 13:03:15)

Re: Модуль Импорта документов

Да, действительно. Ошибка исчезла.

Re: Модуль Импорта документов

поставил на другой базе этот модуль, исправил процедуру FormEvent_OnFormDestroy, проверил на совпадение имен, все работает за исключением раскрывания локальных каталогов.

Re: Модуль Импорта документов

Странно конечно, попробуйте еще общие модули скриптов перезалить (CSDN_Const) в дистрибутиве присутствует.