🚀 go-pugleaf

David-- 

First, ContentType won't necessarily tell you that the PageItem contains a graphic--empty PageItems can have a ContentType of idGraphic. So the trick is to see if PageItem.PageItems.Count is equal to 1. If it is, there's a good chance it contains a graphic (though it could be a group, a text frame, or another PageItem). 

If you're looking for images, specifically, then you can say: 



Rem Given a PageItem "myPageItem" 
If myPageItem.Images.Count > 0 Then 
Set myImage = myPageItem.Images.Item(1) 
Set myLink = myImage.Link 
set myNewLink = myLink.Relink("c:\myImage.tif") 
End If 




...but is "Relink" really what you want? Relink replaces the image with another image (it's poorly named). If what you want to do is refresh the link to the original image, use Update. 

The VB object browser, in my opinion, does a pretty good job of exposing the relationship between objects...or were you looking for a diagram? 

Thanks, 

Ole