Ygg
|
Posted: Wed Apr 03, 2019 15:17 Post subject: |
|
|
Batya
спасибо за идею по поводу Msxml2.DOMDocument
Code: |
'====================================================
' Возвращаем значения атрибутов файлов ffxml
' (фильтров Filter Forge)
' 2019/04/03
'====================================================
Set xmlParser = CreateObject("Msxml2.DOMDocument")
xmlParser.async = False
xmlParser.load filename
On Error Resume Next
Set Node = xmlParser.selectSingleNode("//Information")
If Not Node is Nothing Then
content = Node.getAttribute("author")
content1 = Node.getAttribute("name-en")
content2 = Node.getAttribute("description-en")
content3 = Node.getAttribute("keywords-en")
End If
On Error GoTo 0
Set Node = Nothing
'====================================================
' Option.ini section
' [SearchInFFXML]
' Script=SearchInFFXML.vbs
' content=Author
' content1=Name
' content2=Description
' content3=Keywords
' extensions=ffxml
' FoldersPaths=0
'====================================================
|
|
|