Jump to content

SOAP: Difference between revisions

SOAP (view source)

Revision as of 17:56, 9 May 2009

409 bytes removed ,  15 years ago
→‎Tcl: Correct to actually perform the official task: oops!
(→‎Tcl: Added implementation)
(→‎Tcl: Correct to actually perform the official task: oops!)
Line 69:
<lang Tcl>package require WS::Client
 
# Grok the service, and generate stubs
::WS::Client::GetAndParseWsdl http://api.googleexample.com/GoogleSearch.soap/wsdl
::WS::Client::CreateStubs ExampleService ;# Assume that's the service name...
 
# Set upDo the argumentscalls
set result1 [ExampleService::soapFunc "hello"]
dict set args key "<your google license key here>"
set result2 [ExampleService::anotherSoapFunc 34234]</lang>
dict set args q {site:tclscripting.com font}
dict set args start 0
dict set args maxResults 10
dict set args filter true
dict set args restrict {}
dict set args safeSearch false
dict set args lr {}
dict set args ie latin1
dict set args oe latin1
 
# Do the call using the direct synchronous interface
set result [::WS::Client::DoCall GoogleSearchService doGoogleSearch $args]
 
# Print the results
foreach item [dict get $result return resultElements item] {
puts [dict get $item title]
puts [dict get $item URL]
puts ""
}</lang>
 
=={{header|VBScript}}==
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/11629"
Cookies help us deliver our services. By using our services, you agree to our use of cookies.
More information