Conectar WEBSERVICE que não aceita SOAP30

Alan_Mackey · Abril 25, 2015

Olá pessoal, estou com dificuldades p/ conectar em um Webservice, sempre fiz a conexão via SOAP30, mas o webservice não suporta esse tipo de conexão(informação passada pelo técnico do cliente), assim preciso achar alguma outra forma, eu tenho o arquivo WSDL local, ele não está disponível para acesso via browser, estou tentando através da função abaixo, mas não completa a conexão:

"Código do site http://www.freevbcode.com/ShowCode.asp?ID=7611"(fazendo os créditos)

Public Function PostWebservice(ByVal AsmxUrl As String, ByVal SoapActionUrl As String, ByVal XmlBody As String) As String
Dim objDom As Object
Dim objXmlHttp As Object
Dim strRet As String
Dim intPos1 As Integer
Dim intPos2 As Integer

On Error GoTo Err_PW

' Create objects to DOMDocument and XMLHTTP
Set objDom = CreateObject("MSXML2.DOMDocument")
Set objXmlHttp = CreateObject("MSXML2.XMLHTTP")

' Load XML
objDom.async = False
objDom.LoadXml XmlBody

' Open the webservice
objXmlHttp.Open "POST", AsmxUrl, False

' Create headings
objXmlHttp.setRequestHeader "Content-Type", "text/xml; charset=utf-8"
'objXmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded; charset=UTF-8"
objXmlHttp.setRequestHeader "SOAPAction", SoapActionUrl

' Send XML command
objXmlHttp.Send objDom.XML

' Get all response text from webservice
strRet = objXmlHttp.responseText

' Close object
Set objXmlHttp = Nothing

' Extract result
intPos1 = InStr(strRet, "Result>") + 7
intPos2 = InStr(strRet, "</")
If intPos1 > 7 And intPos2 > 0 Then
strRet = Mid(strRet, intPos1, intPos2 - intPos1)
End If

' Return result
PostWebservice = strRet

Exit Function
Err_PW:
PostWebservice = "Error: " & Err.Number & " - " & Err.Description

End Function

KhaosDoctor · Abril 27, 2015

Você já tentou via WebMethod?

http://www.codeproject.com/Articles/1231/ASP-NET-Web-Service

Alan_Mackey · Abril 27, 2015

Não sei exatamente como conseguir as informações necessárias à este acesso, consegui uma informação que pode ser de alguma ajuda, mas não sei como utilizar:

1 - o webservice utiliza padrão de segurança WS-Security, seção Username Token Profile.

- vou colar aqui o conteudo do WSDL que eles me enviaram para o desenvolvimento, não sei até que ponto isso pode me ajudar.

<wsdl:definitions name="IntgAssessoriaCobranca"

targetNamespace="http://www.123xyz.com.br/Credito/IntgAssessoriaCobranca/v1"

xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/" xmlns:WL5G3N4="http://schemas.xmlsoap.org/wsdl/soap/"

xmlns:WL5G3N3="http://www.123xyz.com.br/Credito/IntgAssessoriaCobranca/v1"

xmlns:WL5G3N2="http://www.123xyz.com.br/Fault/PernambucanasFault/v2"

xmlns:WL5G3N0="http://schemas.xmlsoap.org/wsdl/"

xmlns:WL5G3N1="http://www.123xyz.com.br/Credito/EBM/IntgAssessoriaCobranca/SimularAcordoPagamento/v1">

<wsp:Policy wsu:Id="wss_username_token_service_policy"

xmlns:wsp="http://schemas.xmlsoap.org/ws/2004/09/policy" xmlns="http://schemas.xmlsoap.org/ws/2004/09/policy"

xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd"

xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">

<sp:SupportingTokens

xmlns:sp="http://schemas.xmlsoap.org/ws/2005/07/securitypolicy">

<wsp:Policy>

<sp:UsernameToken

sp:IncludeToken="http://schemas.xmlsoap.org/ws/2005/07/securitypolicy/IncludeToken/AlwaysToRecipient">

<wsp:Policy>

<sp:WssUsernameToken10 />

</wsp:Policy>

</sp:UsernameToken>

</wsp:Policy>

</sp:SupportingTokens>

</wsp:Policy>

<wsdl:types>

<xsd:schema elementFormDefault="qualified"

targetNamespace="http://www.123xyz.com.br/Credito/IntgAssessoriaCobranca/types/v1"

xmlns:Q1="http://www.123xyz.com.br/Fault/PernambucanasFault/v2"

xmlns:Q2="http://www.123xyz.com.br/Credito/EBM/IntgAssessoriaCobranca/SimularAcordoPagamento/v1"

xmlns:WL5G3N5="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:WL5G3N6="http://schemas.xmlsoap.org/wsdl/soap/"

xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/"

xmlns:tns="http://www.123xyz.com.br/Credito/IntgAssessoriaCobranca/v1"

xmlns:types="http://www.123xyz.com.br/Credito/IntgAssessoriaCobranca/types/v1"

