Like I said I've been trying and trying but no luck. Below is what I have so far as a test script. I had different versions of it but they made no sense. Obviously this is not the main script. I’m not going to add this until this is fully working. I'm having some issues with the line that adds the hyperlink and the line that sets the hyperlink (line 15 and 18).

One day I need to learn this VBS stuff \:\(

 Code:
Break on

;Create Word object
$objWord = CreateObject("Word.Application")
;Make Word visible for debuging
$objWord.Visible=1
;Add an empty document
$objDoc = $objWord.Documents.Add()
$objSelection = $objWord.Selection

;Add the picture
$objShape = $objSelection.InlineShapes.AddPicture("d:\picture.gif")

;Add a hyperlink For the picture.
$objDoc.Hyperlinks.Add Anchor:=$objShape.Range, Address:="http://www.someurl.com"

;Use the InlineShapes Property To reference the Object.
$oHLink = $objDoc.InlineShapes(1).Hyperlink

;Exit Word.
;Disabled for debugging.
;$objWord.Quit

Sleep 10
_________________________
Mart

- Chuck Norris once sold ebay to ebay on ebay.