Getting a List of Attached Images

[Marshal_Rosenberg60828]

Hi all,

How does one programatically get a list of image Filenames attached to a DWG file? (The list which appears with the Image Manager)

[richard.binning]

Try this:

Public Sub LocalDeps_Images()
	Dim myFileDeps As AcadFileDependencies
	Dim myFileDep As AcadFileDependency
	Set myFileDeps = ThisDrawing.FileDependencies
	For Each myFileDep In myFileDeps
		If myFileDep.Feature Like "Acad:Image" Then
			ThisDrawing.Utility.Prompt "Image: " & myFileDep.FileName & " Found Path is :" & myFileDep.FullFileName & vbCrLf
		End If
	Next myFileDep
End Sub

[Marshal_Rosenberg60828]

Outside of looking at each individual Object in Model and Paperspace, is there a way to get this list for pre - 2004 Drawings?

[richard.binning]

It would be much faster to search using ObjectDBX with VBA outside of drawing. If you need to search this file while it is open, then you are at the mercy of searching each entity. Perhaps a quick save would solve your problem?

[Marshal_Rosenberg60828]

Hi Richard,

I don't know anything about OBJECTDBX. Can you suggest a reference?

[richard.binning]

Check out for a pointer...