iLogic count all opened drawing

[Anonymous]

Hello,

I need to count how much drawing (IDW) are opened in Inventor.

I tried with this, but doesn't work...

Dim a As Integer = 0
a = ThisApplication.DrawingDocument.count

What do I do wrong ?

[frederic.vandenplas]

Dim i, iDrawCounter As Integer
For i = 1 To ThisApplication.Documents.VisibleDocuments.Count
If ThisApplication.Documents.VisibleDocuments.Item(i).DocumentType = kDrawingDocumentObject Then
    iDrawCounter = iDrawCounter + 1
    End If
Next i

MessageBox.Show(iDrawCounter &" drawing(s) is/are open", "My iLogic Dialog", MessageBoxButtons.OK, MessageBoxIcon.Asterisk, MessageBoxDefaultButton.Button1)

[Anonymous]

No, I'm looking for a simple code in one line, like "ThisApplication.DrawingDocuments.count".

Actually I use this :

Dim nbrIDW As Integer = 0
	
For Each doc In ThisApplication.Documents 
	If doc.DocumentType = kDrawingDocumentObject Then nbrIDW = nbrIDW + 1
Next

How can I use it with .count method ?

[frederic.vandenplas]

Good luck then!

[MechMachineMan]

When newbs both ask for help and tell you how to do things at the same time.........

Just make it a sub/function to call the counter in one line then.