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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora

×
×
  • Criar Novo...