Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
1o WebService
Message
 
À
02/04/2003 15:10:31
Information générale
Forum:
Visual FoxPro
Catégorie:
Web Services
Titre:
Divers
Thread ID:
00773192
Message ID:
00775858
Vues:
12
Sergio,


Consumir um Webserver no VFP7 é jogo fácil. No VFP8 é mais fácil ainda, e dá até pra testar antes de emitir nenhum comando.

Existem no mínimo duas formas. Uma é adicionando o Web Service no Intellisense e a partir daí usar aqueles recursos. Não gosto muito dessa opção.
A segunda é mais ou menos assim:
*-- instancia objeto SOAP
loWS = CreateObject("MSSOAP.SoapClient30")
loWS.MSSOAPInit("http://seuservidor/seuarquivo.wsdl","","","")

*-- supondo que estás retornando um XML, transforma-o num cursor e exibe os dados
lcXML = loWS.SeuMetodo("SeusParametros")
XMLToCursor(lcXML,"crsSeuCursor",4)

SELECT crsSeuCursor
BROWSE
Não existe muito segredo, mas precisa-se constatar que não há nenhuma falha quanto à publicação.
Aquelas dicas que lhe passei antes sobre os cabeçalhos do HOST são importantes para quando se quer fazer acesso externo à sua rede.

Quanto ao COM estar publicado, na versão 7 do VFP, eu não sei o que ele faz com este COM, mas ele o coloca no registro do Windows. Apenas não aparece no DCOM ou no COM+. Já na versão 8 é outra história.
[]´s


Nilton Paulino
paulino@foxbrasil.com.br
Fox Total Network
www.foxtotal.com.br
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform