1

私は基本的に従来のASPとVBScriptの初心者なので、ここでの目標を達成するために助けを求めたいと思います。JSON文字列を作成し、VBScriptを使用してRESTfulWebサービスに送信する必要があります。それ、どうやったら出来るの？

私はいくつかのコードを持っていますが、それが機能するとは思いません：

strJSONToSend = JSONstr 'this is where I use my built JSON string

webserviceurl = "url here" 

Set objRequest = Server.createobject("MSXML2.XMLHTTP.3.0") 
objRequest.open "POST", webserviceurl, False 

objRequest.setRequestHeader "Content-Type", "application/json; charset=UTF-8" 
objRequest.setRequestHeader "CharSet", "utf-8" 
objRequest.setRequestHeader "SOAPAction", webserviceurl

Set objJSONDoc = Server.createobject("MSXML2.DOMDocument.3.0") 
objJSONDoc.loadXml strJSONToSend 
objRequest.send objJSONDoc 

set objJSONDoc = nothing 
set objResult = nothing
4

1 に答える 1

3

JSONをXMLに変換する必要はありません（XMLではなくJSONであるため）：

strJSONToSend = JSONstr 'this is where I use my built JSON string

webserviceurl = "url here" 

Set objRequest = Server.createobject("MSXML2.XMLHTTP.3.0") 
objRequest.open "POST", webserviceurl, False 

objRequest.setRequestHeader "Content-Type", "application/json; charset=UTF-8" 
objRequest.setRequestHeader "CharSet", "utf-8" 
objRequest.setRequestHeader "SOAPAction", webserviceurl

objRequest.send strJSONToSend

set objJSONDoc = nothing 
set objResult = nothing
于 2012-04-16T20:46:09.300 に答える