如何格式的信息用于执行HTTP post从VBScript/ASP WCF服务和得到的反应?

StackOverflow https://stackoverflow.com/questions/76925

  •  09-06-2019
  •  | 
  •  

做后是不是问题所在!格式的消息,这样我获得一个反应就是问题所在。

理想情况下,我们能够建造一个信息和使用留下来执行一个后来WCF服务(主办在IIS)并得到回应,但到目前为止,我已经无法建造的东西,正常工作。

没有任何人有一个例子这样做的,是简单?

在2.0网服务的世界,这是作为容易,因为把一个设置在网络上。配置,以获得的服务以应对,然后调用适当的网络的方法与正确的参数。似乎没有模拟对于这周的世界。

因为现在没有选择为我把消费者(vbscript结束)。网。

假设在这一点上,在终点我可以转换到使用任何绑定提供的权利的任何支持。净3.5,但在同一时间,如果这可以使用WsHttpBinding或BasicHttpBinding然后适当回答这将描述如何格式的信息对于那些绑定在上下文中VBScript或如果没有办法做到,然后只是说,你不能这样做。如果这可以使用WebHTTPBinding然后我还没有找到一种方法来让它发生的我已经调查了WebInvoke属性和无法创建一个测试从VBScript WCF工作正常。

假定,在公布的数据类型字符串和回应也是一串。

另外这个问题不留有关。我已经知道如何执行后的使用留下它的建造的信息,即WCF服务将应对这就是问题所在。

同时我能使用比其他的东西留下来执行后从ASP到WCF服务,如XMLHTTP我还是有问题的构建一个XML消息WCF服务将作出回应。我已经试着变化这个仍然无法理解是什么样的格式,我需要用它来做到这一点。

我知道,从理论上讲,所有周转基金服务的需求是一个格式正确的信息。我只是无法建造的消息的正常和通常的话,每个人都有一些建议,就如何发送信息,我还没有看到别人得到一个实际的例子是适当的信息的格式将是在这种情况,因为每个人都是这样用来使用。网发送的信息以及它的所有做的对你在这一上下文中。

有帮助吗?

解决方案

你不要指定一件事:什么样的结合是你暴露你的服务作为?如果你使用WsHttpBinding或BasicHttpBinding,那么就没有简单的"http post"你可以这样做,因为你需要包括至少整个肥皂信封(用正确的肥皂版本和潜在的安全头等等)。

如果你使用(或者可以迁移)。净3.5,然后有一个新的结合,明确支持的情况这样,在那里你想要你的服务暴露出不是作为一个肥皂服务而是作为完全的休息-等服务,或只是作为XML/JSON HTTP。这就是所谓的WebHttpBinding.

有很多选择你可以调整,但这是很有可能你可能只是可以添加一个新的终点与webHttpBinding和有工作几乎的时候了。

这可能给你一个头开始新的方案拟订模型: http://msdn.microsoft.com/en-us/library/bb412169.aspx

其他提示

我沃特些代码一同前进的excel宏读XML文件,文章内容的URL然后节省的结果。

Sub ExportToHTTPPOST()
Dim sURL, sExtraParams
Const ForReading = 1, ForWriting = 2, ForAppending = 3

Set rs = CreateObject("Scripting.FileSystemObject")
Set r = rs.OpenTextFile("y:\test.xml", ForReading)

Set Ws = CreateObject("Scripting.FileSystemObject")
Set w = Ws.OpenTextFile("Y:\test2.xml", ForWriting, True)

Do Until r.AtEndOfStream

    sData = sData & r.readline

Loop

sURL = "http://MyServer/MyWebApp.asp"

sData = "payload=" & sData

    Set objHTTP = New WinHttp.WinHttpRequest

            objHTTP.Open "POST", sURL, False
            objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
            objHTTP.send sData
            w.writeline objHTTP.ResponseText
    Set objHTTP = Nothing
    w.Close
    r.Close
End Sub

这是最简单的代码,我已经有了这样做的一个背景HTTP post在ASP

Set objXML = CreateObject("MSXML2.ServerXMLHTTP.6.0")
objXML.open "POST", url, false
objXML.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
objXML.send("key="& Server.URLEncode(xmlvalue))
Set responseXML = objXML.responseXML
Set objXML = nothing

这只是要求你们可以尝试下列任一目的安装在你的服务器。我使用这个用于各种各样的事情,包括XML-RPC server/client在ASP。

编辑:重读你的问题如果你设置具体的方式,那么这将不会帮助,但是如果你真的只是寻找一种方式来访问您的服务,这将工作,只要构造你的XML后的正确的。

许可以下: CC-BY-SA归因
不隶属于 StackOverflow
scroll top