Re: Работа с вебсервисами Росреестра
Добавлено: 29 апр 2015, 17:54
при обращении к сервису "https://portal.rosreestr.ru:4433/cxf/External?wsdl" отлавливаю exception:
Error!
Прослушивание на http://10.129.224.45:8080/cxf/External не выполняла ни одна конечная точка, которая могла бы принять сообщение. Среди прочих причин это могло быть вызвано неправильным адресом или действием SOAP. Подробнее см. в описании InnerException (если имеется).
Exception:
System.Net.WebException: Невозможно соединиться с удаленным сервером ---> System.Net.Sockets.SocketException: Попытка установить соединение была безуспешной, т.к. от другого компьютера за требуемое время не получен нужный отклик, или было разорвано уже установленное соединение из-за неверного отклика уже подключенного компьютера 10.129.224.45:8080
в System.Net.Sockets.Socket.DoConnect(EndPoint endPointSnapshot, SocketAddress socketAddress)
в System.Net.ServicePoint.ConnectSocketInternal(Boolean connectFailure, Socket s4, Socket s6, Socket& socket, IPAddress& address, ConnectSocketState state, IAsyncResult asyncResult, Exception& exception)
--- Конец трассировки внутреннего стека исключений ---
в System.Net.The thread 0xb10 has exited with code 259 (0x103).
The thread 0x1af8 has exited with code 259 (0x103).
The program '[3292] WebServiceTutorial.vshost.exe: Program Trace' has exited with code 0 (0x0).
The program '[3292] WebServiceTutorial.vshost.exe' has exited with code 0 (0x0).
HttpWebRequest.GetRequestStream(TransportContext& context)
в System.Net.HttpWebRequest.GetRequestStream()
в System.ServiceModel.Channels.HttpOutput.WebRequestHttpOutput.GetOutputStream()
Мой код:
Public Class WebServiceForm
Private Sub WebServiceForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim req As New ServiceReferenceRosReestr.createRequestIn()
Dim trt As New ServiceReferenceRosReestr.createRequestOut()
Dim snd As New ServiceReferenceRosReestr.ExternalSEIClient()
req.okato = 60401000000 ' ОКАТО
req.region = 61 ' регион в который необходимо отправить заявление
req.requestType = 558101010000 ' Запрос о предоставлении сведений, внесенных в государственный кадастр недвижимости
req.requestData = IO.File.ReadAllBytes("C:\REQ_54de93c8-e21a-4ec7-adea-2df6daec504f.zip"
Try
trt = snd.createRequest(req)
Dim rNum = trt.requestNumber
Dim sts = trt.status
MsgBox("rNum = " & rNum.ToString() & "; sts = " & sts.ToString() & ";"
Catch ex As Exception
MsgBox("Error!" & vbCrLf & ex.Message & vbCrLf & "Exception:" & vbCrLf & ex.InnerException.ToString())
Me.Close()
End Try
End Sub
End Class
Помогите пожалуйста и заранее большое спасибо!
Error!
Прослушивание на http://10.129.224.45:8080/cxf/External не выполняла ни одна конечная точка, которая могла бы принять сообщение. Среди прочих причин это могло быть вызвано неправильным адресом или действием SOAP. Подробнее см. в описании InnerException (если имеется).
Exception:
System.Net.WebException: Невозможно соединиться с удаленным сервером ---> System.Net.Sockets.SocketException: Попытка установить соединение была безуспешной, т.к. от другого компьютера за требуемое время не получен нужный отклик, или было разорвано уже установленное соединение из-за неверного отклика уже подключенного компьютера 10.129.224.45:8080
в System.Net.Sockets.Socket.DoConnect(EndPoint endPointSnapshot, SocketAddress socketAddress)
в System.Net.ServicePoint.ConnectSocketInternal(Boolean connectFailure, Socket s4, Socket s6, Socket& socket, IPAddress& address, ConnectSocketState state, IAsyncResult asyncResult, Exception& exception)
--- Конец трассировки внутреннего стека исключений ---
в System.Net.The thread 0xb10 has exited with code 259 (0x103).
The thread 0x1af8 has exited with code 259 (0x103).
The program '[3292] WebServiceTutorial.vshost.exe: Program Trace' has exited with code 0 (0x0).
The program '[3292] WebServiceTutorial.vshost.exe' has exited with code 0 (0x0).
HttpWebRequest.GetRequestStream(TransportContext& context)
в System.Net.HttpWebRequest.GetRequestStream()
в System.ServiceModel.Channels.HttpOutput.WebRequestHttpOutput.GetOutputStream()
Мой код:
Public Class WebServiceForm
Private Sub WebServiceForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim req As New ServiceReferenceRosReestr.createRequestIn()
Dim trt As New ServiceReferenceRosReestr.createRequestOut()
Dim snd As New ServiceReferenceRosReestr.ExternalSEIClient()
req.okato = 60401000000 ' ОКАТО
req.region = 61 ' регион в который необходимо отправить заявление
req.requestType = 558101010000 ' Запрос о предоставлении сведений, внесенных в государственный кадастр недвижимости
req.requestData = IO.File.ReadAllBytes("C:\REQ_54de93c8-e21a-4ec7-adea-2df6daec504f.zip"
Try
trt = snd.createRequest(req)
Dim rNum = trt.requestNumber
Dim sts = trt.status
MsgBox("rNum = " & rNum.ToString() & "; sts = " & sts.ToString() & ";"
Catch ex As Exception
MsgBox("Error!" & vbCrLf & ex.Message & vbCrLf & "Exception:" & vbCrLf & ex.InnerException.ToString())
Me.Close()
End Try
End Sub
End Class
Помогите пожалуйста и заранее большое спасибо!