添加web引用,输入wsdl文件所在地址。
需引用System.Web.Services
你的web引用名字.Service1 cc=new 你的web引用的名字.Service1();
.......

解决方案 »

  1.   

    请看清楚我的问题再回答,我是说在asp 中 而不是在asp.net中,谢谢!!!
      

  2.   

    sub window_onload()
    wbObj.onserviceavailable = GetRef("after_window_onload")
    call wbObj.useService("http://WebDataService/DataService.asmx?WSDL","DataService")
    end subsub after_window_onload
    ''清除 status
    window.status = "" ''初始化 WebService 變數
    Set g_callObj = wbObj.createCallOptions()
    g_callObj.async = false
    end subsub Query()
    g_strSQL = "select * from manager where " & inSQL.value
    end if g_callObj.funcName = "GetXMLBySQL" Set g_result = wbObj.DataService.callService(g_callObj, g_strSQL)
    end sub大概是這樣的,我自己也沒怎麼研究過,:)
      

  3.   

    不好意思,没看清:)
    在asp中使用Jscript调用
    需下载msSoapToolkit20.exe
    引用:MSSOAP.SoapClient
    例程:
    <%@ LANGUAGE = JScript %>
    <HTML>
    <HEAD>
    <TITLE>webservice演示</TITLE>
    </HEAD>
    <BODY>
        <%
             var WSDL_URL = "http://server0/yundan/webservice1.asmx?WSDL"
               var a, b, res
               var soapclient
                a = 12
                b = 13    
            soapclient = Server.CreateObject("MSSOAP.SoapClient")
            soapclient.ClientProperty("ServerHTTPRequest") = true 
    ‘在ASP中运行 需要设置ServerHTTPRequest选项
    soapclient.mssoapinit("http://192.168.0.4/yundan/Service1.WSDL","Service1","Service1Soap","")
            res = soapclient.test(2,3) 
    %>
    <h3>webservice 演示</h3>
    <B>Result:</B> <%=res%><P><P>
    </BODY>
    </HTML>在asp中使用vbscript调用
    需下载msSoapToolkit20.exe
    引用:MSSOAP.SoapClient
        例程:
    <%@ LANGUAGE = VBScript %>
    <HTML>
    <HEAD>
    <TITLE>webservie演示</TITLE>
    </HEAD>
    <BODY>
    <%
    Dim soapclient
    Const WSDL_URL = "http://192.168.0.4/yundan/service1.wsdl"
        set soapclient = Server.CreateObject("MSSOAP.SoapClient")
        soapclient.ClientProperty("ServerHTTPRequest") = True
        soapclient.mssoapinit 
    http://192.168.0.4:8080/yundan/Service1.WSDL","Service1","Service1Soap",""
    Dim res
            res = soapclient.test(23, 34)
    %>
    <h1>webservie演示</h1>
    <B>Result:</B> <%=res%><P><P>
    </BODY>
    </HTML>
      

  4.   

    www.ourfly.com文档中心调用webservice的几种方法
    与vb的差不多
      

  5.   

    james2002():您好
    msSoapToolkit30.exe好像也出来了,另外msSoapToolkit20.exe在服务端应用就可以了吧,不需要在客户端再注册什么了吧