oSoapClient := CreateObject( "MSSOAP.SoapClient" ) não funciona

[mkyx]

Boa tarde pessoal, alguém poderia me dizer, porque os comandos abaixo pararam de funcionar? pois antes funcionava, de reperente começou a apresentar a mensagem de erro, "Erro! Ao tentar Acessar o WEB SERVICE", será que esqueci de compilar o programa faltando alguma LIB????, como solucionar esse problema???

TRY
oSoapClient := CreateObject( "MSSOAP.SoapClient30" )
CATCH
TRY
oSoapClient := CreateObject( "MSSOAP.SoapClient30" )
CATCH
ALERT( "Erro! Ao tentar Acessar o WEB SERVICE")
Return aRet
END
END

Desde já, agradeço a todos, pelo apoio dispensado à comunidade.

[ecmsoft]

Verifique se o SOAP ToolKIt 3.0 foi removido ou desativado ou bloqueado.

Tente instalá-lo novamente.

[sygecom]

Já tentou assim ?

TRY
   oSoapClient := GetActiveObject( "MSSOAP.SoapClient30" )
CATCH
   TRY
      oSoapClient := CreateObject( "MSSOAP.SoapClient30" )
   CATCH
      ALERT( "Erro! Ao tentar Acessar o WEB SERVICE")
      Return aRet
   END
END
 

[mkyx]

Instalei soap kit 3.0 e deu certo.