Ir para conteúdo
Fórum CódigoFonte.net
arthurclucas

Consumindo SOAP Web Service com ASP

Recommended Posts

Prezados,

Fiz o um webservice simples em ASP.NET para ser comsumido em ASP. Abaixo segue o fonte.

[Serializable]

	public class Pessoa

	{

		public Pessoa(){}

		public Pessoa(string nome, string telefone)

		{

			this.Nome = nome;

			this.Telefone = telefone;

		}

		public string Nome { get; set; }

		public string Telefone { get; set; }

	}

[WebService(Namespace = "http://tempuri.org/")]

	[WebServiceBinding(ConformsTo = WsiProfiles.BasicProfile1_1)]

	[System.ComponentModel.ToolboxItem(false)]

public class webservice : System.Web.Services.WebService

	{

		[WebMethod]

		public string HelloWorld()

		{

			return "Hello World";

		}

		[WebMethod]

		public List<Pessoa> ObterListaPessoa()

		{

			List<Pessoa> lstPessoa = new List<Pessoa>();

			lstPessoa.Add(new Pessoa("Arthur", "9999-9855"));

			lstPessoa.Add(new Pessoa("Arthur2", "4578-4445"));

			return lstPessoa;

		}


	}

Fiz o seguinte código para tentar consumir o webservice utilizando ASP e VBScript:
<%

If Request.ServerVariables("REQUEST_METHOD") = "POST" Then

	Dim soapClient

	Dim arrayPessoa

	set soapClient = server.CreateObject("MSSOAP.SoapClient30")

	soapClient.ClientProperty("ServerHTTPRequest") = True

	Call soapClient.MSSoapInit("http://localhost/_WEBSERVICECALL/webservice.asmx?WSDL", "webservice")

	soapClient.ConnectorProperty("Timeout") = 90000 '90 seconds

	soapClient.ConnectorProperty("ConnectTimeout") = 90000 '90 seconds

	arrayPessoa = soapClient.ObterListaPessoa()	  

Else

	Response.Write "Loading for first Time"

End If

%>

Quando eu executo, debugando eu vejo que meu arrayPessoa é do tipo Array of Objects, porém, não consigo pegar os valores que estão dentro dele, como o nome da pessoa ou ou telefone. Pode ser mais um problema de falta de conhecimento do que de ASP em si, mas alguém poderia me ajudar?

Desde já agradeço!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olá Arthur!

Vc conseguiu resolver o problema citado acima?

Estou com o mesmo problema, porém, com um WEBSERVICE Delphi XE3. Ao realizar a chamada via ASP o mesmo não "recupera" o XML. Se salvar localmente no servidor funciona, mas não recuperando via chamada.

Obrigado.

Abraço

Compartilhar este post


Link para o post
Compartilhar em outros sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Visitante
Responder

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Processando...

×
×
  • Criar Novo...