Я управляю устаревшим приложением, которое все еще использует vb, и одна из задач, которые мне нужно сделать, это добавить новый веб-сервис soap, и он не работает, потому что ответ имеет кодировку: chunked.
Я добавляю сервисную ссылку в визуальную студию и так называю сервис. так что мой вопрос, как гласит заголовок. Это моя раздетая версия моей фактической обработки
Module Module1
Sub Main()
Try
Dim prompVar As New ServiceReference2.Prompts_TypeDefPROMPT
Dim props(0) As ServiceReference2.Prompts_TypeDefPROMPT
prompVar.UniquePromptName = "BIND1"
prompVar.FieldValue = "00000754"
props(0) = prompVar
Dim ax As New ServiceReference2.AxisValues
Dim param3 As New ServiceReference2.QAS_EXEQRY_SYNC_REQ_MSGType
Dim paramv1 As New ServiceReference2.QAS_EXEQRY_SYNC_REQ_MSGVERSION_1
Dim parQAS As New ServiceReference2.QAS_EXEQRY_SYNC_REQ_TypeShape
parQAS.QueryName = "MBAP_MZ_WS_BY_VCHR_ID"
parQAS.Prompts = props
param3.QAS_EXEQRY_SYNC_REQ = parQAS
Dim ws As ServiceReference2.MB_QAS_PortTypeClient = ServiceConfig.ConfigureServiceProxy(Of ServiceReference2.MB_QAS_PortTypeClient)("http://127.0.0.1:8080")
Dim testCal = ws.MB_QAS_EXEC(ax, ss, param3).query
Dim test = ws.MB_QAS_EXEC(ax, Nothing, param3)
'At this point, the properties of test are all nothing
Catch ex As Exception
Console.WriteLine(ex)
End Try
End Sub
End Module
Результат проверки скрипача следующий:
Я прочитал о том, что такое chunked-кодирование и как оно работает, но я не знаю, как применить это к потреблению SOAP веб-сервисов