Function DPM_OnOpenBatch(DCBatch)
nDocument = DCBatch.GetDocumentCount
For i = 0 To nDocument - 1
Set DCDoc = DCBatch.GetDocument(i)
nAttribute = DCDoc.GetAttributecount
For a = 0 To nAttribute - 1
Attribute = DCDoc.GetAttributeValue(a)
Name = DCDoc.GetAttributeName(a)
Attribute = UCase(Attribute)
dcLog InfoLog, "before index+ [" & Name & "]:" & VBNewLine & Attribute & ""
Next
Next
End Function |
Function DPM_OnOpenBatch(DCBatch)
nDocument = DCBatch.GetDocumentCount
For i = 0 To nDocument - 1
Set DCDoc = DCBatch.GetDocument(i)
nAttribute = DCDoc.GetAttributecount
For a = 0 To nAttribute - 1
Attribute = DCDoc.GetAttributeValue(a)
Name = DCDoc.GetAttributeName(a)
Attribute = UCase(Attribute)
dcLog InfoLog, "before index+ [" & Name & "]:" & VBNewLine & Attribute & ""
Next
Next
End Function