いくつかのトピックを調べたところ、次のコードを使用して vb6 でサービスを呼び出すことができました。
Dim sUrl As String
Dim response As String
Dim xmlHttp
Private Sub Form_Load()
sUrl = "http://abc.com/services/abc.svc"
Set xmlHttp = CreateObject("MSXML2.ServerXMLHTTP")
xmlHttp.Open "POST", sUrl, False
xmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xmlHttp.send
Dim response As String
response = xmlHttp.responseText
Set xmlHttp = Nothing
End Sub
問題は、vb6 で WCF サービスを呼び出し、params をそのメソッドに渡して結果を取得する方法です。