Archive As IArchive ( PropertyGet )

Архив документов

Синтаксис:

objectvariable.Archive

objectvariable - IOcs_Application

Возвращает: указатель на Archive


Пример на VB:
Dim OCS As CSDN.OCS
Dim App As CSDN.Ocs_Application
Sub Test()
    Call Login
    
    Dim Archive As CSDN.Archive
    
    Set Archive = App.Archive
    
    I = Archive.ShowModal("Архив документов")
        
    Set Archive = Nothing
    
End Sub
Sub Login()
    
    If OCS Is Nothing Then Set OCS = CreateObject("CSDN.OCS")
    
    If App Is Nothing Then Set App = OCS.Login 
    
End Sub