これは、xml ドキュメントをフィルター処理するための私の VBScript です。
strInputFile、strOutputFile を入力および出力 XML ドキュメント ファイルに変更します。また、「arrWhiteList = Array ...」行を変更して、ドキュメントが必要なすべてのタイプをリストします。
option explicit
const strInputFile = "C:\Temp\YourModule.XML"
const strOutputFile = "C:\Temp\YourModule.filtered.XML"
Dim arrWhiteList
arrWhiteList = Array( "MyNamespace.Type1", "MyNamespace.Type2", "MyNamespace.Type3" )
Function isNameOk( strName )
    Dim className, i
    for each className in arrWhiteList
        i = InStr(strName, className)
        if i = 3 Then
            isNameOk = True
            exit function
        end if
    Next
    isNameOk = false
end function
Sub Main()
    Dim objXml, dicToRemove
    Set objXml = CreateObject("Msxml2.DOMDocument.6.0")
    objXml.Load strInputFile
    Set dicToRemove = CreateObject( "Scripting.Dictionary" )
    Dim node, strName
    for each node in objXml.documentElement.SelectNodes( "//member" )
        strName = node.getAttribute( "name" )
        if not isNameOk( strName ) then
            dicToRemove.add node, ""
        end if
    Next
    Dim nodeMembers, arrKeys
    Set nodeMembers = objXml.documentElement.SelectSingleNode( "//members" )
    arrKeys = dicToRemove.Keys
    for each node in arrKeys
        nodeMembers.removeChild node
    next
    objXml.save strOutputFile
End Sub
Call Main()