vb6访问webservice问题

Dim MySoap As SoapClient30
Set MySoap = New SoapClient30
 
MySoap.MSSoapInit2 Trim(Txtweb.Text), "", "", "", ""
 
TxtResult.Text = MySoap.DhcService(Trim(TxtTJ.Text), Trim(TxtTJ2.Text))

'TxtResult.Text =返回的xml字符串
----问题：执行到MySoap.DhcService出错，提示找不到属性或方法----应该是MSSOAP30.dll版本问题吧？应该是哪个版本？现有下载吗？多谢

9 个解决方案

#1

这有很多原因造成的，你的MSSOAP30.dll哪里来的？应该是SOAP Toolkit里面带的。如果是这样，应该没问题。

#2

安装的从微软网站下的SOAP Toolkit30，确实存在问题。MySoap.DhcService：无此DhcService方法

#3

以前的电脑可以用的，只是系统早就坏掉了，没法测试了，备份出来的代码，就出上面的问题了。

#4

不是 你引用控件了 吗 你这个方法是干嘛的 

#5

你几个文本框里面输入的是什么？

#6

Txtweb.Text="http://www.webxml.com.cn/webservices/qqOnlineWebService.?wsdl"
TxtTJ.Text="qqCheckOnline"
TxtTJ2.Text="305886220"  ----我的QQ号

其它的测试网站也是这样。
我想，提示无效的属性或方法，应该是MySoap.DhcService方法不存在，且，我在MySoap.后确实没有DhcService的方法提示，是我把DhcService写上去的。

#7

引用 4 楼  的回复:

不是 你引用控件了 吗 你这个方法是干嘛的

----引用了，版本是3.0，不然，Set MySoap = New SoapClient30 就会错的
这个方法是返回的xml字符串的

#8

DhcService这个方法好奇怪。本来就不存在。你说你原来是可以的？

#9

已经解决。是对方接口问题。多谢各位。