NUNCA MAIS PASSE RAIVA POR NÃO CONSEGUIR RESOLVER UM PROBLEMA COM O EXCEL - GARANTIDO!

UNIVERSIDADE DO VBA - Domine o VBA no Excel Criando Sistemas Completos - Passo a Passo - CLIQUE AQUI

Você está em: PrincipalTutoriaisLanodecastro : Webservices003
Quer receber novidades e e-books gratuitos?

FILTRO DE TUTORIAIS:


 

Sistema de Enquetes baseado em WebServices –Parte III

 

Olá pessoal,

 

Como foi prometido no último tutorial deste tema, iremos aprender a “consumir um WebService”, ou seja, tirar proveito dos dados que estão compartilhados através dos métodos do WebService. Lembrando que estamos apenas fazendo uma abordagem geral para depois entrarmos de vez no desenvolvimento do nosso sistema.

 

Na primeira e segunda parte deste tutorial construímos dois serviços em nosso WebService. Construiremos mais um serviço naquele mesmo WebService.

 

Este serviço fará a conversão de moeda Dólar para Real e Real para Dólar.

 

Então, abra o arquivo TestDataBase.asmx e digite o seguinte código:

 

[WebMethod(Description="Este serviço realiza a conversão de Real para Dólar e Dólar para Real com base em uma determinada cotação")]

            public double ConversaoDeMoeda(double valor,double cotacao,string moeda)

            {

                  if(moeda=="Real")

                  {

                        valor=valor*cotacao;

                  }

                  if(moeda=="Dolar")

                  {

                        valor=valor/cotacao;

                  }

                  return valor;

            }

 

Veja o serviço funcionando:

 

 

Lista de serviços

 

 

Inserindo valores...

 

 

Resultado

 

Ok, viram como funcionou. Agora vamos criar uma interface agradável para que podemos utilizar este serviço. Criem um novo WebForm chamado ConversaoDeMoeda.aspx. Vejam a interface sugerida:

 

 

Os controles inseridos e seus respectivos IDs:

 

TextBox – txtValor

 

TextBox –txtCotacao

 

RadioButtonList – rdMoeda

                            Items: Real e Dólar

 

Button – btnConverter –

                            Value=”Converter”

 

Agora, vamos fazer referência ao serviço criado. No Solution Explorer, clique com o botão direito sobre o projeto, opção Add WebReference...

 

 

 

Clique no primeiro link: Web services on the local machine. Isto fará com que ele localize os WebServices locais.

 

 

Webservice encontrado, selecione-o.

 

Altere o Web reference name para MeuServico. Veja na figura abaixo:

 

 

Clique em Add Reference.

 

Note que uma nova pasta foi criada com o WebService disponível.

 

 

Agora vamos tratar os dois campos de texto. Abra a toolBox e arraste dois RequiredFieldValidator

 

 

Configure o primeiro de acordo com a imagem abaixo:

 

 

Configure o segundo conforme a figura abaixo:

 

 

Insira um ValidationSummary para podermos exibir as mensagens de erro.

 

Configure-o de acordo com a imagem abaixo:

 

 

Agora vamos ao código. Selecione o btnConverter e dê um duplo clique sobre ele.

 

Ao abrir o evento Click, digite o código abaixo:

 

private void btnConverter_Click(object sender, System.EventArgs e)

            {

                  //Instancia um novo objeto baseado no WebService

                  MeuServico.TestDataBase MeuServico=new Enquetes.MeuServico.TestDataBase();

                  //Exibe no lblResultado o valor encontrado através do método ConversaoDeMoeda

 

lblResultado.Text=MeuServico.ConversaoDeMoeda(Convert.ToDouble(txtValor.Text),

Convert.ToDouble(txtCotacao.Text),rdMoeda.SelectedItem.Text).ToString();

 

            }

 

Ok, agora está pronto para testar:

 

 

Inserindo valores...

 

 

Resultado da conversão...

 

É isso aí pessoal, espero que tenham gostado.

 

Até mais um tutorial!

 

Lano de Castro

 

Quer receber novidades e e-books gratuitos?

Cursos Online

  • Banco de Dados
  • Carreira
  • Criação/Web
  • Excel/Projetos
  • Formação
  • + Todas as categorias
  • Contato: Telefone: (51) 3717-3796 | E-mail: webmaster@juliobattisti.com.br | Whatsapp: (51) 99627-3434

    Júlio Battisti Livros e Cursos Ltda | CNPJ: 08.916.484/0001-25 | Rua Vereador Ivo Cláudio Weigel, 537 - Universitário, Santa Cruz do Sul/RS, CEP: 96816-208

    Todos os direitos reservados, Júlio Battisti 2001-2020 ®

    [LIVRO]: MACROS E PROGRAMAÇÃO VBA NO EXCEL 2010 - PASSO-A-PASSO

    APRENDA COM JULIO BATTISTI - 1124 PÁGINAS: CLIQUE AQUI