Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Complex Data Type in Web-Service
Message
De
06/09/2005 07:25:00
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Web Services
Divers
Thread ID:
01046935
Message ID:
01046941
Vues:
10
>Hi there,
>
>I want to use a web-service (written in Delphi) which asks for a structure-type parameter in his methods:
>
> TSuchbegriffe = class(TRemotable)
> private
> fsuch_ejahr_bis: AnsiString;
> fsuch_verlag: AnsiString;
> fsuch_reihe: AnsiString;
> fsuch_wg: AnsiString;
> fsuch_ejahr_von: AnsiString;
> fsuch_isbn: AnsiString;
> fsuch_preis_bis: AnsiString;
> fsuch_preis_von: AnsiString;
> fsuch_wg_index: AnsiString;
> fsuch_schlagwort: AnsiString;
> fSuch_autor ,
> fSuch_stichwort: AnsiString;
>
>Can this be done with VFP (8) and how?
>
>Thanks in advance
>
>Thomas

Thomas,
You'd need WSDL to check what it expects. Calling looks like (and there are other ways):
local loResult
oWS = CREATEOBJECT("MSSOAP.SoapClient30")
oWS.MSSoapInit("http://locationHere?wsdl", "SomeWSPublicWebService", "SomeWSPublicWebServiceSoap")

Text to m.ParamObject textmerge noshow
  <Value1><<m.luValue1>></Value1>
  <Value2><<m.luValue2>></Value2>
  <Value3><<m.luValue3>></Value3>
  <Value4><<m.luValue4>></Value4>
  <Value5><<m.luValue5>></Value5>
endtext

loResult = oWS.WsMethod(m.ParamObject)
For ix=0 to loResult.Length-1
	? loResult.item(m.ix).nodeName,loResult.item(m.ix).nodeTypedValue
endfor
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform