2011年2月27日

HTTPのPOST処理のサンプル - VBScript

概要

VBScriptでHTTPのPOST処理するサンプルコードを示す。

サンプル

myPost.vbs

Option Explicit

Dim myHttpRequest
Dim myURL
Dim myPostData

myURL = "http://myhost.mydomain"
myPostData = "a=123&b=456"

Set myHttpRequest = WScript.CreateObject("MSXML2.XMLHTTP.3.0")

Call myHttpRequest.Open("POST", myURL, False)
Call myHttpRequest.setRequestHeader("Content-Type", "application/x-www-form-urlencoded")
Call myHttpRequest.Send(myPostData)

WScript.Echo(myHttpRequest.responseText)

Set myHttpRequest = Nothing

以上

0 件のコメント:

コメントを投稿