CONSUMIR WEBSERVICE

ARNALDOCRUZ 15/11/2010 17:20:05
#357508

Boa tarde colegas estou tentando consumir o webservice da anvisa mas não estou obtendo sucesso.

a documentação pra vbnet está como abaixo

1 - Web Reference: Adicionar uma web reference com o endereço do webservice.
2 - Instância: Após a web reference criada, com o nome dado, criar uma instancia do webservice na aplicação
sngpcService.sngpc wssngpc = new sngpcService.sngpc()
3 - Métodos: Para visualizar os métodos, criar uma variável string para receber o retorno do método
Dim comp As String = wssngpc.EnviaArquivoSNGPC(edemail.Value.ToLower(),edsenha.Text, Arquivo, HashIdentificacao)
4 - HashIdentificacao = Rotina MD5

O que fiz no vbnet 2010

1 - Add Service reference
2 - Name space coloquei SNGPC
2 - botao Advanced
3 - botao Add Web Reference
4 - na URL coloquei o link -->> http://homologacao.anvisa.gov.br/sngpc/webservice/sngpc.asmx
5 - em Web Refrence name coloquei WSngpc.service
6 - Botao Add Reference

Criei um form com 4 campos e um botão

Login,Senha,Arquivo,hash


no codigo ao clicar do botao coloquei o código abaixo

Dim WSServico = New WSngpc.service.sngpc
Me.Hash.Text = md5_file(Me.Arquivo.Text)
Me.Resposta.Text = WSServico.EnviaArquivoSNGPC(Me.Login.Text.ToLower(), Me.Senha.Text, Me.Arquivo.Text, Me.Hash.Text)

mim retorna a mensagem de erro

[EA]The data at the root level is invalid. Line 1, position 1.


Se alguem puder mim dá uma ajuda eu agradeço