excel VBA web服务给出错误METHOD或DATAOBJECT NOT FOUND

我有一个奇怪的问题与Excel VBA应用程序。

它使用Web服务连接到一个MySQL数据库。

它在大多数计算机上都运行良好，但是在某些计算机上它会抛出一个错误：

编译“方法或数据目标未find”时出错

所有电脑都运行Windows 7和Office 2007。

这里是一个Web服务代码的例子（发生错误的地方）

Public Function wsm_get_portscountries(ByVal str_SQLQuery As String) As MSXML2.IXMLDOMNodeList On Error GoTo wsm_get_portscountriesTrap Set wsm_get_portscountries = sc_WebService1.wsm_get_portscountries(str_SQLQuery) Exit Function wsm_get_portscountriesTrap: WebService1ErrorHandler "wsm_get_portscountries" End Function 

该错误突出显示了粗体部分：

sc_WebService1。 wsm_get_portscountries （str_SQLQuery）

有没有人遇到过同样的问题？ 有任何想法吗 ？？ 正如我所说，在大多数电脑上运行良好，没有问题，它只发生在一些。

提前致谢。

附加信息：类模块

 Private Sub Class_Initialize() On Error GoTo Class_Initialize_error Dim str_WSML As String str_WSML = "" Set sc_WebService1 = New SoapClient30 sc_WebService1.MSSoapInit2 c_WSDL_URL, str_WSML, c_SERVICE, c_PORT, c_SERVICE_NAMESPACE sc_WebService1.ConnectorProperty("ProxyServer") = "<CURRENT_USER>" sc_WebService1.ConnectorProperty("EnableAutoProxy") = True Exit Sub Class_Initialize_error: End Sub