Taking this a step further I am able to get to some of the attibutes.
$connect = $page.Drop($page.Application.ConnectorToolDataObject,0,0)
$start = $connect.CellsU("BeginX").GlueTo($shape1.CellsU("PinX"))
$end = $connect.CellsU("EndX").GlueTo($shape2.CellsU("PinX"))
$connect.set_Text("80,443")
What i don't see if the line types attribute like i see described in the Graphical side of the tool. I need to know what the name of the atribute is to set the endpoints to have arrows.