🚀 go-pugleaf

The main thing that's breaking your script is that PDFs, images, EPSes, 
etc, are no longer page items -- instead, they belong to a new 
superclass called graphic. While we're making that change, we can 
rework things a bit to make the script a bit faster. Here's a different 
approach to the main part of your script:

tell application "InDesign CS"
	-- deal with containers first
	-- get a lits of all selected rectangles, polygons and ovals that 
contain a graphic
	set theContainers to items of selection whose class is in {rectangle, 
polygon, oval} and class of graphic 1 of it is in {EPS, PDF, image, 
PICT, WMF}
	repeat with myItem in theContainers
		try
			if myFilePath is true then
				set myLinkName to file path of item link of graphic 1 of myItem as 
Unicode text
			else
				set myLinkName to name of item link of graphic 1 of myItem as 
Unicode text
			end if
		on error
			set myLinkName to "File is embedded."
		end try
		my myMakeLabel(myItem, myLinkName, myFrameHeight)
	end repeat
	
	-- now deal with any directly selected graphics
	set theGraphics to items of selection whose class is in {EPS, PDF, 
image, PICT, WMF}
	repeat with myItem in theGraphics
		try
			if myFilePath is true then
				set myLinkName to file path of item link of myItem as Unicode text
			else
				set myLinkName to name of item link of myItem as Unicode text
			end if
		on error
			set myLinkName to "File is embedded."
		end try
		my myMakeLabel(parent of myItem, myLinkName, myFrameHeight)
	end repeat
end tell

If you actually want to run it on a spread or a whole document, you 
could just use the second part of the above and change "selection" to 
"all items of <spread x/document x>".

--
Shane Stanley <sstanley@myriad-com.com.au>