VB6 编写的 SOAP 报错“存储空间不足，无法处理此命令” ，恳请帮助!!

使用本地电脑调试Soap，操作环境：
 操作系统 Win7 64 旗舰版 ； IIS 7.0

WebService 端：（使用VS2013 的 编写）

Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports

' 若要允许使用 AJAX 从脚本中调用此 Web 服务，请取消注释以下行。
' <System.Web.Script.Services.ScriptService()> _
<System.Web.Services.WebService(Namespace:="localhost")> _
<System.Web.Services.WebServiceBinding(ConformsTo:=WsiProfiles.BasicProfile1_1)> _
<ToolboxItem(False)> _
Public Class WebS
    Inherits System.Web.Services.WebService

    <WebMethod()> _
    Public Function HelloWorld() As String
        Dim i As String

        Return "Hello World"
    End Function
End Class

//======================================================================================//
以上 WebService 在 IIS 中发布正常

//=================================================================================================
VB6 编写 Client （已安装 SOAP Toolkit 3.0 并且引用 Microsoft Soap Type Library 3.0）

Private Sub Command1_Click()
    Dim Os As New MSSOAPLib30.SoapClient30
  
    Os.ClientProperty("ServerHTTPRequest") = True
   Os.MSSoapInit "http://localhost/aa/webs.asmx", "", "", ""
   ' Os.MSSoapInit "http://localhost/aa/webs.asmx?WSDL", "", "", ""
    Os. HelloWorld
End Sub

//==========================================================================//
以上 Client 代码在 中运行是正常的，而在 VB6 中运行到 Os.MSSoapInit "http://localhost/aa/webs.asmx", "", "", ""  报错，报错信息如下：


在百度中已查找了几天了 没有找到解决办法， 恳请高手帮忙 急用  谢谢！！！！