Set m_oAccessManager = UserSession.AccessManager
Set m_oFile = UserSession.FileManager.File(FileID)
' oSignRows - DVObjectManager.InfoRowCollection
Set oSignRows = m_oAccessManager.ListCryptObjects(m_oFile.ID, 0)
For Each oSignRow In oSignRows
' кто подписал?
MsgBox oSignRow.Value("AccountName")
Next oSignRow
Комментариев нет:
Отправить комментарий