Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Need assistance Getting Started with WS
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Web Services
Divers
Thread ID:
00798695
Message ID:
00799032
Vues:
31
Wan,

I am able to browse the WSDL file in IE, but it just shows a bunch of XML source code.

Also - I am able to create the COM object from the command line via the following code:

******************************************************
LOCAL x as showem2 web service

LOCAL loWS
loWS = NEWOBJECT("Wsclient",HOME()+"ffc\_webservices.vcx")
loWs.cWSName = "showem2 web service"
x = loWS.SetupClient ;
("http://STEVE-2778TFJXM/WebServices2VD/showem2.WSDL", ;
"showem2", "showem2SoapPort")

? x.justshow()
*******************************************************
It is when the program encounters the last line that I get the error:

"OLE error code 0x800a13be:Unknown COM status code."

Justshow() is a method in the OLEPublic COM class as show below.

*****************************************************
*-- returns curdir() and number of JPEG files

Define Class showem2 As Session OlePublic

Name = "showem2"

Procedure justshow

howmany=Adir(afilArry,"*.jpg")
If howmany <1
fileNm="no"
Else
fileNm=Alltrim(Str(howmany))
Endif

X = "about " + Curdir() + " ... "
Y = "There are " + fileNm + " JPEG files here."
Return X + Y
Endproc
Enddefine
*****************************************************

Any suggestions?

Thanks,

-Steve
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform