Dim loBasicHttpBinding As System.ServiceModel.BasicHttpBinding = New System.ServiceModel.BasicHttpBinding() loBasicHttpBinding.Security.Mode = System.ServiceModel.BasicHttpSecurityMode.Transport Dim loEndpointAddress As System.ServiceModel.EndpointAddress = New System.ServiceModel.EndpointAddress(lcUrl) Dim loMyService As MyService.MyServiceSoapClient = New MyService.MyServiceSoapClient(loBasicHttpBinding, loEndpointAddress)