JavaとVisual Basicを使ったWebサービスの実装

Size: px

Start display at page:

Download "JavaとVisual Basicを使ったWebサービスの実装"

よしたかあみおか
5 years ago
Views:

1 JavaVisual Basic Web

2 Web? Web Web Web Web Web Web SOAP Web Web

3 Web SOAP MicrosoftIBM Web Web SOAP, UDDI, WSDL EJB Java Java Java

4 Assam Commerce Server

5 Assam Commerce Server / XML XML XML CyberCash CyberCash SEJ SEJ HOME Ariba B2B B2C B2C B2B Ariba Buyer Ariba Buyer B2B

8 Web search (Assam Commerce Server 4.00) Web searchitem rpcrouter SOAP Apache SOAP 2.2 IBM WebSphere IBM HTTP Server (Apache ) Sun Enterprise 250, Solaris 8 DB SOAP Java Apache SOAP 2.2 Windows 2000 Visual Basic Microsoft SOAP Toolkit 2.0 Windows 2000

9 Java JDK Swing

10 Java JDK Swing

11 VB6

12 VB6

13 MS SOAP Toolkit 2.0 MSSOAP.SoapServer IIS (VB6.0) COM ASP COM(DLL) (Web ) COM COM MSSOAP.SoapClient WSDL WSML WSDLGEN SOAP Toolkit 2.0SP2 WSML: Web Service Meta Language

14 API SOAP Toolkit API WSDL Web SOAP SOAP API WSDL SOAP SOAP SOAP etc.

15 VB6 Web Option Explicit Public Function search(byval keyword As String) As String() Dim retstr(9) As String Dim i As Integer For i = 0 To 9 retstr(i) = keyword + CStr(i) Next i search = retstr End Function ActiveX (COM DLL) (WSDLGEN COM COM ) search.search1

16 WSDL(1/3) <?xml version='1.0' encoding='utf-8'?> <!-- Generated 08/21/01 by Microsoft SOAP Toolkit WSDL File Generator, Version > <definitions name ='Search' targetnamespace = ' <types> xmlns:wsdlns=' xmlns:typens=' xmlns:soap=' xmlns:xsd=' xmlns:stk=' xmlns=' <schema targetnamespace=' xmlns=' xmlns:soap-enc=' xmlns:wsdl=' elementformdefault='qualified'> <complextype name ='ArrayOfstring'> <complexcontent> <restriction base='soap-enc:array'> <attribute ref='soap-enc:arraytype' wsdl:arraytype='string[]'/>

</restriction> </complexcontent> </complextype> </schema> </types> <message name='search1.search'> <part name='keyword' type='xsd:string'/> </message> <message name='search1.

17 </restriction> </complexcontent> </complextype> </schema> </types> <message name='search1.search'> <part name='keyword' type='xsd:string'/> </message> <message name='search1.searchresponse'> <stk:binding preferredencoding='utf-8'/> WSDL(2/3) <part name='result' type='typens:arrayofstring'/> </message> <porttype name='search1soapport'> <operation name='search' parameterorder='keyword'> <input message='wsdlns:search1.search' /> <output message='wsdlns:search1.searchresponse' /> </operation> </porttype> <binding name='search1soapbinding' type='wsdlns:search1soapport' >

<soap:binding style='rpc' transport='http://schemas.xmlsoap.org/soap/http' /> <operation name='search' > <soap:operation soapaction='http://tempuri.org/action/search1.

18 <soap:binding style='rpc' transport=' /> <operation name='search' > <soap:operation soapaction=' /> <input> <soap:body use='encoded' namespace=' </input> <output> encodingstyle=' /> <soap:body use='encoded' namespace=' </output> </operation> </binding> <service name='search' > encodingstyle=' /> <port name='search1soapport' binding='wsdlns:search1soapbinding' > <soap:address location=' /> </port> </service> </definitions> WSDL(3/3) Apache SOAP (WSML ) SOAP (Apache SOAP )

WSML <?xml version='1.0' encoding='utf-8'?> <!-- Generated 08/21/01 by Microsoft SOAP Toolkit WSDL File Generator, Version 1.02.813.

