Bingo!--- thanks, i changed the object creation to:

Set ws = CreateObject("MSSOAP.SoapClient30")

And worked a treat thanks for your help

John