I can not access, does anyone have an idea?
Certificate and chain installed correctly.
When running x.EnviarLoteEventos(root) , returns:
connecting to the server machine 'webservices.envio.esocial.gov.br' failed
Dim x As New esocial_envio.ServicoEnviarLoteEventos
Dim xd As New System.Xml.XmlDocument
Dim cert As X509Certificate2
xd.PreserveWhitespace = False
xd.LoadXml(vXml)
cert = BuscaCertificado(vCertificado)
x.ClientCertificates.Add(cert)
System.Net.ServicePointManager.ServerCertificateValidationCallback = AddressOf AcceptAllCertifications
Dim root As System.Xml.XmlElement
root = xd.DocumentElement
System.Net.ServicePointManager.SecurityProtocol = Net.SecurityProtocolType.Tls11
Dim resposta As Object
resposta = x.EnviarLoteEventos(root)