Inutilização NFe

[Hackbart 0]

Estou com o erro:

 

O nome remoto nao pode ser resolvido:"hom.sefazvirtual.fazenda.gov.br"

 

na hora em que chamo o webservice.

 

Dim cab As New Inutilizacao2.nfeCabecMsg
Dim wsMsg As Inutilizacao2.NfeInutilizacao2

cab.cUF = UrlWs.CodigoUF
cab.versaoDados = "2.00"

'wsMsg.Url = UrlWs.UrlNfeInutilizacao ' "https://nfe.fazenda.sp.gov.br/nfeweb/services/nfeinutilizacao2.asmx"
wsMsg = New Inutilizacao2.NfeInutilizacao2(UrlWs.UrlNfeInutilizacao)
MsgBox(UrlWs.UrlNfeInutilizacao)
wsMsg.nfeCabecMsgValue = cab
wsMsg.Timeout = 100000
wsMsg.ClientCertificates.Add(CERT)
wsMsg.SoapVersion = Web.Services.Protocols.SoapProtocolVersion.Soap12

' ------------------------------------------- Cria o XML de Inutilizacao ------------------------------------------------------
Dim str As String = XmlToString("C:\Users\Henrique\Downloads\32142749415200057855001000008193000008193-ped-inu.xml")
Dim xmldoc = New XmlDocument()

' Dim xmlString As String = XmlToString("C:\Users\Henrique\Downloads\32142749415200057855001000008193000008193-ped-inu.xml")
' ------------------------------------------- Assina o XML ------------------------------------------------------
Dim OAd As New AssinaturaDigitalClass()

OAd.Assinar("C:\Users\Henrique\Downloads\32142749415200057855001000008193000008193-ped-inu.xml", "infInut", CERT)

xmldoc.Load("C:\Users\Henrique\Downloads\32142749415200057855001000008193000008193-ped-inu.xml")
' ------------------------------------------- Validando o XML Assinado ------------------------------------------------------
Dim strResultadoValidacao As String = ValidarXML(xmldoc, ("C:\Users\Henrique\Desktop\PL_006i\inutNFe_v2.00.xsd"))
If strResultadoValidacao = String.Empty Then sMsgStatus = "Arquivo Validado com Sucesso" Else sMsgStatus = "Falha na validação do XML!"

 

' ------------------------------------------- Enviando Inutilização ------------------------------------------------------
Dim oNodeRetorno As XmlElement
Dim oNoPrincipal As XmlElement
oNodeRetorno = wsMsg.nfeInutilizacaoNF2(xmldoc) ' Aki esta o erro
Dim s_cStat As String = "", s_xMotivo As String = "", s_xNumeroProtocolo As String = "", sVersao As String = ""
MsgBox(oNodeRetorno.InnerXml)

[KhaosDoctor 242]

O WebService não foi encontrado, verifique se é este mesmo o endereço.