xmlns:wsp="http://schemas.xmlsoap.org/ws/2004/09/policy" xmlns:xsd="http://www.w3.org/2001/XMLSchema">

<xsd:import

namespace="http://www.123xyz.com.br/Fault/PernambucanasFault/v2"

schemaLocation="PernambucanasFault.xsd" />

<xsd:import

namespace="http://www.123xyz.com.br/Credito/EBM/IntgAssessoriaCobranca/SimularAcordoPagamento/v1"

schemaLocation="SimularAcordoPagamentoReqEBM.xsd" />

<xsd:import

namespace="http://www.123xyz.com.br/Credito/EBM/IntgAssessoriaCobranca/SimularAcordoPagamento/v1"

schemaLocation="SimularAcordoPagamentoRespEBM.xsd" />

</xsd:schema>

</wsdl:types>

<wsdl:message name="SimularAcordoPagamentoRequestMessage">

<wsdl:part name="parameters" element="WL5G3N1:simularAcordoPagamentoReqEBM" />

</wsdl:message>

<wsdl:message name="SimularAcordoPagamentoResponseMessage">

<wsdl:part name="parameters" element="WL5G3N1:simularAcordoPagamentoRespEBM" />

</wsdl:message>

<wsdl:message name="PernambucanasFaultMessage">

<wsdl:part name="parameters" element="WL5G3N2:PernambucanasFault" />

</wsdl:message>

<wsdl:portType name="IntgAssessoriaCobrancaPort">

<wsdl:operation name="simularAcordoPagamento">

<wsdl:input name="SimularAcordoPagamentoRequest"

message="WL5G3N3:SimularAcordoPagamentoRequestMessage" />

<wsdl:output name="SimularAcordoPagamentoResponse"

message="WL5G3N3:SimularAcordoPagamentoResponseMessage" />

<wsdl:fault name="PernambucanasFault" message="WL5G3N3:PernambucanasFaultMessage" />

</wsdl:operation>

</wsdl:portType>

<wsdl:binding name="IntgAssessoriaCobrancaSOAP" type="WL5G3N3:IntgAssessoriaCobrancaPort">

<WL5G3N4:binding style="document"

transport="http://schemas.xmlsoap.org/soap/http" />

<wsp:PolicyReference URI="#wss_username_token_service_policy"

wsdl:required="false" xmlns:wsp="http://schemas.xmlsoap.org/ws/2004/09/policy" />

<wsdl:operation name="simularAcordoPagamento">

<WL5G3N4:operation

soapAction="http://www.123xyz.com.br/Credito/IntgAssessoriaCobranca/simularAcordoPagamento" />

<wsdl:input name="SimularAcordoPagamentoRequest">

<WL5G3N4:body use="literal" />

</wsdl:input>

<wsdl:output name="SimularAcordoPagamentoResponse">

<WL5G3N4:body use="literal" />

</wsdl:output>

<wsdl:fault name="PernambucanasFault">

<WL5G3N4:fault name="PernambucanasFault" use="literal" />

</wsdl:fault>

</wsdl:operation>

</wsdl:binding>

<wsdl:service name="IntgAssessoriaCobrancaService">

<wsdl:port name="IntgAssessoriaCobrancaSOAP" binding="WL5G3N3:IntgAssessoriaCobrancaSOAP">

<WL5G3N4:address

location="https://ws.123xyz.com.br/api/soap/Credito/AssessoriaCobranca/v1" />

</wsdl:port>

</wsdl:service>

</wsdl:definitions>

Você já tentou via WebMethod?

http://www.codeproject.com/Articles/1231/ASP-NET-Web-Service

Não sei exatamente como conseguir as informações necessárias à este acesso, consegui uma informação que pode ser de alguma ajuda, mas não sei como utilizar:

1 - o webservice utiliza padrão de segurança WS-Security, seção Username Token Profile.

- vou colar aqui o conteudo do WSDL que eles me enviaram para o desenvolvimento, não sei até que ponto isso pode me ajudar.

<wsdl:definitions name="IntgAssessoriaCobranca"

targetNamespace="http://www.123xyz.com.br/Credito/IntgAssessoriaCobranca/v1"

xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/" xmlns:WL5G3N4="http://schemas.xmlsoap.org/wsdl/soap/"

xmlns:WL5G3N3="http://www.123xyz.com.br/Credito/IntgAssessoriaCobranca/v1"

xmlns:WL5G3N2="http://www.123xyz.com.br/Fault/PernambucanasFault/v2"

xmlns:WL5G3N0="http://schemas.xmlsoap.org/wsdl/"

xmlns:WL5G3N1="http://www.123xyz.com.br/Credito/EBM/IntgAssessoriaCobranca/SimularAcordoPagamento/v1">

<wsp:Policy wsu:Id="wss_username_token_service_policy"

xmlns:wsp="http://schemas.xmlsoap.org/ws/2004/09/policy" xmlns="http://schemas.xmlsoap.org/ws/2004/09/policy"

xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd"