W
wowa
Можно определить, файл прикреплен к доку или к RTF?
вообщем проблема такова...
Есть один файл, который прикреплен к RTF, и еще один, который прикреплен к документу
Можно определить файл, который прикреплен к документу?
Задача немного упрощается тем, что файл, который прикреплен к документу, был прикреплен последним!!
Я что-то себе набросал типа такого:
В итоге, vNewAttach - последний прикрепленный файл должен быть, но к сожалению вроде не так...
вообщем проблема такова...
Есть один файл, который прикреплен к RTF, и еще один, который прикреплен к документу
Можно определить файл, который прикреплен к документу?
Задача немного упрощается тем, что файл, который прикреплен к документу, был прикреплен последним!!
Я что-то себе набросал типа такого:
Код:
Set vNewAttach = Nothing
Forall item In doc.Items
If Ucase( item.Name ) = "$FILE" Then
If vNewAttach Is Nothing Then
Set vNewAttach = item
Else
If ( Cdbl(item.LastModified) > Cdbl(vNewAttach.LastModified) ) Then
Delete vNewAttach
Set vNewAttach = item
End If
End If
End If
End Forall