> Dim binding As New WSHttpBinding() > binding.MaxReceivedMessageSize = 147483647 > binding.Security.Mode = SecurityMode.None > binding.Security.Message.ClientCredentialType = MessageCredentialType.Windows > binding.Security.Message.EstablishSecurityContext = True > binding.Security.Message.NegotiateServiceCredential = True > binding.Security.Transport.ClientCredentialType = HttpClientCredentialType.Windows > binding.Security.Transport.ProxyCredentialType = HttpProxyCredentialType.None > Dim address As New EndpointAddress(URL) > Return New mmDataAccessWCFSql(binding, address) >Glad you were able to figure it out, and thanks for posting your solution!