WEB SERVICE?

PASCOAL 14/09/2011 13:09:24
#384236

O erro é Object doesn't support this property or method na linha marcada .

Dim client
Set client = CreateObject([Ô]MSSOAP.SoapClient30[Ô])
client.mssoapinit ([Ô]http://201.76.54.145/wsSms/wsSmsSend.asmx?WSDL[Ô])

strg = client.NomeDaFuncao(XmlPergunta)MsgBox (strg) ----essa aqui

If Err.Number = -2147024809 Then
MsgBox [Ô]Requisição de webservice inválida. Verifique o endereço...[Ô]
End If

KERPLUNK 14/09/2011 13:47:59
#384242

[Ô]NomeDaFuncao[Ô] é só um exemplo, pensei que vc ia sacar... coloque ali o método que quer executar, com seus respectivos parâmetros...

PASCOAL 14/09/2011 13:55:33
#384244

Mas qual o metodo que coloco pois os dados estão na variavel XmlPergunta?

Obrigado

KERPLUNK 14/09/2011 14:19:34
#384247

strg = client.Pergunta([Ô]Quantos anos tem o Papa?[Ô])
msgbox strg

Nesse caso, strg conteria o retorno do método [Ô]Pergunta[Ô] quando passado o valor [Ô]Quantos anos tem o Papa?[Ô]

PASCOAL 14/09/2011 15:42:08
#384258

KERPLUNK

VALEU CARA DEU CERTINHO A MENSAGEM FOI PARA O CELULAR FICOU SHOW

OBRIGADO