19 WSML <?xml version='1.0' encoding='utf-8'?> <!-- Generated 08/21/01 by Microsoft SOAP Toolkit WSDL File Generator, Version > <servicemapping name='search'> <service name='search'> <using PROGID='search.Search1' cachable='0' ID='Search1Object' /> <port name='search1soapport'> <operation name='search'> <execute uses='search1object' method='search' dispid=' '> <parameter callindex='1' name='keyword' elementname='keyword' /> <parameter callindex='-1' name='retval' elementname='result' /> </execute> </operation> </port> </service> </servicemapping> COM COM COM search.search1 COM (Apache SOAP )

20 Apache SOAPMS SOAP (VB6.0) HTTP WSDL DD.xml COM MSSOAP.SoapClient SOAP /HTTP rpc router SearchForItem Apache (Java) Apache SOAP

Apache SOAP Dim ogsoap As SoapClient Set ogsoap = New SoapClient On Error Resume Next Call ogsoap.mssoapinit("http://miffy.tir.hitachi-sk.co.jp/soap/wsdl/search.

21 Apache SOAP Dim ogsoap As SoapClient Set ogsoap = New SoapClient On Error Resume Next Call ogsoap.mssoapinit(" "Search", "Search1SoapPort") If Err <> 0 Then MsgBox "mssoapinit = " & Err.Description,, "initialization failed" Exit Sub End If Dim strdup() As String strdup = ogsoap.search(searchform.getkeyword()) If Err <> 0 Then MsgBox "search = " & Err.Description,, "search failed" Exit Sub End If (Visual Basic 6.0) WSDL Web MS SOAP

Apache SOAP WSDL namespace http://tempuri.org/message/ urn:acs:search DD.XML DD.

22 Apache SOAP WSDL namespace urn:acs:search DD.XML DD.XML deserializer <keyword> </keyword> <isd:mappings> <isd:map encodingstyle=" xmlns:x="" qname="x:keyword" xml2javaclassname="org.apache.soap.encoding.soapenc.stringdeserial izer"/> </isd:mappings>

23 VB (tempuri.org)

24 Apache SOAP

25 .NET SOAP (1/2) WSDL WSDL C(VB.NET ) SOAP using System.Diagnostics; using System.Xml.Serialization; using System; using System.Web.Services.Protocols; using System.Web.Services; C [System.Web.Services.WebServiceBindingAttribute(Name="Search1SoapBinding", Namespace=" public class Search : System.Web.Services.Protocols.SoapHttpClientProtocol { [System.Diagnostics.DebuggerStepThroughAttribute()] public Search() { } this.url = " miffy.tir.hitachi-sk.co.jp /soap/servlet/rpcrouter";

.NET SOAP (1/2) [System.Diagnostics.DebuggerStepThroughAttribute()] [System.Web.Services.Protocols.SoapRpcMethodAttribute("http://tempuri.org/action/Search 1.

26 .NET SOAP (1/2) [System.Diagnostics.DebuggerStepThroughAttribute()] [System.Web.Services.Protocols.SoapRpcMethodAttribute(" 1.search", RequestNamespace="urn:acs:search", ResponseNamespace="urn:acs:search")] [return: System.Xml.Serialization.SoapElementAttribute("Result")] public string[] search(string keyword) { } object[] results = this.invoke("search", new object[] { keyword}); return ((string[])(results[0])); ( ) object[] retitems; Search foo = new Search (); retitems = foo.search( ); C

27 WSDL Java WSDL WSDLGEN WSDL MS SOAP API MS SOAP Toolkit.NET ASP.NET.NET MS.NET FrameworkSOAP System.Web.Services.Protcols.SoapXXXX SOAP

IT Web NEC Corporation

IT Web NEC Corporation IT Web 2002 5 27 1 1. Web 2. Web 3. Web 4. Web 5. 6. Web 7. Web 8. 2 . Web 3 4 Web Web HTML Web XML Web Web LAN) EAI WebEAI) ) SCM ( ) (SOAP, UDDI) ) (Web ) Web/HTML Web/HTML Web/XML Web/XML Web Web 1.1