Я успешно создал провизор сервиса как клиент для моей службы WCF. Но я не могу назвать какой-либо метод на прозвище.Ошибка автоматизации при вызове метода в WCF mex Moniker с Excel
В конце службы WCF У меня есть фиктивный метод, названный TestMethod, следующим образом:
Public Function TestMethod(ByVal TestValue As String) As String Implements ICustomerService.TestMethod
Return "You said.... " & TestValue
End Function
Следующий код создает прозвища в Excel.
Public Sub WCFMexMonkierDemo()
' Create a string for the service moniker including the content of the WSDL contract file
Dim mexMonikerString As String
mexMonikerString = "service:mexAddress='http://localhost/CustomerService.svc/mex'" & _
", address='http://localhost/CustomerService.svc'" & _
", binding=CustomerServices.CustomerService" & _
", bindingNamespace='http://tempuri.org/'" & _
", contract=ICustomerService" & _
", contractNamespace='http://tempuri.org/'"
' Create the service moniker object
Dim mexMoniker, result
Set mexMoniker = GetObject(mexMonikerString)
result = mexMoniker.TestMethod("client call") '<-- error on this line
'Set result = mexMoniker.TestMethod("client call")
MsgBox result
Set mexMoniker = Nothing
Set result = Nothing
End Sub
Приведенный выше код работает до величин GetObject
вызова, который подразумевает, что кличка успешно создан. Но я получаю сообщение об ошибке, как только пытаюсь называть любой метод.
метод WCF отлично работает нормально с клиентом Microsoft WCF Test, и других клиентов WCF. Поэтому я знаю, что с самой услугой нет проблем.